(22/12/2017, 09:35)yturan yazdı: Merhabalar...
Birden fazla alana aynı giriş yapıldığında kayıt yapılmaması gerekiyor...
Örneği ekte gönderdim...
Dosya no - Müdafi - Mahkemesavcilik aynı olabilir ancak magdursanık alanı da aynı olduğunda uyarı vermeli ve kayıt yapılamamalı...
Anlatması zor...
Resim örneğinde daha iyi açıkladım sanırım...
Bu kontrol formda değil, sorguda da olabilir...
Yardım ederseniz teşekkür ederim.
aynı isimden birçok olabilir. bu durumu tc kimlik alanı ekleyerek daha kullanılır hale getiriniz. bu alanın güncelleştirme öncesi olayına da
Dim SID As String
Dim stLinkCriteria As String
SID = Me.[TC_No].Value
stLinkCriteria = "[TC_No]=" & "'" & SID & "'"
If DCount("[TC_No]", "tabloadı", stLinkCriteria) > 0 Then
MsgBox SID & "---NOLU KAYIT DAHA ÖNCE GİRİLMİŞTİR." _
& vbCr & vbCr & "LÜTFEN TEKRAR KONTROL EDİN,AKSİ TAKDİRDE KAYIT YAPAMAZSINIZ", vbInformation _
, "TURAN"
Me.Undo
Else
Exit Sub
End If