Question

我已将Microsoft Active DataX对象添加到Excel文件中。我还下载了mySQL ODBC Connector。

以下是VBA中的连接代码：

Sub ConnectDB2()
    Dim rs
    Dim Conn
    Dim cmdString

    Set rs = CreateObject("ADODB.Recordset")
    Set Conn = CreateObject("ADODB.Connection")

    Conn.ConnectionString = "DRIVER={MySQL ODBC 5.3 Driver};SERVER=52.74.22.123;DATABASE=sads;USERNAME=shridas;PASSWORD={KJH3232C8fed5AD!87367$Bds};"
    Conn.Open
    cmdString = "Select * from order"
    Set rs = Conn.Execute(cmdString)
    Conn.Close
End Sub

但我收到一个错误： '-2147467259（80004005）'：自动化错误，未指定错误。

你能帮我解决这个问题。

Answer 1

更改此行中的USERNAME参数：

    Conn.ConnectionString = "DRIVER={MySQL ODBC 5.3 Driver};SERVER=52.74.22.123;DATABASE=sads;USERNAME=shridas;PASSWORD={KJH3232C8fed5AD!87367$Bds};"

到USER

Conn.ConnectionString = "DRIVER={MySQL ODBC 5.3 Driver};SERVER=52.74.22.123;DATABASE=sads;USER=shridas;PASSWORD={KJH3232C8fed5AD!87367$Bds};"

在我的机器上，我还必须使用不同的ODBC名称：

DRIVER={MySQL ODBC 5.3 ANSI Driver}

VBA到mysql的连接

1 个答案: