الأخوة الأفاضل
الكود التالى لربط لربط الفيجوال بيسك بقاعدة بيانات على سيرفر شخصى وهو يعمل جيدا على نفس السيرفر مع استبدال رقم الأى بى بـ "Localhost" ولكن اذا اردت ان اتعامل مع قاعدة البيانات من جهاز أخر متصل بالسيرفر على شبكة محلية وكتابة رقم الأبى الخاص بالسيرفر تظهر رسالة خطأ
وها هو الكود
Dim db As New ADODB.Connection
Dim Rs As New ADODB.Recordset
db.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
& "SERVER=10.0.0.105;" _
& " DATABASE=DataN;" _
& "UID=root;PWD=000000; OPTION=3"
db.Open
Rs.Open "select * from DataN_1", db, adOpenStatic, adLockPessimistic
db.Closeعلما بأنى اذا استبدلت Local host برقم الأبى على السيرفر تظهر نفس الرسالة واليكم صورة الرسالة
