اخواني عند الخروج من البرنامج بأستخدام END تكون قاعدة البيانات مفتوحة وتظهر بالشكل التالي
data.mdb
data.ldb
وايضا البرنامج في ادارة المهام موجود
ماهو الكود الذي يغلق قاعدة البيانات ويقوم بعمل انهاء البرنامج من ادارة المهام
السلام عليكم
- إذا كنت مثلاً تستخدم مكتبة ال ADO في الإتصال بقاعدة البيانات ، ولفترض إن إسم متغير الكائن الذي يتعامل مع قاعدة البيانات هو DB وإسم المتغير الذي يتعامل مع الجدول هو RS ، إذاً لابد لك أن تغلق جميع الإتصالات بالجداول ثم الإتصال بقاعدة البيانات ، وذلك بالأمر DB.Close ونفس الشئ مع متغير الجدول ، ثم بعد ذلك قم بتحرير الذاكرة من الكائنات المحمله سواءً ال DB أو متغيرات الجداول ال RS وغيرها إن وجد وذلك بالأمر Set DB = Nothing , ثم بعد ذلك أغلق جميع الفورمات ثم في الأخير إستخدم الأمر End .
- تحياتي .
يعني يا اخي VB_Coder
يعني يتم استخدام db.close
قبل الامر END
نعم أخي الكريم وكذلك إلغاء تحميل الفورمات بالأمر Unload كلها قبل ال End .
الاتصال بقاعدة البيانات والجداول
db.close
rb.close
rs.close
mosh.close
end
هكذا يتم الكود ارجو التوضيح
السلام عليكم
- لفترض أن إسم الفورم الأول أو الرئيسي في البرنامج هو Form1 فسيكون كود إغلاق الفورمات كالتالي :
كود :
Dim Frm As Form
For Each Frm in Forms
IF Frm.Name <> "Form1" Then
Unload Frm
End IF
Next
- وكود إغلاق الكائنات إن كانت مفتوحة كالتالي :
- لا أعلم أي من هذه تكون كائنات قاعدة البيانات وأيها للجدوال ، لابد أن تغلق كائنات الجداول أولاً ثم كائنات قاعدة البيانات :
كود :
IF rs.State = 1 Then rs.close
IF db.State = 1 Then db.close
IF rb.State = 1 Then rb.close
IF mosh.State = 1 Then mosh.close
Set rs = Nothing
Set db = Nothing
Set rb = Nothing
Set mosh = Nothing
end
- تحياتي .
الله يبارك فيك وشكرا جزيل لك على ما قدمته من مساعدات
هههه والله ما انتبهت على كتابتك دخلت و رديت بسرعة ما اعرف والله انا لسا مبتدء
ahmed3d كتب :اسهل كود و هو end
صح لكن End تقوم بإجبار الانهاء بغض النظر عن الاكواد التي تعمل حتى اذا تستخدمها ما راح يتم اقتناص الحدث Form_Closing لذلك الافضل استخدام
Me.Close()
طبعآ مقصد كلامي VB.net واكيد ماكو فرق