台灣最大程式設計社群網站
線上人數
479
 
會員總數:246038
討論主題:189625
歡迎您免費加入會員
討論區列表 >> VB6 >> VB 連 MYSQL 無法存檔
[]  
[我要回覆]
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
VB 連 MYSQL 無法存檔
價值 : 10 QP  點閱數:1699 回應數:0
樓主

joyend
初學者
10 48
1630 46
發送站內信

Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset

conn.CursorLocation = adUseServer
conn.ConnectionString = "DRIVER=MySQL ODBC 3.51 DRIVER;OPTION=3;" _
& "DATABASE=dperp;" _
& "CharSet=big5;" _
& "UID=root;" _
& "password=12345678;" _
& "SERVER=192.168.1.254"
conn.Open
rs.Open "SELECT * FROM cpdata", conn, adOpenKeyset, adLockOptimistic, adCmdText

---------------------------------------
rs("cpname") = Text1.Text
rs("tel") = Text2.Text
rs("fax") = Text3.Text
rs("idnum") = Text4.Text
rs("mail") = Text5.Text
rs("http") = Text6.Text
rs("add") = Text7.Text
rs.Update

存檔時出現錯誤代碼-2147467259
若將conn.CursorLocation = adUseClient 即正常
請問如何解決該錯誤


本篇文章發表於2008-03-01 23:38
目前尚無任何回覆
   

回覆
如要回應,請先登入.