access tablo ve vba sorunu

[ae74_67]

access yardım...

Private Sub Report_Close()
DoCmd.OpenTable "kullaniciyetki", acViewNormal, acEdit
DoCmd.RunCommand acCmdSelectAllRecords
DoCmd.RunCommand acCmdDeleteRecord
DoCmd.Close acTable, "kullaniciyetki"
End Sub


burada tüm kayıtları silmeden önce eminmisiniz evet/hayır sormadan direkt olarak tüm kayıtların silinmesini sağlamak için nasıl bir düzeltme yapılacak,

tesekkürler.

 

[modalı]

Kodları şu şekilde değiştirin.

DoCmd.SetWarnings False
    DoCmd.OpenTable "kullaniciyetki", acViewNormal, acEdit
    DoCmd.RunCommand acCmdSelectAllRecords
    DoCmd.RunCommand acCmdDeleteRecord
    DoCmd.Close acTable, "kullaniciyetki"
    DoCmd.SetWarnings True

Unutmayın bu foruma üye olmuş herkesin forum kurallarına uyma mecburiyeti var ve bu kuralları ben koymadım.

 

[ae74_67]

sayın modalı;
öncelikle cevabınız için çok çok teşekkür ederim, ne kadar olgun bir kişiliğiniz olduğunu gösterdiniz.

ayrıca amacım kesinlikle size bir saygısızlık yapmak değildir.
neden konunun taşınıp durduğuna dair bir tek kelimelik açıklama almayı bekledim ve bu durumda verdiğim tepki sanırım size karşı biraz haksızca oldu.
özür diliyorum.