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

بكل بساطة ملف قاعدة البيانات غير موجود في المسار الذي حددته

لا تضع مسار محدد في نص الاتصال لانه سيكون مقتصر على جهازك فقط

(20-09-20, 09:26 AM)Anas Mahmoud كتب : [ -> ]بكل بساطة ملف قاعدة البيانات غير موجود في المسار الذي حددته

لا تضع مسار محدد في نص الاتصال لانه سيكون مقتصر على جهازك فقط

اعلم دلك كيف استخرج المشروع بدون المسار لا اعرف كيف

قم بإنشاء متغير في الSettings الخاص بالمشروع باسم s1 مثلا

ضع هذا الكود في بداية الحدث Form1_Load

(20-09-20, 02:23 PM)mrfodri كتب : [ -> ]قم بإنشاء متغير في الSettings الخاص بالمشروع باسم s1 مثلا

ضع هذا الكود في بداية الحدث Form1_Load

كود :

       If IO.File.Exists(My.Settings.s1) = False Then
           Dim OpenFileDialog1 As New OpenFileDialog
           OpenFileDialog1.Filter = "database|*.mdb"
           If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.Cancel Then Close()
           My.Settings.s1 = OpenFileDialog1.FileName
       End If
       con = New OleDbConnection(" Provider = Microsoft.Jet.OLEDB.4.0;Data Source=" & My.Settings.s1 & "")

اين اجد settings الخاص بالمشروع !!!!
لم افهم اخي كيف دلك
ومع دلك حاولت وضعت متغير اسمه s1 ثم وضعت الكود في الفورم لود
واضن my .settings هو اسم قاعدة البيانات اكسس غيرته كدلك ولكن تظهر
لي اخطاء اخترة الخيار الثالث generation proprety stub for client ....
واستخرجة البرنامج ونفس المشكل و الرسالة

لاتوجد طريقة سحرية ، فقط عدل نص الاتصال في الجزء Data Source الى مسار قاعدة البيانات الذي هو بجانب البرنامج 



ليصبح نص الاتصال مثلا :


الان كل ما تحتاجه ان يكون ملف قاعدة البيانات بجانب البرنامج

---

تعقيبا على رد الاخ ، Settings البرنامج هي طريقة لتخزين قيم تحتاجها طوال عمل البرنامج ، مثلا مسار قاعدة البيانات ، هذه نحصل عليها مرة ونريد الاحتفاظ به للمرات التالية التي سيعمل بها البرنامج


للوصول للسيتينج 

[attachment=25738]
[attachment=25739]

الان اصبح لديك setting اسمه s1 استخدم كود الاخ كما هو لا تعدل شيء

(20-09-20, 03:24 PM)Anas Mahmoud كتب : [ -> ]لاتوجد طريقة سحرية ، فقط عدل نص الاتصال في الجزء Data Source الى مسار قاعدة البيانات الذي هو بجانب البرنامج 

كود :

Data Source=|DataDirectory|\Client.mdb;

ليصبح نص الاتصال مثلا :

كود :

Provider = Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\Client.mdb;

الان كل ما تحتاجه ان يكون ملف قاعدة البيانات بجانب البرنامج

---

تعقيبا على رد الاخ ، Settings البرنامج هي طريقة لتخزين قيم تحتاجها طوال عمل البرنامج ، مثلا مسار قاعدة البيانات ، هذه نحصل عليها مرة ونريد الاحتفاظ به للمرات التالية التي سيعمل بها البرنامج


للوصول للسيتينج 




الان اصبح لديك setting اسمه s1 استخدم كود الاخ كما هو لا تعدل شيء

زاد الاشكال

---

(20-09-20, 03:24 PM)Anas Mahmoud كتب : [ -> ]لاتوجد طريقة سحرية ، فقط عدل نص الاتصال في الجزء Data Source الى مسار قاعدة البيانات الذي هو بجانب البرنامج 

كود :

Data Source=|DataDirectory|\Client.mdb;

ليصبح نص الاتصال مثلا :

كود :

Provider = Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\Client.mdb;

الان كل ما تحتاجه ان يكون ملف قاعدة البيانات بجانب البرنامج

---

تعقيبا على رد الاخ ، Settings البرنامج هي طريقة لتخزين قيم تحتاجها طوال عمل البرنامج ، مثلا مسار قاعدة البيانات ، هذه نحصل عليها مرة ونريد الاحتفاظ به للمرات التالية التي سيعمل بها البرنامج


للوصول للسيتينج 




الان اصبح لديك setting اسمه s1 استخدم كود الاخ كما هو لا تعدل شيء

عدلتها واستعملة نفس الكود ولازال الاشكال كما في الصوره

---

ارجعت الكود الاول الدي اعطاني الاخ لم يعطني اخطاء المشكل الان في المسار

عدل اول سطر في الكود فوق بعد Public Class Form3

الى

Dim con as OleDbConnection فقط لتعمل طريقة السيتنج

(20-09-20, 03:55 PM)Anas Mahmoud كتب : [ -> ]عدل اول سطر في الكود فوق بعد Public Class Form3

الى

Dim con as OleDbConnection فقط لتعمل طريقة السيتنج

عدلتها نفس المشكل

اقفل القوس بطريقة سليمة