mysql和vb6.0_有人给讲讲VB6.0和Mysql数据库连接的问题-工业支持中心-西门子中国...

我根据网上写了连接程序，运行时老是报错，哪位大神给看下，谁有源码给发下更好，1051383605@qq.com我的邮箱：

Option Explicit

Public conn As ADODB.Connection

Public rs As ADODB.Recordset

Public fld As ADODB.Field

'Public sql As String

Public Sub Command1_Click()

Set conn = New ADODB.Connection

conn.ConnectionString = "DRIVER={MySQL ODBC 8.0 ANSI Driver};" & _

"SERVER=localhost;" & "DATABASE=db_sss" & "UID=127.0.0.1;PWD=250520;DataBase=db_sss"

conn.Open

Set rs = New ADODB.Recordset

rs.CursorLocation = adUseClient

'sql = "select * from tb_warehouse_main"

'rs.Open sql, conn

MsgBox rs.RecordCount

End Sub

悬赏西币:1 | 解决时间：2018-09-11 20:39:06 | 提问者： 级高 - 新生&nbsp&nbsp第1级

问题ID：199259