أريد رسالة بوجود تكرار في الرقم المدني ؟

[ykeen2010]

السلام عليكم ورحمة الله

أخواني الأعزاء:

أريد كود أضعه في أول حقل عندي وهوحقل مفهرس(بدون تكرار)بحيث بمجرد ماأدخل الرقم وكان موجود مسبقاً يخبرني أن بيانات هذا الرقم أدخلت مسبقاً.

لأن المشكله عندي عندما أدخل جميع بيانات الحقول وهو مايقارب عشرين حقل يظهر عندي أن الرقم موجود مسبقاً

وهذا يضيع علي الكثير من الوقت

أرجو المساعده ياأخوان

ملاحظه : الحقل هو ( رقم السجل المني ) لكل مريض على سبيل المثال

وجزاكم الله خير

[فتى الوادي]

السلام عليكم ...

أخوي الكريم ... لو تبحث في المنتدى ستجد ما تريد ...

أبحث بواسطة ( مكرر ) أو ( تكرار )

[الدكتور خضر الرجبي]

السلام عليكم

اخي ykeen2010 ،

ابتداءً ، تحياتي لأخي فتى الوادي وكل عام وأنت بخير.

عودة لموضوع السؤال فإنه يجب في هذه الحالة فحص فيما إذا كان الرقم الذي سندخله موجود مسبقا في الجدول وذلك طبعا قبل إدخال جميع حقول البيانات أي بعد تحديث قيمة الرقم المدني مباشرة سواءً في سجل جديد أو عندما نريد تعديل سجل موجود.

إذن يجب أن نضع كود معين في حدت بعد التحديث لحقل الرقم المدني ولنفترض أن اسمه no وموجود في الجدول t1 وبهذا يكون الكود الذي يعطينا رسالة تنبهنا مباشرة بعد تحديث الرقم المدني فيما إذا كان مكررا كما يلي :

Private Sub no_AfterUpdate()
x = Nz(DCount("[no]", "t1", "str([no])= '" & Str(Me.no) & "'"), 0)
If x <> 0 Then MsgBox "هذا الرقم موجود مسبقا يرجى تغييره أو إلغاء عملية الإضافة"
End Sub

مع الاحترام والتقدير

[ykeen2010]

السلام عليكم

الأخ العزيز القدير المشرف :خضر الرجبي

نعم هذا المطلوب وهذا الذي (كنت أبحث عنه)

أشكرك جزيل الشكر على تجاوبك معي وردك السريع

وجعل الله هذا العمل في ميزان أعمالك

ولك خالص الأمتنان والتقدير