[تنبيه - عنوان غير مناسب : ]اللي يحس نفسه محترف في البرمجه يجي يشوف لي حل؟؟

افاااا ياذا العلم يعني البرنامج تعجيزي لهذي الدرجه

وينكم يامحترفين تكفووووووووووووووووووووووووووون

ياعالم وينكم الفزعه يارجال افااااااااااااااااااااااااااااااااااااااا

قلت تكفون

مااظن ان في عضو فيكم ماهو محترف ماشاء الله عليكم تبارك الرحمن

ياجماعه اعذروني تذكرت ان كلمة المرور الأفتراضيه من القاعده ماتشتغل عندكم

اااااااااسف جداااااا اللي يبي كلمة الادمن للبرنامج يرسل لي خاااص لانه رقم  جوال

اااخاااف اكتبه هنا والاداره تحذفني او تعطيني مخالفه

أخي الكريم

المسألة سهلة

ادخل على خصائص أداة قواعد البيانت

Data1

وفي خاصية

DatabaseName

امسح احرف

c:\

بحيث يظل اسم ملف قاعدة البيانات

المعادلات الكيميائيه.mdb

وكذاك الأمر بالنسبة للشاشات الأخرى

وبذلك يعمل البرنامج

الأخ الكريم/الأخت الكريمة

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

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

نود تنبيهك أن العنوان غير مناسب.

الرجاء اختيار عنوان مناسب أكثر في مواضيعك القادمة، وهذا بمثابة إشعار للأهمية.

وفي حال التكرار سيتعرض موضوعك للإغلاق والحذف!!!

قواعد المشاركة

/index.php?showtopic=29343

شاكرين لكم حُسن تعاونكم

اخوي romiovb سويت الكلام اللي قلت لي عليه

وضبط في جهازي لكن الأجهزه الثانيه ماضبطت

ياليت توضح اكثر يااخي

يا اخي

ضع هذا السطر فى

form load

لكل الفورم

Data1.DatabaseName = App.Path +"\" + " المعادلات الكيميائيه.mdb"

Data1.DatabaseName = App.Path +"\123.mdb"

123 هو اسم قاعدة البيانات

Private Sub Form_Load()

If App.PrevInstance = True Then

MsgBox "لا يمكن تشغيل أكثر من نسخة من البرنامج"

Unload Me

Exit Sub

End If

Data1.DatabaseName = App.Path +"\" + " المعادلات الكيميائيه.mdb"

End Sub

السلام عليكم اخي الرائد

ترقب مني كل المساعدة في هذه المشكلة

وسوف احاول

بالتوفيق

مرحبا جميعا

اخي العزيز الرائد لقد عدلت لك على المشروع وعملت الذي طلبته

لكن بسرعة بصراحة لاني بفترة امتحانات

ارجو ان يخدمك

بالتوفيق

vb project.rar