excelÖÐvbÁ¬oracle²»³É¹¦
    
	
	ÒÔǰûÓнӴ¥¹ývb,½ñÌì°ë·½ÓÊÖÒ»¸öÏîÄ¿£¬ÆäÖÐÓÃexcelÁ¬oracle,È¡Êý¾Ý¡£ÎÒÔĶÁÁËÀïÃæµÄvb´úÂ룬Óм¸¾äÊÇÕâÑùµÄ: 
 Const connectionString As String = "DSN=DEV;" & _ 
            "Uid=username;" & _ 
            "Pwd=password" 
 ...... 
 Set conn = New ADODB.Connection 
 conn.Open connectionString 
 ...... 
 µã»÷excelÖеÄÒ»¸ö°´Å¥Á¬Êý¾Ý¿â£¬µ«ÊDZ¨"problems with datasource connection",ÓÚÊÇÎÒÍÆ²âDSN=RRMASSDEVÕâÀïµÄÊý¾ÝÔ´RRMASSDEV²»´æÔÚ,ÓÚÊǾÍ×Ô¼º´´½¨ÁËÒ»¸ö:(ÔÚÏÂͼ½çÃæ) 
  
 ÔٴεãexcelÖеİ´Å¥, µ¯³öselect data sourceµÄ¶Ô»°¿ò,  
  
 Ñ¡ÖÐÎÒ´´½¨µÄdatasource, µ¯³öÏÂÃæ¶Ô»°¿ò: 
  
 ×îºó»¹ÊÇrun-time error: 
  
 ÎÒÖªµÀoracleµÄÁ¬½ÓÉæ¼°µ½Ö÷»úÃû, ·þÎñÃû,Óû§ÃûÃÜÂë. 
 ÇëÎÊÎÒ¸ÃÔÚ¸÷¸ö¶Ô»°¿òÖж¼Ó¦¸ÃÔõôÌî¶«Î÷²ÅÄÜÁ¬½ÓORACLE³É¹¦?
²¹³ä£ºoffice2000, xpϵͳ£¬¡¡oracle 10g
Provider=msdaora;Data Source=MyOracleDB;User Id=myUsername;Password=myPassword; 
 »»³ÉÕâÖÖ connectionstring
ÎÊÌâÒѽâ¾ö¡£  
 ˵À´Ò²Éµ£¬ÔÚ´´½¨odbc for oracleµÄʱºò serverÀïÃæÌîÔÚtnsnames.oraÀïÃæ¶¨ÒåµÄÁ¬½ÓÃû¼´¿É¡£
»¹ÓÐÒ»¸öÎÊÌⲻ֪¥ÉϿɷñ»Ø´ð£ºvbaÔËÐе½Õâ¾ä»°±¨"¶ÔÏó²»Ö§³Ö´ËÊôÐÔ»ò·½·¨"µÄ´í£º  
 ActiveWorkbook.ShowPivotTableFieldList = False  
 ÎÒµÄÊÇoffice2000,ÎÒÔÚMicrosoft Visual BasicµÄ±à¼½çÃæÊäÈëActiveWorkbook.·¢ÏÖÈ·ÊÇûÓÐShowPivotTableFieldList Õâ¸öÌáʾ. ²»ÖªÊDz»Êǰ汾¼æÈÝÎÊÌâ.ÇëÖ¸½Ì.  
 Õâ¸öe
    
 
	Ïà¹ØÎÊ´ð£º
        
    
    ±¾À´ÒªÐ´¸öupdateÓï¾ä
update table_a A
        set A.flag=1
        where A.id in (select B.id from table_b B)
½á¹ûÎóд³É
update table_a A
        set A.flag=1
        where  ......
    
        
    
    ÎÒÔÚ´´½¨Êý¾Ý¿âµÄʱºòÓõÄÃû×ÖΪoracle10£¬µ«ÊÇ´´½¨ºÃºó£¬ÔÚĬÈϵÄĿ¼ÏÂÏÔʾµÄÃû³ÆÈ´ÊÇoracle10g£¬ÕâÊÇΪʲô£¿
Äã¿´µÄ 10gÊǰ²×°Ä¿Â¼°É  
SQL> select name from v$database;
NAME
---------
ORCL
 ......
    
        
    
    ¸÷λoracle¸ßÊÖ£¬Çë½ÌÒ»ÏÂΪʲôoracle 10gÔÚ°²×°µ½°Ù·ÖÖ®°ËÊ®ÎåµÄʱºò¾Í±¨´í²»ÄܼÌÐø°²×°£¿
ÄÚ´æ¶à´ó£¿¡¡ÖØÐÂϸöÊý¾Ý¿â°²×°ÊÔÊÔ..
ÒýÓÃ
¸÷λoracle¸ßÊÖ£¬Çë½ÌÒ»ÏÂΪʲôoracle 10gÔÚ°²×°µ½°Ù·ÖÖ®°ËÊ®ÎåµÄʱ ......
    
        
    
    vbÊDz»ÊǺÜÅ£°¡  ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡   c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£
±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......
    
        
    
    °ïÎÒ¸Ä¸Ä  ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
    number As Single
    score As Integer
    name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
  i = 0
 &nbs ......