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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : ارجو المساعدة في هذا المشروع (/showthread.php?tid=14910)

ارجو المساعدة في هذا المشروع - mahmoudelhossan104 - 27-02-16

لدي مشروع اريد اكماله ولدي مشكله في فتح قاعدة البيانات واضافة بيانات فيها
المشكلة  تظهر في الفورمة Frm_Mangment  عند الضفط على زر الاضافة يظر الخطاء في السطر التالي

(DB = OpenDatabase(App.Path & "\MyDb.mdb", 2, False)

فهل المشكلة في قاعدة البيانات مع العلم اني استخدم office 2010 وملف قاعدة البيانات بامتداد .mdb

رابط المشروع هنا  :      تحميل المشروع من هناl
لدي مشروع اريد اكماله ولدي مشكله في فتح قاعدة البيانات واضافة بيانات فيها
المشكلة  تظهر في الفورمة Frm_Mangment  عند الضفط على زر الاضافة يظر الخطاء في السطر التالي

(DB = OpenDatabase(App.Path & "\MyDb.mdb", 2, False)

فهل المشكلة في قاعدة البيانات مع العلم اني استخدم office 2010 وملف قاعدة البيانات بامتداد .mdb

رابط المشروع هنا  :      تحميل المروع من هناl

RE: ارجو المساعدة في هذا المشروع - ahmedabdelaliem - 27-02-16

اخي الكريم استخدم تقنية ال ADO افضل

بالتوفيق

RE: ارجو المساعدة في هذا المشروع - Ahmed_Mansoor - 27-02-16

أهلا أخي الكريم , ضع قبل DB وأيضا قبل RS كلمة SET , ضع الكود هكذا :

PHP كود :
Set DB = OpenDatabase(App.Path & "\MyDb.mdb")
Set Rs = DB.OpenRecordset("Usr_Table",)