Tablo verileri silinmeden önce kaydedilsin istiyorum. - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html) +--- Konu Başlığı: Tablo verileri silinmeden önce kaydedilsin istiyorum. (/konu-tablo-verileri-silinmeden-once-kaydedilsin-istiyorum.html) |
Tablo verileri silinmeden önce kaydedilsin istiyorum. - assenucler - 30/12/2008 Tablo verileri silinmeden önce kaydetsin istiyorum. İyi akşamlar... "YonetimGelirleri" tablosundaki verileri silerken, "Arsiv_bugününtarihi" adlı bir tabloya yedeğini alsın istiyorum. Koda nasıl bir ekleme yapmak gerekiyor. Private Sub Komut24_Click() On Error GoTo Err_Komut24_Click Dim cevap As Long cevap = MsgBox("TÜMVERİLER SİLİNİYOR!!", vbYesNo + vbQuestion, "DİKKAT") If cevap = vbYes Then CurrentDb.Execute ("DELETE * FROM [YonetimGelirleri] ") DoCmd.ShowToolbar ("Menü Çubuğu"), acToolbarYes Application.CommandBars.FindControl(ID:=2071).accDoDefaultAction Else Cancel = True End If Exit_Komut24_Click: Exit Sub Err_Komut24_Click: MsgBox Err.Description Resume Exit_Komut24_Click Yardımınız için teşekkürler. Cvp: Tablo verileri silinmeden önce kaydedilsin istiyorum. - C*e*l*o*y*c*e - 30/12/2008 daha önceden yapılan bir örnek var bundan yola çık Cvp: Tablo verileri silinmeden önce kaydedilsin istiyorum. - assenucler - 30/12/2008 Sayın C*E*L*O*Y*C*E ; Hızır gibi yardımıma yetiştiniz. Sağolun varolun... Teşekkürler. |