Merhaba Atoz112
ilginiz için teşekkür ederim. vermiş olduğunuz kodları denedim. evet uyarı veriyor. Hayır dediğimde adet ve fiyat ta değişiklik yaptığımda bu değişikliği iptal etmiyor. aynen kaydediyor.
sayın raburabu,
daha öncesinde de belirtildiği üzere,
değişik olay yordamları içerisinde farklı alternatif yöntemler ya da kullanımlar söz konusu olabilir.
ÖRNEK:
If MsgBox("Kaydetmeden çıkmak istiyor musunuz?", vbYesNo, "GERİ ALMA UYARISI") = vbYes Then
DoCmd.RunCommand acCmdUndo
Else
End If
benzeri bir kod da yazılabilir.hatta,kimi kod kullanımlarında,form kapatma (Close) komutu da uygulanabilir...
EK'te;
alternatif bir kullanıma yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.
son olarak;
denemesini yaptığınızı fakat olumlu sonuç alamadığınızı beyan ettiğiniz örneğinizi de ekleyebilirsiniz.eklerken,2003 olarak da dahil etmeyi unutmayınız.
bilginize...iyi çalışmalar,saygılar.
Merhaba Atoz112
Örneğe baktım açılan veride örneğin ilk sırada şehir istanbul yazıyor. ben bunu istanbulllll olarak değiştirdim. çık dediğimde uyarı veriyor. kaydetmeden çıkmak mı istiyorsunuz dediğinde evet diyorum ve çıkıyor. Tabloyu tekrar açtığımda istanbulllll olarak değişiklik yapılmış görünüyor. Yani değişikliği iptal etmemiş.
sayın raburabu,
bahsettiğiniz hususa dair tekrar incelediğimde fark ettim ki,
Private Sub Form_BeforeUpdate(Cancel As Integer)
'ATOZ112
'AŞAĞIDAKİ KODLAR DAHİL EDİLMİŞTİR
If tamamlama_durumu = True Then Exit Sub
tamamlama_durumu = True
islem_durumu = MsgBox("Kaydetmeden çıkmak istiyor musunuz?", vbQuestion + vbYesNoCancel, "GERİ ALMA UYARISI")
Select Case islem_durumu
Case vbNo:
Case vbYes:
Me.Undo
Case vbCancel:
Cancel = True
End Select
End Sub
Me.Undo kod satırını,
Case vbYes:
satırının altında olması gerekiyordu.fakat,
Case vbNo:
satırı altında yazılı kaldığı görülmüştür.yukarıdaki kod şeklinde kullanmayı deneyiniz.farkına varmamı sağladığınız için teşekkür ederim.
10.mesajdaki örnek uygulama düzeltilerek tekrar eklenmiştir.
bilginize...iyi çalışmalar,saygılar.
sayın raburabu,
12.mesajdaki işlemin yapılmak sureti ile 10.mesaja tekrar düzenlenerek eklenen örnek uygulamanın kullanımı neticesinde edinilen ekran görüntüleri aşağıdaki gibidir.
bilginize...iyi çalışmalar,saygılar.
Merhaba atoz112
Örnek için çok teşekkür ederim. Üst formda güzel çalışıyor. Ancak benim gönderdiğim örnekte alt formda nasıl uygulayacağız. Ben ilk mesajımda örneğe kodları ekledim yeniden yükledim. hem üst forma hem alt forma nasıl uygulayabilirim.
Birde şunu fark ettim. Gönderdiğiniz örnekte değişiklik yaptığımızda çık butona basılınca HAYIR dediğimizde kayıt edip çıkıyor. HAYIR DENİNCE tekrar forma dönmesi gerekiyor.