3
我試圖在VB6
應用程序中執行查詢。MySQL查詢錯誤(ODBC 3.51)
這裏是我的代碼:
Dim con As ADODB.Connection
Set con = New ADODB.Connection
con.ConnectionString = "Driver={MySQL ODBC 3.51 Driver}; Server=***; Database=***; Username=***; Password=***; Option=3"
con.Open
Dim cmd As New ADODB.Command
With cmd
.ActiveConnection = con
.CommandText = "SELECT COD_CONFIG FROM FDT_CONFIG"
.CommandType = adCmdText
End With
Dim rs As New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open cmd, , adOpenStatic, adLockOptimistic
我已經隱藏在連接字符串中,但在我的應用我用正確的價值觀的一些信息。
我可以成功地打開連接,但是當我嘗試執行查詢,我得到:
「執行錯誤‘2147467259(800004005)’:未指定的錯誤」
誰能告訴我,我哪裏去錯了?
我嘗試了你的兩個解決方案,我得到了同樣的錯誤。我已經嘗試了與本地MySQL數據庫相同的代碼,並且我沒有收到任何錯誤,我認爲這是VB6和我嘗試使用的舊MySQL數據庫之間的問題。 – ctbs1