Skip to main content

AccessTr.neT


Kaydı Yönetici Şifresi İle Silmek

Oğuz Türkyılmaz
Oğuz Türkyılmaz
19
2841

Kaydı Yönetici Şifresi İle Silmek

#19
Şöyle yapabilirsiniz her forma kendi içinde diyelim ki adı kayitSil olan silme fonksiyonu tanımlarsınız, şifre formuna da argüman olarak sadece me.name gönderirsiniz şifre doğru ise frm.kayitSil fonksiyonu çağrılır böylece hem splite hem de kayıt idine gerek kalmaz sadece silip recordset güncelleme kodunu çalıştıran fonksiyonu çağırmak yeterli olur

Hiç denemedim çalışır mı nasil çalışır bilmiyorum ama recordsette kayıt silme kodu
recordsetAdi.Delete
Cevapla
#20
Uzaylılarla iletişime geç deseydiniz benim için daha kolay olurdu Img-grin 

Ben işin kolayına kaçtım Mesajı genel tek mesaj şekline dönüştürdüm. Her şekilde o mesaj la hangi form olursa olsun silme işlemini gerçekleştirecek. Kasmaya gerek yok sorun da olmaz sanırım.
 If DCount("*", "t_kullanici", "yetki='admin' and sifre='" & Me.Password_TXT & "'") > 0 Then
           
        If MsgBox("Kaydedilmiş bilgiler silinecek, İşlemin geri dönüşü yoktur, eminmisiniz ? ", vbCritical + vbYesNo, " !!! DİKKAT !!! ") = vbYes Then
           
            CurrentDb.Execute "delete from T_AyniYardim where [ID]=" & Split(OpenArgs, ";")(1)
            frm.AcikMi
           
            CurrentDb.Execute "delete from T_HesapHareketleri where [ID]=" & Split(OpenArgs, ";")(1)
            frm.AcikMi

        End If
           
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task