+- 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ığı: Verileri korumak (/konu-verileri-korumak.html)
Verileri korumak - kenan827 - 12/03/2014
Merhaba arkadaşlar ekli dosyamda girdiğim Müşteri bilgilerini ve satışları silmek veya değiştirmek istediğim zaman parola istesin. Parolayı girmeden silme ve değiştirme yapmamıza izin vermesin. Bu konuda yardımlarınızı bekliyorum yardımlarınız için şimdiden teşekkürler.
Kullanıcı Adı: AHMET
Şifre : 111
Arkadaşlar parola işlemini MsgBox a göre bir kod yazabilirmisiniz.
Cvp: Verileri korumak - ozanakkaya - 29/05/2014
silme butonun tıklandığında olayına;
On Error GoTo Err_Komut153_Click
Dim sifre As String
sifre = "7"
If InputBox("Lütfen Silme Şifresini Giriniz") = sifre Then
DoCmd.SetWarnings False
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
DoCmd.SetWarnings TrueElse
MsgBox "Aferin, Silme Başarılı..."
Exit Sub
End If
Exit_Komut153_Click:
Exit Sub
Err_Komut153_Click:
MsgBox Err.Description
Resume Exit_Komut153_ClickCvp: Verileri korumak - kenan827 - 09/06/2014
Çok teşekkürler hocam.