Kod:
If Malzemenin_Adi = DLookup("[Malzemenin Adı]", "[MalzemeGiris]", "[Malzemenin Adı]=forms![frmMalzemeGiris]!Malzemenin_Adi") Then
MsgBox "BU KAYIT GİRİLMİŞ", vbOKOnly, "HATA"
Undo
Else
End If
If Malzemenin_Adi = DLookup("[Malzemenin Adı]", "[MalzemeGiris]", "[Malzemenin Adı]=forms![frmMalzemeGiris]!Malzemenin_Adi") Then
MsgBox "BU KAYIT GİRİLMİŞ", vbOKOnly, "HATA"
Undo
Else
End If
Bu Konudaki Yorumlar |
mükerrer kayıtı önlemek için - Yazar: sinan55 - 14/02/2009, 14:29
Cvp: mükerrer kayıtı önlemek için - Yazar: alpeki99 - 14/02/2009, 14:44
Cvp: mükerrer kayıtı önlemek için - Yazar: sinan55 - 14/02/2009, 14:59
Cvp: mükerrer kayıtı önlemek için - Yazar: mehmetdemiral - 14/02/2009, 15:41
Cvp: mükerrer kayıtı önlemek için - Yazar: sinan55 - 14/02/2009, 15:53
Cvp: mükerrer kayıtı önlemek için - Yazar: linux2ex - 26/06/2009, 21:54
|