Şö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
Uzaylılarla iletişime geç deseydiniz benim için daha kolay olurdu
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