Bagaimana untuk Mewujudkan Sambungan ke Pangkalan Data MySQL dari Excel menggunakan VBA?

Bagaimanakah VBA boleh menyambung ke pangkalan data MySQL dalam Excel?

Menyambung ke Pangkalan Data MySQL menggunakan VBA

Percubaan untuk menyambung ke pangkalan data MySQL dalam Excel menggunakan VBA boleh mencabar pada masa-masa tertentu. Dalam kes anda, anda mengalami ralat semasa cuba mewujudkan sambungan.

Untuk berjaya menyambung ke pangkalan data MySQL menggunakan VBA, ikut langkah berikut:

<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>

Mengambil Data daripada Pangkalan Data

Setelah anda membuat sambungan, anda boleh mendapatkan semula data daripada pangkalan data menggunakan objek ADODB.Recordset. Begini caranya:

<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>

Perbandingan dengan PHP

Anda menyebut bahawa anda berjaya menyambung ke MySQL menggunakan PHP. Dalam PHP, anda menggunakan fungsi mysql_connect. Walau bagaimanapun, dalam VBA, kami menggunakan objek ADODB.Connection untuk mewujudkan sambungan.

Fungsi mysql_connect ialah fungsi PHP asli yang berinteraksi secara langsung dengan sambungan MySQL. Sebaliknya, ADODB.Connection ialah objek ActiveX yang menyediakan cara yang lebih generik untuk menyambung ke pelbagai pangkalan data, termasuk MySQL.

Nota Tambahan

• Pastikan anda telah memasang MySQL ODBC Connector.
• Option=3 dalam rentetan sambungan memastikan rentetan itu ditamatkan dengan koma bertitik.
• Pemalar adOpenDynamic dan adLockOptimistic digunakan untuk mengoptimumkan data mendapatkan semula.

Atas ialah kandungan terperinci Bagaimana untuk Mewujudkan Sambungan ke Pangkalan Data MySQL dari Excel menggunakan VBA?. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!