ÒÔǰûÓнӴ¥¹ývb,½ñÌì°ë·½ÓÊÖÒ»¸öÏîÄ¿£¬ÆäÖÐÓÃexcelÁ¬oracle,È¡Êý¾Ý¡£ÎÒÔĶÁÁËÀïÃæµÄvb´úÂ룬Óм¸¾äÊÇÕâÑùµÄ: 
 Const connectionString As String = "DSN=DEV;" & _ 
            "Uid=username;" & _ 
            "Pwd=passwo ......
    
        
    
    ÔÚÁ·Ï°ÊéÉϵĵÚ1¸öÀý×Ó£¬µ«²»Äܳɹ¦¡£µ«ÎÒµÄÍâΧӦÓÃÅäÖÃÆ÷ºÍÅäÖùÜÀíÆ÷¶¼ÒѾ´ò¿ªÔ¶³ÌÁ¬½ÓÁË£¬·À»ðǽ¹Ø±Õ¡£ 
 »¹ÓÐÕâÀïÁ¬½ÓµÄÊÇ(local)£¬²»ÊDZ¾µØ·þÎñÆ÷Âð£¿ÎªÊ²Ã´»áÊÇÔ¶³ÌÁ¬½Óʧ°Ü£¿ 
  
 Imports System.Data.SqlClient 
 Public Class Form1 
  
     Private Sub Button1_Click(ByVal sender As Syste ......
    
        
    
    Çó±¾vb¿Ø¼þµÄchmµç×ÓÊé. ÈçÌâ,ËÑÁËn¾Ã,ûÕÒµ½,À´Ì³×ÓÀïÎÊÎÊ.. 
  
 Óеķ¢¸ö157636945@qq.com 
  
 ¸ß·Ö¸ßºÃÊé. 100~
ÑÌÎÒ½èÁË¡£ 
 msdn²»¹»ºÃ£¿
ÎÒ¾õµÃMSDNÖеĿؼþ²Î¿¼²¿·Ö·Ç³£ºÃÁË 
 
VB¿Ø¼þÊôÐÔ´óÈ«chmµç×ÓÊé
MSDN
ÒýÓÃ 
 ÑÌÎÒ½èÁË¡£ 
 msdn²»¹»ºÃ£¿ 
  
 ÕÒ²»µ½ msdn ¹ØÓڿؼþµÄ½éÉÜ»ò²Î¿¼,ÎÒË ......
    
        
    
    СµÜ°ë·³ö¼Ò¿´Á˸övb³ÌÐò,½á¹ûÔÚÖ´Ðдø²ÎÊýµÄ´æ´¢¹ý³Ìʱ±¨´í,ÔÙ¾ÍÊÇÏëÎÊÈçºÎÈ¡·µ»ØÖµ; 
  
 Dim str_sql As String 
     str_sql = "Exec Pro_DFJS '" & str_CSVfailed & "'," & NowPrice & "," & baojingxianzhi & ",'" & ......
    
        
    
    ÎÒÓÃVBдÁËÁ½¸ö³ÌÐò,ÕâÁ½¸ö³ÌÐòÔõô½øÐÐÊý¾Ý´«µÝ 
  
 Ö÷³ÌÐò·¢ËÍÒ»¶ÎÊý¾Ý¸ø×Ó³ÌÐò,×Ó³ÌÐòÖ´ÐкÃÓÃÔÙ·µ»ØÒ»¶ÎÊý¾Ý¸øÖ÷³ÌÐò,ÈÃÖ÷³ÌÐòÖªµÀÕâ¶ÎÒѾÈÈÐкÃÁË 
  
 ÎÒÓÃDDE×öÁËÒ»ÏÂ,µ«²»ÊǺÜÁ˽âÄǶ«Î÷,ËùÒÔÖ»×ö³öÁË·¢ËÍÊý¾Ý,²»ÄÜ·µ»Ø,Çë½Ì¸ßÊÖ°ï°ïæ
¿ÉÒÔÓÃsendmessage,postmessageÀ´ÊµÏÖ,ÐèÒªÄõ½ÏûÏ¢½ÓÊÕ·½µÄ¾ä±úµÄ 
  ......
    
        
    
    protected void Button1_Click(object sender, EventArgs e) 
     { 
  
         string file = "Sheet1"; 
         string conn = " Provider = Microsoft.Jet.OLEDB.4.0 ; Data Source =" + Server.MapPath("excel.xls") + &quo ......