
Sayın hocalarım mükerrer kayıt diye konut açmış tım fakat göremiyorum
Private Sub ISLEM_BeforeUpdate(Cancel As Integer)
If DCount("*", "SRGHESBANKODMBANKA", "[mtn_DONEMID] = " & mtn_DONEMID & " AND [mtn_hkart] = '" & mtn_hkart & "'") > 0 Then
MsgBox "Mükerrer", vbCritical, "Mükerrer"
Undo
End If
End Sub