ÐÂÊÖÎÊÒ»ÏÂÓÃVBÁ¬½ÓSQL ServerµÄÎÊÌâ
ÐÂÊÖѧ×öÊý¾Ý¿â£¬×öÁ˸öС³ÌÐò£¬ÊÇÓÃVBÁ¬µÄAccessÊý¾Ý¿â£¬ÎÒÏÖÔÚÏë¸Ä³ÉÁ¬½ÓSQLÊý¾Ý¿â£¬²»´úÂëÐÞ¸ÄÉÏÓ¦¸Ã×¢ÒâÄÄЩÖ÷񻂿±ð¡£±ÈÈç Á¬½ÓSQLÁ¬½Ó×Ö·û´®ÈçºÎд£¿
1, "Provider=SQLOLEDB;Data Source=Your_Server_Name;Initial Catalog= Your_Database_Name;UserId=Your_Username;Password=Your_Password;"
2, Èç¹ûʱ¼äÓÃÁË "#" Òª È¥µô£¬ ¸Ä³É format
¾ÍÖªµÀÕâô¶à£¬¶àµ÷ÊÔ¡£
VB code:
With g_strDBConn
.State = adStateOpen Then .Close
.ConnectionString = "driver=SQL Server;server=¼ÆËã»úÃû»òIPµØÖ·;uid=SA;pwd=SAµÄÃÜÂë;database=Êý¾Ý¿âÃû"
.CommandTimeout = 0
.Open
End With
if .State = adStateOpen Then .Close
²»ÒªÃÜÂë
Cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;" _
& "Persist Security Info=False;User ID=sa;" _
& "Initial Catalog= wy_sysl;Data Source= localhost"
ÓÃÃÜÂë
Cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;" _
& "Persist Security Info=False;User ID=sa;" _
 
Ïà¹ØÎÊ´ð£º
ÎÒÒª×öÒ»¸ö¶¨µãʼþ£¬ÊÇÿÌìÍíÉÏ12µã¾Í°ÑÈý¸ö±íÀïµÄÐÅÏ¢·ÅÈëÒ»¸ö±íÀÎÒÏëÓô洢¹ý³ÌÀ´Ð´£¬ÔõÃ´Ð´ÄØ£¿£¬ÄÇλ¸ßÊÖ°ï°ïæ°É£¬·Ç³£¸Ðл£¡
Óû§ÃûÊÇΨһµÄ
±íA ×Ö¶Î
Óû§Ãû£ºName ,ÓÊÏ䣺Ema ......
ÐèÇóÈçÏ£º
a±í:
p_id status
1 0
2 0
b±í
rec_id pid purchase_qty receive_qty flag
1 1 10 10 0
2 ......
vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£
±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......
°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
&nbs ......