ماذا يحدث - ارجو مساعدتي - قاعدة بيانات

أخي العزيز ، لقد واجهتني هذه المشكلة من قبل وعانيت منها كثيراً ثم اكتشفت أن سبب هذه المشكلة بسيط وحلها أبسط :

حيث أن فيجوال بيسيك 6 أصدر في عام 1998 وبرنامج الأكسيس الذي تتعامل معه أصدر في عام 2000 وحل هذه المشكلة هو تحويل قاعدة البيانات إلى أكسيس إصدار 97 وذلك بفتح قائمة tools ثم database utilities ثم convert database ثم to access 97 file format

abboodd dude

الأخ الفاضل ...

أولاً تأكد من وجود أخر أصدارات ميكروسوفت من Jet و MDAC فهما يحتويان على الملفات والمكتبات الأساسية لتشغيل برامج قواعد بيانات ميكروسوفت وبالأخص MS-Access، فا Jet 4.0 تحتوى على مكتبة DAO 3.60، المطلوبة لتشغيل ملفات Access2000، واستخدم فى برنامجك DAO 3.60 بدلاً من DAO 3.51، كما موضح

، وللإلتفاف حول هذه المشكلة، استخدم الكود التالى فى حدث Form_Load

Private Sub Form_Load()
	Dim db_Path As String
	Dim db As Database
	Dim rs As Recordset

	db_Path = App.Path + "\db1.mdb"
	Set db = DBEngine(0).OpenDatabase(db_Path)
	Set rs = db.OpenRecordset(Data1.RecordSource)

	Set Data1.Recordset = rs
End Sub

وهو يعتمد على فتح قاعدة البيانات بإستخدام DBEngine، ثم تخصيص الـ rs للأداة Data1

شكراً

_____.zip

كما قال الأخ abboodd dude فقط يحتاج إلى تحويل من 2000 إلى 97

وستجد المشروع بالمرفقااات

تحيااااااااتي

_____.rar

مشكووووووور اخي abboodd dude حاولت ان اسوي كما فعلت لكنني كنت اذهب الى file و ليس tools وهذا هو خطاي البسيط

مشكووور اخي Eng. Usama El-Mokadem و اعرف بانك عضو مميز و طريقة 100% ناجحة لكن لم اجربها لانني افضل الطريقة التي تعلمتها من قبل

اشكرك ايضا اخي أبو فهيد

تحياتي مبرمج مبتدا