如何在VB連接Mysql

首先下載 MyODBC下載stable或development release
以下介紹兩種方法

data Control 方法
先加入data control 控制項

加入以下程式碼:

Private Sub Form_Load()
Data1.DefaultType = 1
Data1.Connect = "ODBC;UID=user;PWD=pass;DSN=sample-MySQL;"
'uid=用戶名 pwd=密碼 e.g uid=test pwd=vb
Data1.RecordSource = "select * from vb" 'SQL陳述式

End Sub

Private Sub Form_Activate() '示範用,非必要
Print Data1.Recordset.Fields(0).Name
Print Data1.Recordset.Fields(0).Value
End Sub

ado data control 方法
我用ado data control 和 datagrid 做示範,先加入這些控制項。

在adodc1上按adodc的屬性

選使用ODBC資料來源名稱,選sample-mysql(不過好像你要預先設定好myodbc)

最後加入以下程式碼:

Private Sub Form_Load()
Adodc1.CommandType = adCmdTable
Adodc1.RecordSource = "test" 'table name
Set DataGrid1.DataSource = Adodc1
End Sub
 

上一頁