如何使用 VBA 从 Excel 建立与 MySQL 数据库的连接？

VBA 如何在 Excel 中连接到 MySQL 数据库？

使用 VBA 连接到 MySQL 数据库

尝试连接使用 VBA 在 Excel 中访问 MySQL 数据库有时可能具有挑战性。在您的情况下，您在尝试建立连接时遇到错误。

要使用 VBA 成功连接到 MySQL 数据库，请按照以下步骤操作：

<code class="vb">Sub ConnectDB()
    Dim oConn As ADODB.Connection

    Set oConn = New ADODB.Connection

    Dim str As String
    str = "DRIVER={MySQL ODBC 5.2.2 Driver};" & _
                                            "SERVER=sql100.xtreemhost.com;" & _
                                            "PORT=3306" & _
                                            "DATABASE=xth_9595110_MyNotes;" & _
                                            "UID=xth_9595110;" & _
                                            "PWD=myPassword;" & _
                                            "Option=3"

    ' Open the connection
    oConn.Open str
End Sub</code>

从以下位置获取数据数据库

建立连接后，您可以使用 ADODB.Recordset 对象从数据库检索数据。具体方法如下：

<code class="vb">Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

' Execute a query
sql = "SELECT * FROM ComputingNotesTable"
rs.Open sql, oConn, adOpenDynamic, adLockOptimistic

' Retrieve the data
Do Until rs.EOF
    Range("A1").Select
    ActiveCell = rs.Fields("Headings")
    rs.MoveNext
Loop

' Clean up
rs.Close
oConn.Close
Set oConn = Nothing
Set rs = Nothing</code>

与 PHP 的比较

您提到您能够使用 PHP 成功连接到 MySQL。在 PHP 中，您使用了 mysql_connect 函数。然而，在VBA中，我们使用ADODB.Connection对象来建立连接。

mysql_connect函数是一个原生PHP函数，直接与MySQL扩展交互。另一方面，ADODB.Connection 是一个 ActiveX 对象，它提供了一种更通用的方式来连接到各种数据库，包括 MySQL。

附加说明

• 确保已安装 MySQL ODBC Connector。
• 连接字符串中的 Option=3 确保字符串以分号终止。
• adOpenDynamic 和 adLockOptimistic 常量用于优化数据检索。

以上是如何使用 VBA 从 Excel 建立与 MySQL 数据库的连接？的详细内容。更多信息请关注PHP中文网其他相关文章！