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

نسخة كاملة : مشكلة في حفظ مكان قاعدة البيانات
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
عندي مشكلة باختصار عندي برنامج يعمل علي الشبكة اقوم بتحديد مكان قاعدة البيانات عن طريق CommonDialog1 لاول مرة فقط ويقوم بحفظ مكان قاعدة البيانات في text
ويعمل البرنامج جيد ولاكن لايعمل البرنامج الا بوجود قاعدة البيانات مع البرنامج والمفروض ان قاعدة البيانات علي الشبكة اريد حل مرفق البرنامج
???????????

ممدوح الخطيب

السلام عليكم ورحمة الله وبركاتة
يتم حفظ مسار قاعدة البيانات في الريجستري الخاص بالجهاز وعند تشغيل البرنامج يقرا المسار
ارفق لك برنامج كنت عاملة واشتغل على شبكة بنجاح هتلاقي عندك في Form 3 يحفظ مسار قاعدة البيانات وفي mainform في التحميل يقرا مسار القاعدة من الريجستري

البرنامج

http://www.mediafire.com/download/3acrzt...y/aqar.rar
جاري التجربة وسيتم التواصل حتي الانتهاء
جزاك الله خير
وبارك الله فيك
تأكد من صلاحيات الشبكة
المشكلة عندي اني لازم كل مرة احدد مكان قاعدة البيانات علشان البرنامج يشتغل معايا مع العلم ان مسار قاعدة البيانات محفوظ في التكست اما لو قاعدة البيانات في نفس المجلد الموجود مع البرنامج بتشتغل عادي
انتا ممكن تجرب تنقل البرنامج خارج المجلد وشغل البرنامج وحدد المسار لاول المرة البرنامج هيشتغل تمام لاكن لو اغلقت البرنامج وفتحته مرة اخري هتلاقي ان المسار محفوظ في التكست وعند الضغط علي form للانتقال ال form الاخر مش هيتعرف علي مكان قاعدة البيانات لازم تحدد المكن في كل مرة
ارجو التجربة
السلام عليكم ورحمة الله وبركاتة

اخي البرنامج يعمل بشكل جيد حتى عند نقله من مكاان الى اخر

لكن انا اجريت لك تعديل بسيط جداً

جرب كدا ورد عليا
جاري التجربة اشكرك جزيلا
http://www11.0zz0.com/2014/02/01/17/549589283.jpg
اسف علي التعب ربنا يجزيكم خير
باختصار
وضحت مااريد بالصورة
اريد ان اوجه data source ل text1 و text1 به مسار قاعدة البيانات كما في الصورة او عن طريق كود واشكركم جزيلا
المشكلة عندي عن استخراج برنامج تنفيذي exe يعمل بشكل جيد عند نقله في مكان بعيد عن قاعدة البيانات كل مرة لابد من تحديد مكان قاعدة البيانات حتي يعمل
واسف علي الاطاله
واشكرك مقدما

ممدوح الخطيب

كود :
db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & Form1.Text1 & "'"
الصفحات : 1 2