#6
Private Sub Form_BeforeInsert(Cancel As Integer)
If NewRecord Then
If IsNull(DLast("[İade Tarihi]", "[Zimmet_T]", "[plaka no] ='" & Forms!Araclar_Zimmet_F.Metin91.Value & "'")) = True And DCount("[plaka no]", "[Zimmet_T]", "[plaka no] ='" & Forms!Araclar_Zimmet_F.Metin91.Value & "'") > 0 Then
Cancel = True
Me.Undo
Exit Sub
End If
End If
End Sub
| Bu Konudaki Yorumlar |
|
Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: iscinar - 20/06/2011, 13:06
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: Kur@l - 20/06/2011, 13:51
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: Kur@l - 20/06/2011, 16:21
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: iscinar - 20/06/2011, 18:50
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: iscinar - 20/06/2011, 19:11
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: Kur@l - 20/06/2011, 21:09
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: iscinar - 20/06/2011, 23:34
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: iscinar - 14/07/2011, 23:27
Cvp: Altforma yeni kayıt şartı koyabilirmiyiz? - Yazar: alpeki99 - 15/07/2011, 08:45
|
