السلام عليكم ورحمة الله وبركاته
عندي سؤال
إذا حذفت سجل من نموذج... هل يوجد كود لزر يمكنني من استرجاع السجل بعد الحذف؟؟
وجزاكم الله خيرا
كيف أعمل زر استرجاع سجل في نموذج
وعليكم السلام ورحمة الله وبركاته...
ما حذف لا يعود :D
لذا ننصح دوما بتفعيل خاصية تاكيد حذف السجلات والتروي والتفكير قبل الحذف...
ولكن الا يوجد مخرج....
يمكن ببعض الحيلة وتغيير الية الحذف
كيف ذلك....
تابعي معنا ولكن بشىء من الصبر :
1- نفترض ان الجدول المرتبط به نموذجك اسمه CurData وحقوله (رقم الفاتورة – الاسم – المبلغ)
2- لننشىء جدول فارغ من البيانات ومماثللا للسابق في بنيته تماما وليكن باسم OldData
3- الان سننشىء استعلام الحاق من الجدول CurData الى الجدول OldData طبقا لمعيار رقم الفاتورة ولنسم الاستعلام App1
4- استعلام الحاق اخر من الجدول OldData الى الجدول CurData بنفس المعيار وليكن باسم App2
5- انشاء استعلام حذف من الجدول OldData طبقا لمعيار رقم الفاتورة وليكن ياسم Dl
6- الان ستتم عملية الحذف من النموذج ولكن من خلال كود تحت زر امر وليس من خلال المفتاح Del
7- قبل السطر المسئول عن الحذف سنقوم بتشغيل الاستعلام App1 لتخزين البيانات بالجدول OldData
ويكون ذلك من خلال الدالة DoCmd.openQuery
8- عند ضغط زر الحذف سيتم تخزين السجل بالجدول OldData وحذفه من الجدول الاصلي
9- عملية الاستعادة من خلال مربع كمبوبوكس داخل نموذج نختار من خلاله رقم الفاتورة المطلوب استعادتها + زر امر نكتب تحته كود الاستعادة
10- كود الاستعادة ما هو الا تشغيل الاستعلام App2 لنقل السجل من جدول OldData الى جدول CurData
11- بقي ان نحذف من الجدول OldData السجل الذي تمت استعادته وذلك بتشغيل الاستعلام Dl
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
:unsure: كلللللللللل ده !!!!!!!!!!!!!!!!!!!!!!!
اشكرك على المجهود ساحاول تطبيقه
:ty:
أم يوسف كتب::unsure: كلللللللللل ده !!!!!!!!!!!!!!!!!!!!!!!اشكرك على المجهود ساحاول تطبيقه
:ty:
لا عليك..
هذا مثال مرفق
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
تسلم ياخى على الشرح