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
Ïà¹ØÎĵµ£º
'¹¤³Ì-->ÒýÓà Ìí¼Ó 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×ܽ᣺
ÏÂͼÊÇÓÃmindmanagerÖÆ×÷µÄVB×ܽámdb£º
³£ÓÿؼþµÄ·ÖÀࣺ
ÊôÐԺ͹ý³Ì£º
·½·¨ºÍ¹ý³Ì
ʼþ¹ý³Ì¡¢Function¹ý³ÌºÍ¹ý³Ì£º
VB×ܽá´óͼ£º
·ÖÆçÈçÏ£º
Êý¾Ý°üÀ¨£ºÊý¾ÝÀàÐÍ¡¢±äÁ¿¡¢³£Á¿¡¢ÔËËã·û¡¢±í´ïʽµÈ¼¸²¿·Ö£¬¶øÁ÷³Ì¿ØÖÆÓï¾äÓ¦²»Ó¦¸Ã¼ÓÈëÆäÖС£
ÎҸоõ²»Ó¦¸Ã£¬ÓÓ±ù¿éÄ£×Ó&rdquo ......
VB´´½¨ACCESSÊý¾Ý¿âÈ«½â ¶¯Ì¬´´½¨Êý¾Ý¿â¡¢´´½¨±í£¬´´½¨¼Ç¼ ADO¡¢ADOX2009Äê04ÔÂ20ÈÕ ÐÇÆÚÒ» 10:17ÕªÒª£º ±¾ÎIJûÊöÁËÔÚVB³ÌÐòÖÐÀûÓÃADO¶ÔÏó¶¯Ì¬´´½¨Êý¾Ý¿âºÍÊý¾Ý±íµÄ·½·¨£¬ÕâЩ·½·¨ÔÚ¿ª·¢VBÊý¾Ý¿âÓ¦ÓóÌÐòÖкÜÓÐʵÓüÛÖµ£¬Ëü¿ÉÒÔÌá¸ßÊý¾Ý¿â³ÌÐòÁé»îÐÔ¡£
¡¡¡¡¹Ø¼ü´Ê£ºÊý¾Ý¿â¡¢Êý¾Ý±í¡¢ADO¡¢ADOX
¡¡¡¡1: ÎÊÌâµÄÌá³ö
¡¡¡¡Ô ......
ÎÄÕÂÀ´Ô´: http://www.zoesan.com By Error 302777528תÔØÇë×¢Ã÷³ö´¦
ÒÔÉÏvbÓõ½Ö¸Õë¼¼Êõ²éÕÒ×Ö·û´®Óëc#Ò»°ãµÄ.indexof()²éÕÒÏà±È½Ï£¬Ã÷ÏÔ¿´³öË¿ìËÂý¡£
VB:
Option Explicit
'Ö¸Õë·½·¨²Ù×÷×Ö·û´®
'CopyÒ»¸ö×Ö·û´®µ½»º´æÖÐ
Public Declare Function GetTickCount Lib "kernel32" () As Long
Public ......