AccessTr.neT

Tam Versiyon: Otomatik kayıt yerine Kaydetme soru uyarısı.
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Forma girdiğim bilgilerin otomatik kayıt yerine Kaydedilsinmi soru uyarısını nasıl sağlayabilirim.
Saygılarımla.
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.
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.
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.
Sayın hocam yeni bir konu açtım örnekte ekledim bu sorunumada yardımcı olursanız memnun olurum.
Sayfalar: 1 2