السلام عليكم ورحمة الله
اسم الجدول subjects
الرقم n_no غير مكرر ( نص )
المادة subject ( نص )
اريد تسجيل قائمة بالمواد المتوفرة ... وفي حالة الر غبة بالاضافة مستقبلا ... وكتب المستخدم رقما موجود مسبقا تظهر له رسالة تفيد بوجود الرقم ..وهذا هو الكود الذي كتبه الاخ العزيز محمد طاهر في موضوع مسبق ولم يعمل معي ..بل تظهر الرسالة مع رقم واحد (1) فقط اما بقية الارقام فانه يقوم بتحديث معلوماتها
[ALIGN=RIGHT]
Sub n_no1_BeforeUpdate(Cancel As Integer)
If DCount("n_no1", "subjects", "n_no1=" & Me.n_no) > 0 Then
MsgBox "Value already Exist"
SendKeys "{ESC}"
Cancel = True
End If
وسؤال اخر لو سمحتوا .... اريد بعد اضافة عشرة مواد فرضا ... وعند فتح النموذج مرة اخرى ... يظهر الرقم 11 تلقائيا ....كاول خانة خالية في الجدول ...كيف ............مع الشكر الجزيل
ملاحظة n_no1 = اسم خانة الرقم في النموذج
