无法连接到 MySQL 数据库 - 未指定默认驱动程序

Question

我正在尝试从 VBS 脚本中连接到 MySQL 数据库，但我无法通过特定错误 -

[Microsoft][ODBC Driver Manager] 未找到数据源名称且未指定默认驱动程序

我正在运行 64 位 Windows 7（从其中运行脚本），并且 MySQL DB 正在 32 位 Linux 上运行。我在 Windows 7 上尝试了 32 位和 64 位驱动程序，从 MySQL 网站上的Download Connector/ODBC page 下载，但错误仍然存​​在。

我找到了几页关于这个问题的页面（包括this one），但我一直无法解决我的问题。如何建立我需要的数据库连接？

Dim Connection : Set Connection = CreateObject("ADODB.Connection")
Dim RS : Set RS = CreateObject("ADODB.Recordset")

Dim dbConStr : dbConStr = "Driver={MySQL ODBC 5.3.6 Driver};Server=https://mysqlserver.mydomain.com;Data Source=dsn_hb; Database=MyDatabase; User=MyUser; Password=MyPassword;"

Connection.Open dbConStr
RS.open "SELECT * FROM apklibrary.djg_local_archive_scans", Connection, 3
RS.MoveFirst

While Not RS.EOF
    Call MsgBox (RS.Fields(0), vbOkOnly, "POW!")
    RS.MoveNext
Wend

Connection.close

Set Connection = Nothing
Set RS = Nothing

Call MsgBox ("No more records to show you.", vbOkOnly, "Job done")

Answer 1

指定的驱动程序名称无效。有效的 MyODBC 5.3 驱动程序名称：

{MySQL ODBC 5.3 ANSI Driver}
{MySQL ODBC 5.3 Unicode Driver}

另一个问题是Server。您应该指定不带https:// 的服务器地址。

另外，由于您的用户名和密码Data Source=dsn_hb; 看起来多余，请将其删除。如果不是，请给我们更多详细信息。

所以，试试这个：

dbConStr = "DRIVER={MySQL ODBC 5.3 Unicode Driver};Server=mysqlserver.mydomain.com;Database=MyDatabase;User=MyUser;Password=MyPassword;"