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

VB·ÃÎʾßÓдò¿ªÃÜÂëºÍ¹¤×÷×éÃÜÂëµÄACCESS

'Dim MyConn As New ADODB.Connection
'MyConn.Provider = "Microsoft.Jet.OLEDB.4.0"
'MyConn.Properties("Data Source") = SJK.TEXT
'MyConn.Properties("Jet OLEDB:System database") = GZZ.TEXT
'MyConn.Open UserID:=YHM.TEXT, Password:=MM.TEXT
'MyConn.Open Password:=MM2.TEXT

ÉÏÃæÊÇÎҵĴúÂë.¿ÉÊǵ±ÎÒÓÃÕâ¸ö´úÂëÀ´´ò¿ªÊý¾Ý¿âµÄʱºò Ìáʾ,ÃÜÂëÎÞЧ.Çë´óÅ£°ï°ïæ

ÎÒËùÓеķÖËÍÉÏ....


http://hi.baidu.com/micahel%C2%AC/blog/item/cef53c3ff35852ed55e72328.html

VB code:

If dmDataShapePrivider = 0 Then
strConnect = "Provider=MSDASQL.1"
ElseIf dmDataShapePrivider = 1 Then
strConnect = "Provider=MSDataShape.1;Data Provider=MSDASQL.1"
End If
strConnect = strConnect & _
";Driver={Microsoft Access Driver (*.mdb)}" & _
";DBQ=" & dmDataSource & _
";uid=" & dmUser & _
";pwd=" & dmPWD




ÎÒµÄÌì°¡

  MyConn.Open  "Provider=Microsoft.Jet.OLEDB.4.0;Integrated Security=SSPI;" _
                        & "Persist Security Info=False;Use


Ïà¹ØÎÊ´ð£º

Çó½ÌÏÂVBÈçºÎ¸øD3DÓÎϷдÆÁ - VB / API

ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......

vbµÄ³É¹¦Ö®Â· - À©³ä»°Ìâ / ¹²ÏíÈí¼þ£¨×ßÏòº£Í⣩

ÔÚvbÕâ±à³ÌÀïËÆºõÓкܶàµÄ¶«Î÷ÊÇÏàÁªÏµµÄ£¬ÎªÊ²Ã´ÓÐЩÈ˶ÔvbµÄ±à³ÌÃþ²»µ½Í·ÄÔ°¡£¡²¢ÇÒÓÐЩʺÜÈÝÒ׵쬵«ÊÇÈ´°ÑËüÃǵĴúÂë±ä³É¸´ÔÓ£¬Ò²È¥ÏëһЩ²»ÄÜʵÏֵĶ«Î÷°¡£¡




û·ÖÁË£¬Â¥Ö÷¶àÀ´µã·Ö£¡

À´½Óµã·Ö

......

VB µ÷Óà vc ±àдµÄdll - C/C++ / C++ ÓïÑÔ

ÓÃvc±àдµÄdllÔÚdebugģʽºÍreleaseģʽÏÂÆô¶¯vbµÄexe³ÌÐòµ÷ÓÃvcµÄdll¿ÉÒԵõ½ÕýÈ·½á¹û£¬µ«ÊÇÈç¹ûÖ±½ÓË«»÷vbµÄexe³ÌÐòµ÷ÓÃdll±¨´í£¬ÔÚdllÄÚ²¿Ìí¼Ómessageboxºó·¢ÏÖÖ»ÒªÔÚº¯ÊýÄÚ²¿ÉùÃ÷std::stringÀàÐ͵ıäÁ¿¾Í»á³öÏÖÄ ......

vbÉú³Éexe´íÎó - VB / »ù´¡Àà

±¨Õâ¸ö´í:
compile Error
sub or function not defined
ºÍÎÒÒýÓÃÕâ¸ö¿âº¯ÊýÓйØÏµÂð£¿
Private Declare Function GetPrivateProfileString Lib "kernel32" Alias _
  "GetPrivatePr ......

vb×Ô¶¯·¢ËÍÓʼþ - VB / »ù´¡Àà

ΪʲôÎÒÏëÑ­»·×Ô¶¯·¢ËÍÓʼþµÄʱºò,¾ÍÖ»ÓеÚÒ»·âÄÜ×Ô¶¯·¢ËÍ,ÆäËüºóÃæµÄÓʼþ¶¼Ö»ÄÜ´´½¨,²»ÄÜ×Ô¶¯·¢ËÍ
Private Sub send_mail_Click() '·¢ËÍÓʼþ֪ͨ
  Do While Not TDBG_Dept.EOF
  If A> ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ