İstediğiniz biçimde hatalı kayıtların görülür olması sağlandı.
İnadına, ille de Accesstr.net...
Alıntı:...Benim istediğim satış adedi yazılmamış satışlar dahil, bütün satışlar satış bilgileri ekranındaki listboxda görünsün veya formu temizde dediğimiz zaman Girdiğiniz veriler kayıtedilsin mi sorusu sorulmasın. Yani Açıklama bölümü dolu olsa bile temizle butonuna tıkladığımız zaman Girdiğiniz veriler kayıtedilsin mi sorusu sorulmasın...
'''''''''If MsgBox("Müşteriye yeni mal satışı yapmak istiyor musunuz?", vbYesNo + vbQuestion, "Müşteri Takip") = vbYes Then
DoCmd.GoToRecord , , acNewRec
Me.ANAISLEMLER_ISLEMTARIHI.SetFocus
''''''Else
' Me.Undo
''''''End If
şeklindedir. Me.Undo ifadesini yeni kayıt açma satırı ifadesinin (DoCmd.GoToRecord , , acNewRec) öncesine yazdığınız takdirde;herhangi bir mesaj çıkmaksızın işlem yapmanızı sağlamak sureti ile bu durumu düzeltebilirsiniz.zaten,hali hazırda;mesaj uyarısı etkisizleştirilmiş durumdadır.)Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim C As Integer
C = MsgBox("<<<< GİRDİĞİNİZ VERİLER KAYDEDİLSİN Mİ? >>>>", vbYesNo + vbQuestion + vbDefaultButton1, " Bilgi")
If C = vbNo Then
DoCmd.RunCommand acCmdUndo
End If
End Sub
Talebinize ve tercihinize göre,bu olay yordamını iptal ettiğiniz takdirde,herhangi bir uyarı mesajı da ekranda belirmemiş olacak,kaydedilmeye dair.