Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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ʵÏÖ¼òµ¥µÄͼÐÎÇøÓòÑ¡Ôñ

³ÌÐòЧ¹û£º
µ±µã»÷×ó±ßµÄ²¿¼þͼʱ£¬»áµ¯³ö¶Ô»°¿òÌáʾÄãµã»÷ÁËÄÄÒ»¸öÇøÓò¡£
³ÌÐò˼·£º
ÓÃÒ»¸öÍ¼Æ¬ÇøÓòÂëͼ×÷Ϊµã»÷ÇøÓòµÄ²ÎÕÕ£¬¸ù¾ÝXYÈ¡µÃµÄÑÕɫʶ±ð³öÊôÓÚÄÄÒ»¸öÇøÓò
³ÌÐò½çÃæÈçÏ£º
Ïà¹Ø´úÂëÈçÏ£º
Visual Basic Code
Dim ColorArray (   )   As Long
Dim ColorCount As Long
Private Sub Form_Load ( ......

Asp.netÁ¬½ÓÊý¾Ý¿â½Ì³Ì£¨vb.net£©

Asp.netÁ¬½ÓSQL Server2000Êý¾Ý¿âÀý³ÌÏê½â: 
<%@ Import Namespace="System.Data" %> 
<%@ Import NameSpace="System.Data.SqlClient" %> 
<script laguage="VB" runat="server"> 
sub page_load(sender as Object ......

VB ²éÕÒÓÎÏ·´°¿Ú¾ä±úµÄ·½·¨


VB ²éÕÒÓÎÏ·´°¿Ú¾ä±úµÄ·½·¨
ÐÅÏ¢À´Ô´£ººÚ¿Í´úÂë ±à¼­£ºroot ä¯ÀÀ´ÎÊý£º191 ¼ÓÈëʱ¼ä£º2010-3-20 1:40:47 ÆÀÂÛ(0)
[ÎÊÌâÒ»,²»ÄÜ»ñµÃ´°¿Ú¾ä±ú]
Ò»°ãѰÕÒ´°¿Ú¾ä±ú¶¼ÊÇÖ±½ÓFindWindow°É,ÕâÑùÊDz»ÐеÄ,QQÈý¹úÔÚÕâЩº¯ÊýÉÏ×öÁËһЩ´¦Àí.ÎÒÀ´¸ø´ó¼Ò˵¸öÍòÄܵķ½·¨°É,
¶ÔÓÚGetWindowText·½·¨ÓÎÏ·¾Í¹Ü²»µ½ÁË,¿ÉÒÔÅäºÏʹÓÃGetW ......

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

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

VBµ÷ÓÃVC DLL Ô¼¶¨´íÎó,Çó¸ßÊÖÖ¸µã

VCº¯ÊýÊÇ:extern "C" int __declspec(dllexport)PassPortRead(char *InPutData,char OuPutData[255]);
VBÉùÃ÷ÊÇ£ºPrivate Declare Function PassPortRead Lib "PPRead.dll" (ByVal InPutData As String, ByVal OutPutData As String) As Integer
Éú³ÉµÄÎļþÄÜÕý³£ÔËÐÐ,²¢ÇÒÄÜÉú³ÉÏàÓ¦Êý¾Ý,µ«ÊÇÔÚµ÷ÊÔʱÌáʾ"DLLµ÷ÓÃÔ¼¶¨´í ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ