السلام عليكم ورحمة الله وبركاته
لدى نموذج رئيسي وبه نموذج فرعى .. استخدم الكود التالى لاضافة بيانات الى الجدول الفرعى من النموذج الرئيسي :
اريد التعديل عليه ليمنع التكرار اذا اضافة بيانات حقل سابق وجاء المستخدم ليكرار نفس البيانات تعطى رسالة بان البيانات تم تسجيلها من قبل وتراجع
اسم الجدول المراد الاضافة به tbl_wared_motaba
وهذا هو الكود
Private Sub cmd_addsend_Click()
On Error Resume Next
Me.frm_wared_motaba.SetFocus
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tbl_wared_motaba")
rs.AddNew
rs!id_emp_w = id_m
rs!sn_user_Recv = sn_user_Recv
rs!sn_user_Send = sn_user_Send
rs!taxt_Tasera = taxt_Tasera
rs!dd_end = dd_end
rs!Date_End = Date_End
rs!Date_start = Date_start
rs.Update
rs.close
Me.frm_wared_motaba.Requery
End Sub
لقد حاولت التعديل لكن بات جميع المحاولات بالفشل
فهل من حل لمنع تكرار البيانات