vb Á¬½ÓAccess×Ö·û´®¡¢vbÁ¬½ÓDb2µÄ×Ö·û´®
DB2ConnectionString
b2str = "Provider=MSDASQL.1;Password=a$sk6G7;Persist Security Info=True;User ID=DBA;Data Source=ConDB2SFXXK"
AccessConnectonString
accessstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DMSJK.mdb;Jet OLEDB:database password="
Ïà¹ØÎĵµ£º
vb ÖÐ ieframe.dll/1 ²»´æÔÚ ´íÎóµÄÎÊÌâ½â¾ö - [Windows Client]
2008-05-27
°æȨÉùÃ÷£º×ªÔØʱÇëÒÔ³¬Á´½ÓÐÎʽ±êÃ÷ÎÄÕÂÔʼ³ö´¦ºÍ×÷ÕßÐÅÏ¢¼°±¾ÉùÃ÷
http://twticpgk.blogbus.com/logs/21746766.html
½ñÌìÒ»¸öÓû§µÄVBÓò»ÁË¡£´ò¿ª¹¤³ÌÎļþµÄʱºò³öÏÖ´íÎ󣺓vb ÖÐ ieframe.dll/1 ²»´æÔÚ",½â¾ö·½·¨ÈçÏ£º
Õâ¸öÊÇÓ ......
ACCESSÊý¾Ý¿â½çÃ棺
EXCELµÄ´°Ìå½çÃ棺
´°ÌåÖеĴúÂ룺
Private Sub ComboBox1_Change()
Dim cn As Object, sql$, arr, i&
Set cn = CreateObject("adodb.connection")
cn.Open "provider=Microsoft.jet.OLEDB.4.0;data source=" & ThisWorkbook.Path & "\ºǫ́.mdb"
Me.ListBox1.Clear
......
VBÈí¼þ¹¤³Ìʦ£º
ְλÃèÊö£º
1¡¢½øÐбàÂë¡¢²âÊÔ£»
2¡¢Ôڹ涨ʱ¼äÄÚÌá½»Ô´´úÂë¡£
¸ÚλҪÇó£º
1¡¢ÊìϤMS SQLÊý¾Ý¿â£»
2¡¢ÊìϤVB 6.0£»
3¡¢ÓÐÒµÎñϵͳ¿ª·¢¾Ñ飻
4¡¢¾ß±¸Á¼ºÃµÄÍŶӺÏ×÷¾«Éñ£¬ÇÚ·Ü¡¢ÉϽø£»
5¡¢´óר»òÕßÒÔÉÏѧÀú£»
6¡¢¾ßÓÐ1Äê»òÕßÒÔÉÏÏà¹Ø¹¤×÷¾Ñé £»
7¡¢ÊìϤC#ÓÅÏÈ¡£
VBÐÂÊÖ¡¢³õ¼¶³ÌÐòÔ±¹«Ë¾Ìṩרà ......
ÔÚVB Öе÷Óö¯Ì¬Á¬½Ó¿â
2001-11-08· · ··yesky
1 2 3 4 5 6 7 8 ÏÂÒ»Ò³
¡¡¡¡×÷ΪһÖÖ¼òµ¥Ò×ÓõÄWindows¿ª·¢»·¾³£¬Visual Basic´ÓÒ»ÍƳö¾ÍÊܵ½Á˹ã´ó±à³ÌÈËÔ±µÄ»¶Ó¡£Ëüʹ ³ÌÐòÔ±²»±ØÔÙÖ±½ÓÃæ¶Ô·×·±¸´ÔÓµÄWindowsÏûÏ¢£¬¶ø¿ÉÒÔ½«¾«Á¦Ö÷Òª¼¯ÖÐÔÚ³ÌÐò¹¦ÄܵÄʵÏÖÉÏ£¬´ó´óÌá¸ßÁ˱ ......
½ñÌìÔÚÓÃC#´´½¨AccessÊý¾Ý¿âµÄʱºòÓöµ½ÁËÒ»¸ö×Ö¶ÎÀàÐ͵ÄÎÊÌ⣬ÒòΪ³ÌÐò´´½¨Êý¾Ý¿â±íÕâ¸öÔÚSqlServerÉϱȽϳ£¼û£¬ÔÚ°Ù¶ÈÖÐÕÒÁ˺ܾ㬰ÑÏà¹ØµÄÊôÐԳ¼ÏÂÀ´°É£¬ÒÔ¹©ÒÔºóʹÓá£
1¡¢¶¯Ì¬´´½¨AccessÊý¾Ý¿â£º±¾È˾õµÃÓÃADOXµÄ·½Ê½¼òµ¥ÊǼòµ¥£¬µ«ÊÇ»¹ÊÇÐèÒªÒ»¸öDLL×齨·½¿ÉÒÔʵÏÖÊý¾Ý¿âµÄ´´½¨£¬ËùÒÔÄÇÎÒÃǾͻ»¸ö˼·°É£¬ÎªÊ²Ã´²»¿ ......