منع إدخال سجل مكرر فى حقل فى برنامج الأكسس

منع إدخال سجل مكرر فى حقل فى برنامج الأكسس

المقدمة : في هذا الدرس سنتعلم كيفية منع إدخال سجل مكرر فى حقل من الحقول فى برنامج الأكسس الخاص بشركة مايكروسوفت الدرس: - التحكم فى برنامج الكسس غالباً ما يكون بإستخدام الخصائص عند تصميم الجدول  أو بإستخدام الماكرو بوضع الحالة التى يجب ان تكون عليها الحقل المطلوب التحكم فيه . الماكرو وتصميمه يحتاج لتفصيل قد يطول. - أو التحكم يكون بإستخدام حدث الفيجوال بيسك المناسب للحقل . لم أتطرق إلى الأحداث بل سأختصر بالحدث الذى نريده هنا وهو (BeforeUpdate) قبل حفظ التغييرات التى حدثت على السجل المدخل. وإليكم الحدث مصمم بالفيجوال بيسك : Private Sub ST-Name_BeforeUpdate(Cancel As Integer)     If(Not IsNull(DLookup("[ST-Name]", _         "Student", "[ST-Name] ='" _         & Me!ST-Name & "'"))) Then         MsgBox "هذا الرقم مكرر."         Cancel = True             End If End Sub حيث أن (ST-Name) هو الحقل المطول منع التكرار فيه. و ( student) هو الجدول الذى يحوى بيانات ال(ST-Name) والبيانات الأخرى. هكذا بالإستعانة ببرنامج الـفيجوال بيسك ستسطيع منع التكرار في الحقول.

المصدر: سوالم للكمبيوتر

جزى الله خيرا كل من ساهم فيه