VBÁ¬½ÓACCESSÊý¾Ý¿â¾«¼ò°æ
Option Explicit
Private Sub Form_Load()
'¹¤³Ì->ÒýÓÃ->Ñ¡ÖÐMicrosoft ActiveX Data Objects 2.8 Library
Dim shujukulianjie As New ADODB.Connection
Dim jiluji As New ADODB.Recordset
'Á¬½ÓÊý¾Ý¿âµÄ´úÂë¶Î
shujukulianjie.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\database\shujuku.mdb"
'×Ô¼º¸Ä¶¯Ò»ÏÂÉÏÃæµÄ·¾¶ºÍÎļþÃû¼´¿É£¬ÆäËûµÄ´úÂëÄã²»Àí½âÕÕÕ³ÌùÎÞ·Á
'¶Ôxingmingbiao±í½øÐвéѯ²Ù×÷
jiluji.Open "Select * from xingmingbiao", shujukulianjie
End Sub
==========================
http://www.bianceng.cn/Programming/vb/200812/11121.htm
http://zhidao.baidu.com/question/76929489.html?fr=qrl&cid=1073&index=2
http://topic.csdn.net/t/20060821/17/4965200.html
Ïà¹ØÎĵµ£º
MSComm¿Ø¼þÌṩÁËÁ½ÖÖ´¦ÀíͨÐŵķ½Ê½£ºÒ»ÖÖΪʼþÇý¶¯·½Ê½£¬¸Ã·½Ê½Ï൱ÓÚÒ»°ã³ÌÐòÉè¼ÆÖеÄÖжϷ½Ê½¡£µ±´®¿Ú·¢Éúʼþ»ò´íÎóʱ£¬MSComm¿Ø¼þ»á²úÉúOnCommʼþ£¬Óû§³ÌÐò¿ÉÒÔ²¶»ñ¸Ãʼþ½øÐÐÏàÓ¦´¦Àí¡£±¾ÎĵÄÁ½¸öÀý×Ó¾ù²ÉÓø÷½Ê½¡£ÁíÒ»ÖÖΪ²éѯ·½Ê½£¬ÔÚÓû§³ÌÐòÖÐÉè¼Æ¶¨Ê±»ò²»¶¨Ê±²éѯ MSComm¿Ø¼þµÄijЩÊôÐÔÊÇ·ñ·¢Éú±ä»¯£¬´Ó¶øÈ ......
DELPHIÖвÙ×÷ACCESSÊý¾Ý¿â(½¨Á¢.mdbÎļþ,ѹËõÊý¾Ý¿â)
ÒÔÏ´úÂëÔÚWIN2K,D6,MDAC2.6ϲâÊÔͨ¹ý,
±àÒëºÃµÄ³ÌÐòÔÚWIN98µÚ¶þ°æÎÞACCESS»·¾³ÏÂÔËÐгɹ¦.
//ÉùÃ÷Á¬½Ó×Ö·û´®
Const
SConnectionString
= 'Provider=M ......
´úÂëÈçÏÂ:
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As
Long, ByVal hWndInsertAfter As Long,& _
¡¡ ByVal X As Long, ByVal Y As
Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long & _
&n ......
VB ×¢ÊͳÌÐò´úÂëµÄ·ûºÅÊÇ '£¬Ö»ÒªÔÚijÐгÌÐòÇ°Ãæ¼ÓÉϸ÷ûºÅ¾Í¿ÉÒÔ×¢Ê͸ÃÐгÌÐò¡£µ«Èç¹û³ÌÐò´úÂëÓï¾äºÜ¶àµÄʱºò£¬Ò»ÐÐÒ»ÐеØ×¢Ê;ͷdz£²»·½±ã¡£Æäʵ VB
±¾ÉíÌṩÁËÒ»´ÎÐÔ×¢ÊͶàÌõÓï¾äµÄ¹¦ÄÜ£ºÔÚÖ÷²Ëµ¥“ÊÓͼ”Ñ¡ÏîµÄ“¹¤¾ßÀ¸”Ï£¬Ñ¡ÖГ±à¼”£¬VB
µÄ½çÃæ»á³öÏÖÒ»ÅŹ¤¾ß°´Å¥£¬ÆäÖоÍÓÐÓà ......
1¡¢VSS¿Í»§¶Ë´ò¿ª¹¤³ÌʱÌáʾ Access to file"\\***\rights.dat" denied
¸ÃÌáʾÊÇָûÓÐÍøÂç·ÃÎʵÄȨÏÞ£¬Óû§ÒªÔÚ¹²ÏíÎļþ¼ÐÓпÉдµÄȨÏ޲ſÉÒÔ¡£ÎÒÃÇÔÚÉèÖù²ÏíÎļþµÄʱºòÓ¦¸ÃÔÊÐíдÈë¡£
2¡¢ÎªVSSÉèÖû·¾³±äÁ¿
ĬÈÏÇé¿öÏÂÎÒÃÇÿ´Î´ò¿ªVSS¿Í»§¶ËÌî³äµÄÓû§Ãû¶¼Êǵ±Ç°ÏµÍ³µÇ½µÄÓû§£¬ÕâÑùʹÓÃÆðÀ´ºÜ²»·½±ã¡£Î ......