Forma girdiğim bilgilerin otomatik kayıt yerine Kaydedilsinmi soru uyarısını nasıl sağlayabilirim.
Saygılarımla.
Otomatik kayıt yerine Kaydetme soru uyarısı.
Bu kod işinize yarayacaktır.
Private Sub Form_BeforeUpdate(Cancel As Integer)
' formda yanlışlıkla bir veri üzerinde değişiklik yapmayalım diye
' değişiklik durumunda onay alıyoruz.
If NewRecord = False Then
If MsgBox("Değişiklikler kaydedilsin mi?", _
vbYesNo) = vbNo Then
Cancel = True
DoCmd.RunCommand acCmdUndo
End If
End If
End Sub
Hocam elinize sağlık,ancak hayır'ı tkladığımızda kod hatası veriyor.
Saygılarımla.
Saygılarımla.
Private Sub Form_BeforeUpdate(Cancel As Integer)
' formda yanlışlıkla bir veri üzerinde değişiklik yapmayalım diye
' değişiklik durumunda onay alıyoruz.
If NewRecord = False Then
If MsgBox("Yapılan Değişiklikler kaydedilsin mi?", vbQuestion + vbYesNo, "Onay") = vbNo Then
DoCmd.RunCommand acCmdUndo
End If
End If
'Buda Yeni kayıt yaptığınız da size işlem onayı için soracaktır
If NewRecord = True Then
If MsgBox("Yapılan Değişiklikler kaydedilsin mi?", vbQuestion + vbYesNo, "Onay") = vbNo Then
DoCmd.RunCommand acCmdUndo
End If
End If
End Sub
Hata vermemesi gerekir. Deneyiniz Lütfen.
Kaplumbağa ya dikkat et...
Sadece başını çıkartıp risk aldığında ilerleyebiliyor...
Sadece başını çıkartıp risk aldığında ilerleyebiliyor...
Sayın puletin hocam kodu nereye kopyalacağım onuda açıkalrsanız memnun olurum.
Hocam şimdi tamam tşk ederim
Yaplan değişiklikler kaydedilsinmi diye uyarı yaptı.Emeğinize sağlık.
Sağolun varolun.
Hocam şimdi tamam tşk ederim
Yaplan değişiklikler kaydedilsinmi diye uyarı yaptı.Emeğinize sağlık.
Sağolun varolun.
Son Düzenleme: 11/01/2012, 01:18, Düzenleyen: fascioğlu.
Sayın hocam yeni bir konu açtım örnekte ekledim bu sorunumada yardımcı olursanız memnun olurum.
Konuyu Okuyanlar: 1 Ziyaretçi