Как VBA подключиться к базе данных MySQL в Excel?

Подключение к базе данных MySQL с помощью VBA

Попытка подключения к базе данных MySQL в Excel с использованием VBA иногда может быть непросто. В вашем случае вы столкнулись с ошибкой при попытке установить соединение.

Чтобы успешно подключиться к базе данных MySQL с помощью VBA, выполните следующие действия:

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

Извлечение данных из базы данных

После того как вы установили соединение, вы можете получить данные из базы данных с помощью объекта ADODB.Recordset. Вот как:

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

Сравнение с PHP

Вы упомянули, что смогли успешно подключиться к MySQL с помощью PHP. В PHP вы использовали функцию mysql_connect. Однако в VBA мы используем объект ADODB.Connection для установления соединения.

Функция mysql_connect — это встроенная функция PHP, которая напрямую взаимодействует с расширением MySQL. С другой стороны, ADODB.Connection — это объект ActiveX, который обеспечивает более универсальный способ подключения к различным базам данных, включая MySQL.

Дополнительные примечания

• Убедитесь, что у вас установлен MySQL ODBC Connector.
• Опция=3 в строке подключения гарантирует, что строка завершается точкой с запятой.
• Константы adOpenDynamic и adLockOptimistic используются для оптимизации данных. поиск.