مطلوب من الخبراء الدخول

أول : شئ يجب أن يكون السيرفر الذي علية mysql

يدعم سحب قواعد البيانات عن طريق الأيبي

ثانياً : يجب تنزيل أدارة الربط الموجوده على موقع mysql أو تجدة في المنتدى http://www.arabteam2000.com/forums/index.p...pic=68900&st=15

ثالثا : تعمل إعداد إتصال بواسطة ODBC ابدأ -> إعدادات -> لوحة التحكم -> أدوات إدارية -> مصادر البيانات (ODBC)

رابعا : تفتح مشروع جديد وتضيف للمشروع ADO

خامساً: اضف كود الإتصال

وهذا مثال

Private Sub Form_Load()
Dim mydbo As ADODB.Connection
Dim rs As Recordset


Set mydbo = New ADODB.Connection
mydbo.ConnectionString = "DSN=mysql_connct"
mydbo.Open

Set rs = mydbo.Execute("SELECT * FROM text ORDER BY texst_id")
For i = 0 To 500
If (rs.EOF <> True) Then
Text1.Text = rs.Fields(1)

rs.MoveNext
End If

Next i
End Sub

مشكور اخي على التفاعل معي جزاك الله خيرا واسف على الازعاج واخذ الوقت منك في كتابة الرد المفيد

ثانك يو