درس فى الربط بقواعد بيانات MySQL

أولا يجب تحميل قاعدة بيانات MySQL من هذا الرابط :

http://mysql.crihan.fr/Downloads/MySQL-4.0...-4.0.18-win.zip

ثم تحميل ال Driver الخاص بها من هذا الرابط:

http://dev.mysql.com/get/Downloads/MyODBC3...n.msi/from/pick

بعد هذا قم بتشغيل الملفwinmysqladmin.exe و تجده فى هذا المسار:

C:\MySQL\bin

ثم أضف مكتبة ال ADO من Refrence

و ضع على الفورم DataGrid

و أضف الكود التالى :

'
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
'
Private Sub Form_Load()
'
db.CursorLocation = adUseClient
db.Provider = "MySqlProv"
db.Open "Data Source=MySQL;"

rs.Open "SELECT * FROM db", db, adOpenStatic, adLockPessimistic

Set DataGrid1.DataSource = rs
End Sub

منقول للفائدة