اخوتي ارجوا شرح هذا السطر
prevbookmark = Adodc1.Recordset.Bookmark
وماذا تعني Bookmark بالتحيد
اريد شرح لهذا
السلام عليكم...
الـ BookMark هي بالعربي "إشارة مرجعية".
بعض محركات قواعد البيانات تعطي لكل سجل (Record) في مجموعة السجلات (Recordset) رقماً أو رمزاً خاصاً لا يتكرر بين السجلات يسمى الـ BookMark.
الخاصية BookMark من النوع Variant و نستخدمها للإشارة إلى سجل معين.
أحد أشهر الأمثلة في استخدام الـ BookMarks هو العودة للسجل السابق في حالة فشل عملية البحث، كما في المثال التالي:
- Dim BkMrk
- ' الاحتفاظ بالإشارة المرجعية للسجل الحالي قبل القيام بالبحث
- BkMrk = Adodc1.Recordset.BookMark
- ' إجراء البحث
- Adodc1.Recordset.Find "ID = " & Text1.Text, 0, adSearchForward
- ' إذا تم إيجاد السجل المطلوب فإن مؤشر السجلات سيقف على ذلك السجل، و هو المطلوب
- ' أما إذا لم يتم إيجاد السجل المطلوب فإن مؤشر السجلات سيذهب إلى نهاية مجموعة السجلات - ما بعد ا
لسجل الأخير - ' و لهذا يجب إعادته إلى السجل الذي كان واقفاً عنده
- If Adodc1.Recordset.Eof Then
- MsgBox "لا يوجد سجل مطابق"
- Adodc1.Recordset.BookMark = BkMrk
- End If
لاحظ أنه عند صبط الخاصية BookMark على قيمة معينة فإن مؤشر السجلات سيذهب إلى السجل الذي يحمل تلك الإشارة المرجعية.
نرجو الاستفادة و السلام.
وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ
صدق الله العظيم
مشكور جداً على هذا التوضيح