Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VBÖд¦Àí¼ÓÁËÃÜÂëµÄMDBÎļþ

µ±MDB Îļþ¼ÓÁËÃÜÂ룬ֱ½ÓÓÉ   Access   ´òÓ¡MDBÎļþʱ£¬»á³öÏÖÃÜÂë¶Ô»°¿ò£¬Ñ¯ÎÊÃÜÂë¡£µ«ÊÇÈôÒªÓÉ   VB   ³ÌÐòÖдòÓ¡£¬±Ø須¸ü¸Ä   VB³ÌÐòÖдò¿ªMDBÎļþµÄÖ¸Á·ñÔò»á³öÏÖ´íÎóÐÅÏ¢£¡ÒÔÏÂÕë¶Ô¸÷ÖÖÇé¿ö£¬·Ö別¼ÓÒÔ˵Ã÷£º  
   
  1¡¢   ʹÓà   DAO   ÃüÁî´ò¿ªMDBÎļþ£ºOpenDatabase    
  ÈôÒªÓɳÌÐòÖдò¿ª£¬ÃüÁîÈçÏ£º  
  Set   DB   =   OpenDatabase(DatabaseName,   False,   False,   ";Pwd=ÃÜÂë")  
  ʵÀý£º  
  Dim   db   As   Database  
  Set   db   =   OpenDatabase("C:\db1.mdb",   False,   False,   ";Pwd=1")  
  ÈôҪʹÓà   Data   ¿Ø¼þ£¬É趨·½·¨ÈçÏ£º  
  1¡¢É趨   DatabaseName   ÊôÐÔ   (MDBÎļþÃû³Æ   /   º¬Â·¾¶)  
  2¡¢É趨   Connect   ÊôÐÔ£¬將Ô¤ÉèµÄ×Ö´®   "Access"   ¸Ä³É   ";Pwd=ÃÜÂë"   (²»º¬Ë«ÒýºÅ)  
  3¡¢É趨   RecordSource   ÊôÐÔ    
   
  ¡¡  
  2¡¢  
  ¡¡  
  ʹÓà   ADO   ÃüÁî´ò¿ªMDBÎļþ£º  
   
  ÔÚʹÓà   ADODC   »ò   DataEnvironment   É趨ºÃÖ®ºó£¬Ö±½ÓÀûÓÃÊôÐÔ´°¿ÚÐÞ¸Ä   ConnectionString   ÊôÐÔ(¸½ÊôÓÚ   ADODC)   »ò   ConnectionSource   ÊôÐÔ(¸½ÊôÓÚ   DataEnvironment   µÄ   Connection   ¿Ø¼þ)£¬Ð޸ĵķ½·¨ÊÇÔÚÊôÐÔÖ®ºóÔö¼ÓÒÔϲÎÊý£º  
  ;Jet   OLEDB:Database   Password=ÃÜÂë  
   
  ³ýÁË   ADODC   ¼°   DataEnvironment   Ö®Í⣬   Ö±½ÓʹÓà   ADO   ¿Ø¼þ來´ò¿ªº¬ÓÐÃÜÂëµÄ   mdb   MDBÎļþ£¬É趨²ÎÊýµÄ·½·¨Ò²ÊÇÏàͬµÄ¡£  
   
  ¡¡  
  3¡¢  
  ¡¡  
  ѹËõ¼ÓÁËÃÜÂëµÄMDBÎļþ£ºCompactDatabase  
   
  DBEngine.CompactDat


Ïà¹ØÎĵµ£º

vb Á¬½ÓÊý¾ÝÀý×Ó

   '¹¤³Ì-->ÒýÓà Ìí¼Ó Microsoft activex data objects 2.5 library
    '¹¤³Ì-->²¿¼þ Ìí¼Ó Microsoft flexgrid control 6.0
    Dim Cnn As New ADODB.Connection
    Cnn.ConnectionString = "Provider=microsoft.jet.oledb.4.0;data source=E:\Access ......

VB 5·1µÚÒ»Ìì

ÉÏÎç:
VB×ܽ᣺
ÏÂͼÊÇÓÃmindmanagerÖÆ×÷µÄVB×ܽámdb£º
³£ÓÿؼþµÄ·ÖÀࣺ
 
ÊôÐԺ͹ý³Ì£º
·½·¨ºÍ¹ý³Ì
ʼþ¹ý³Ì¡¢Function¹ý³ÌºÍ¹ý³Ì£º
VB×ܽá´óͼ£º
 
·ÖÆçÈçÏ£º
Êý¾Ý°üÀ¨£ºÊý¾ÝÀàÐÍ¡¢±äÁ¿¡¢³£Á¿¡¢ÔËËã·û¡¢±í´ïʽµÈ¼¸²¿·Ö£¬¶øÁ÷³Ì¿ØÖÆÓï¾äÓ¦²»Ó¦¸Ã¼ÓÈëÆäÖС£
ÎҸоõ²»Ó¦¸Ã£¬ÓÓ±ù¿éÄ£×Ó&rdquo ......

VB´´½¨ACCESSÊý¾Ý¿âÈ«½â

VB´´½¨ACCESSÊý¾Ý¿âÈ«½â ¶¯Ì¬´´½¨Êý¾Ý¿â¡¢´´½¨±í£¬´´½¨¼Ç¼ ADO¡¢ADOX2009Äê04ÔÂ20ÈÕ ÐÇÆÚÒ» 10:17ÕªÒª£º ±¾ÎIJûÊöÁËÔÚVB³ÌÐòÖÐÀûÓÃADO¶ÔÏó¶¯Ì¬´´½¨Êý¾Ý¿âºÍÊý¾Ý±íµÄ·½·¨£¬ÕâЩ·½·¨ÔÚ¿ª·¢VBÊý¾Ý¿âÓ¦ÓóÌÐòÖкÜÓÐʵÓüÛÖµ£¬Ëü¿ÉÒÔÌá¸ßÊý¾Ý¿â³ÌÐòÁé»îÐÔ¡£
¡¡¡¡¹Ø¼ü´Ê£ºÊý¾Ý¿â¡¢Êý¾Ý±í¡¢ADO¡¢ADOX
¡¡¡¡1: ÎÊÌâµÄÌá³ö
¡¡¡¡Ô ......

c#Óë×îÅ£vbËã·¨±ÈÆ´ by Error


 
ÎÄÕÂÀ´Ô´: http://www.zoesan.com By Error 302777528תÔØÇë×¢Ã÷³ö´¦
ÒÔÉÏvbÓõ½Ö¸Õë¼¼Êõ²éÕÒ×Ö·û´®Óëc#Ò»°ãµÄ.indexof()²éÕÒÏà±È½Ï£¬Ã÷ÏÔ¿´³öË­¿ìË­Âý¡£
VB:
Option Explicit
'Ö¸Õë·½·¨²Ù×÷×Ö·û´®
'CopyÒ»¸ö×Ö·û´®µ½»º´æÖÐ
Public Declare Function GetTickCount Lib "kernel32" () As Long
Public ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ