sn mecnun
istediğinize en yakın kodlar aşağıdadır. tek kusuru hatalı kayıtla kapanışı engelledikten sonra denetimlerdeki mevcut değerleri sıfırlıyor olması. yok oda olmasın derseniz unbound denetimlere ve Sql kodlarına dönmeniz gerekecek.
Function nullKontrol() As Boolean
If IsNull(tarih) Or tarih = "" Then nullKontrol = True:
If IsNull(ad) Or ad = "" Then nullKontrol = True:
If IsNull(tutar) Or tutar = "" Then nullKontrol = True:
End Function
Private Sub Form_BeforeUpdate(Cancel As Integer)
If nullKontrol = True Then
MsgBox "boş olanlar var bu şekilde kayıt edemezsiniz", vbInformation, "my acces"
End
End If
End Sub
Private Sub Form_Error(DataErr As Integer, Response As Integer)
Select Case DataErr
Case 2169
Response = acDataErrContinue
End Select
End Sub
Private Sub Form_Unload(Cancel As Integer)
If nullKontrol = True Then Cancel = True
End Sub
formu kapatırken yarım kalan kayıt hatası
Bu Konudaki Yorumlar |
formu kapatırken yarım kalan kayıt hatası - Yazar: Mecnun24 - 01/01/2013, 00:54
Cvp: formu kapayırken yarım kalan kayıt hatası - Yazar: alpeki99 - 01/01/2013, 01:13
Cvp: formu kapayırken yarım kalan kayıt hatası - Yazar: fatih karagöl - 01/01/2013, 01:51
Cvp: formu kapayırken yarım kalan kayıt hatası - Yazar: Mecnun24 - 01/01/2013, 20:44
Cvp: formu kapatırken yarım kalan kayıt hatası - Yazar: alpeki99 - 02/01/2013, 01:59
Cvp: formu kapatırken yarım kalan kayıt hatası - Yazar: fatih karagöl - 02/01/2013, 04:19
Cvp: formu kapatırken yarım kalan kayıt hatası - Yazar: Mecnun24 - 03/01/2013, 18:57
Cvp: formu kapatırken yarım kalan kayıt hatası - Yazar: fatih karagöl - 03/01/2013, 19:48
|
Konuyu Okuyanlar: 1 Ziyaretçi