mysql - （Mac Excel 2011 net.VB）でMySQLサーバーからデータを読み取る方法は？

Question

Mac Excel 2011 net.VBを使用して、MySQLサーバーからデータを読み取ったり送信したりする方法

前もって感謝します ！

Answer 1

出典： http： //bit.ly/Qfqvwb

1. mysqlから3.5.1odbcドライバーをインストールします：http：//dev.mysql.com/downloads/connector/odbc/3.51.html（簡単クリッククリック）

2. ODBC接続をセットアップする

   Private Sub btnTestReadInMysqlData_Click()
   
   Dim objDB, arrRecord, strRecord, strOutput
   Dim oRS, nRec, oFld
   Dim row
   
   'Database connection & select all from Table
   Set objDB = DBConnect()
   Set oRS = objDB.Execute("SELECT * FROM members")
   
   'Dump Records from Table
   nRec = 0
   row = 1
   Do While Not oRS.EOF
     For Each oFld In oRS.Fields
   
       'WScript.Echo oFld.Name & " = " & oFld.Value
   
       Worksheets("Tabelle1").Cells(row, 1).Value = oFld.Value
   
       'increment
       row = row + 1
   
     Next
     oRS.MoveNext
   Loop
   
   End Sub
   
   
   Function DBConnect()
   Set objDB = CreateObject("ADODB.Connection")
   objDB.Open "websitedata"
   Set DBConnect = objDB
   End Function