VB连接MYSQL问题！

Question

错误描述： [Mircsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序 :
 我的代码   Function db() As Connection
    
    On Error GoTo VB_Err
    
    Dim conn As ADODB.Connection
    
    Set conn = New ADODB.Connection
    conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
    "SERVER = 127.0.0.1;" & _
    "DATABASE= kefu;" & _
    "UID=root;PWD =1234;OPTION = 3"
    
    conn.Open
    
    Set db = conn
    
    
VB_Err:
    If Err.Number <> 0 Then
        MsgBox "错误描述：" & Err.Description, vbInformation + vbOKOnly, "错误"
    End IfEnd FunctionPrivate Sub Command1_Click()
    Dim conn As Connection
    Set conn = db
    
    Dim rs As ADODB.Recordset
    Dim sql As String
    sql = "select *  from  kefu_worker;"
    Set rs = conn.Execute(sql)
    Do While Not rs.EOF
       
        MsgBox rs("id")
        
    Loop
    
    conn.Close
    
End Sub
请高手指教啊！

Answer 1

既然是用ODBC连接的，怎么可能写个IP上去呢？

Answer 2

要装OBDC-MYSQL数据库连接驱动，mysql-connector-odbc-3.51.12-win32http://download.csdn.net/source/1027135

Answer 3

属性名应该是 User 和 Password。
UID 和 PWD 用在 .Net 的 MySql.Data.MySqlClient.MySqlConnection 中。

Answer 4

UID 和 PWD是可行的，我认为还是没装ODBC MYSQL驱动
Con.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};Server=" _
                & DBServer _
                & ";UID=" & DBUser _
                & ";PWD=" & DBPwd _
                & ";database=" & DBName