连接错误:Excel VBA到远程MySQL

我有两台工作的电脑,在同一个networking,相同的公共IP。 我能够成功地连接到我的mySQL数据库从本地主机在计算机上1.我试图通过Excel VBA从计算机2连接到相同的数据库。 我试过了

mysql> GRANT ALL PRIVILEGES ON database.* to user@'ip' IDENTIFIED BY 'pass' mysql> GRANT ALL PRIVILEGES ON database.* to user@'%' IDENTIFIED BY 'pass' 

Excel VBA:

 Dim strServer As String Dim strDBName As String Dim strUserID As String Dim strPasswd As String strServer = "ipaddress" strDBName = "dbname" strUserID = "userid" strPasswd = "pass" Set oConn = New ADODB.Connection With oConn .ConnectionString = "Driver={MySQL ODBC 5.2 Unicode Driver};" & _ "Server=" & strServer & ";Port=3306;" & _ "Database=" & strDBName & ";" & _ "Uid=" & strUserID & ";" & _ "Pwd=" & strPasswd & ";Option=3;" .Open End With MsgBox "Connection Successful" 

Excel VBA错误:

“运行时错误-2147467259(800004005)”:[MySQL] [ODBC 5.2(w)Driver]无法连接到'ip'(10061)上的MySQL服务器

我的语法是closures的,还是我错过了什么? (我还有其他3台工作电脑,在不同的networking上,我想授予类似的权限,因为他们都使用共享的Excel工作簿)。

也许GRANT ALL PRIVILEGES ON database.* 'user'@'ip' IDENTIFIED BY 'pass'会为你做诡计。 根据MySQL文档 ,用户名也在引号中。