خطاْ فى المسار

Me.OleDbConnection1.ConnectionString = "provider=microsoft.jet.oledb.4.0;datasource="اسم قاعدة البيانات.mdb"

ثم ضع قاعدة البيانات فى ملف ال bin مع الملف الexe

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

طريقة تانية

Me.OleDbConnection1.ConnectionString ="provider=microsoft.jet.oledb.4.0;pasward="""";user id=admin; & " datasource=" & application.startuppath & "\" & "اسم قلعدة البيانات.mdb"

"وشكرا

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

اخي الكريم شكرا على المساعده

أخي

الطرقه الأول نفعت بس إذا بحط ملف exe إذا بحطه فى قائمة البرامج يعطين خطا عن المسار لازم يكون البرنامج ملف exe فى فوالد مع القاعده

والطريقه الثانيه لم تنفع

اذا اردت ان تضع قاعدة البيانات في مجلد غير مجلد التنزيل تحتاج الى برنامج اعداد متقدم يوفر مثل هذه الخيارات بحيث يمكنك من تحديد مسار القاعدة البيانات .

اما بالنسبة لحل Attya فهو الحل الذي يستخدمه معظم البرامج بحيث تكون قاعدة البيانات في نفس مجلد البرنامج او مجلد اخر في نفس هذا المجلد اما اذا اردت غير ذلك فعليك وضع مسار قاعدة البيانات في مكان ما مثل Registry او ملفات Config بحيث تقوم بتغييرها يدويا بعد تنزيل البرنامج .

أخوي جزاك الله خير

بس ما فهمة النقطه الأخيره

وش الفايده إذا بتغيرها يدويا

الرجاء شرح أكثر وإن امكن مثال

يدويا ولمرة واحدة اي اذا وضعتها في ملف تفتح الملف وتقوم بالتغيير الموقع

هل قصدك ان البرنامج لما تشغله يضع لنفسه قاعدة البيانات فى فولدر E مثلا

اجعل الكود الاتى

طبع فى اعلى الفورم اكتب

IMPORT SYSTEM.IO

وفى حدث الاتصال اكتب

DIM X AS FILE

If X.Exists("E:\DATABASE NAME.MDB") Then

MSGBOX("تم التحقق من وجود قاعدة البيانات")

ELSE

IF MSGBOX("قاعدة البيانات غير موجودة هل تريد انشاء قاعدة بيانات جديدة",MSGBOXSTYLE.OKCANCEL)=

MSGBOXRESULT.OK THEN

X.Copy(Application.StartupPath & "\DATBASE NAME.mdb", "E:\DATABASE NAME.mdb")

MSGBOX("تم انشاء قاعدة البيانات")

END IF

END IF

بعد كده ضع حدث الاتصال زى ما قلت لك بس فى جزء

;DATASOURCE="E:\DATABASE NAME.MDB"

جرب وقل لى

وشكرا