منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

عند ملاحظتي ردك في مشاركة رقم #4 انك قلت تستخدم اكسس 2007 وفي مشاركتك رقم #7 يتضح في الصورة انك تستخدم كود أتصال أكسس 2003
فإذا كنت تستخدم أكسس 2007 قم باستبدال كلمة mdb في كود الأتصال بهذا الكلمة accdb وإيضا بدلا من رقم 4 ضع رقم 12 وإيضا بدلا من كلمة jet ضع ace

شكرا لك اخي الكريم جزاك اله خيرا
ولاكن بقي الخطأ في GB.Open()

Fichier 'C:\Users\l-info\Desktop\aplication biloo\VB\VB\bin\Debug\gbxdb.mdb' introuvable.

السلام عليكم ورحمة الله وبركاته

biloo.vb كتب :شكرا لك اخي الكريم جزاك اله خيرا
ولاكن بقي الخطأ في GB.Open()

Fichier 'C:\Users\l-info\Desktop\aplication biloo\VB\VB\bin\Debug\gbxdb.mdb' introuvable.

حسب ترجمة جوجل
[COLOR="#FF0000"]ملف غير موجود.

تأكد من إسم ملف قاعدة البيانات ونوعه.




السلام عليكم ورحمة الله وبركاته
[/COLOR]

خلاصة الكلام الذي ذكرته في مشاركتي رقم #11 هو

لو كنت تسخدم قاعدة بيانات أكسس 2007

قم باستبدال الكود التالي

PHP كود :

Dim Con As String ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\gbx.mdb" 


بهذا الكود

PHP كود :

Dim Con As String ="Provider=Microsoft.ace.OLEDB.12.0;Data Source=" & Application.StartupPath & "\gbx.accdb"