بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته :
اخواني وأستاذتي الأعزاء _ أستاذتي القديرة (زهرة) , أستاذي القدير محمد تركي
لي سؤال عن كود للحماية بواسطة النموذج في قاعدة بيانات Access (الكود في حدث [عند الفتح] للمنوذج ... الكود :
Private Sub Form_Open(Cancel As Integer)
AhmedB = GetSetting("AhID", "AhBas", "AhmedB", Nz(AhmedB))
If Ahmed = 5 Then
MsgBox "لقد استنفذت كامل عدد مرات التشغيل التجريبي ", vbMsgBoxRight
DoCmd.Quit
Else
MsgBox " تبقى لديك " & (5 - Ahmed) & " محاولات من أصل ", vbMsgBoxRight
End If
End Subعمل هذا الكود أنه يتيح للمستخدم تجربة البرنامج عدة مرات , فإذا استنفذ المستخدم العدد المتاح له تظهر له رسائل كما هي واضحة في الكود
وسؤالي هو :
ما هي المسميات أو العناصر في هذا الكود , خاصة في السطر الأول منه ... هذا يعني :
AhmedB = GetSetting("AhID", "AhBas", "AhmedB", Nz(AhmedB))هلي هي جدول وحقول أم ماذا؟
أرجوكم تساعدوني ربنا يخليكم

