satır silme uyarısı

21/04/2013, 23:43

mhmtogz

merhabalar;

buttonda uyguladığım şu kod;

Private Sub KMTCIKART_Click()
DoCmd.RunSQL ("DELETE hizmet, adet, texthizmetid FROM TBLDETAYALT WHERE (((id)= Eval('[Forms]![F_DETAY]![LSTDETAY].Column(0)')));")
Me.LSTDETAY.Requery
End Sub
windows 7 Access 2003 te uyarı vermeden işlemi yapıyor.(benim istediğim bu)
ama windows xp Access 2003 te 1 satır silmek üzeresiniz evet hayır uyarısı veriyor...

neden bu farklılık var ve xp de uyarıs vermemesi için ne yapmalıyım?
21/04/2013, 23:50

direnist

Merhaba;
Acaba

DoCmd.SetWarnings False
DoCmd.SetWarnings True
kodunu denediniz mi?
21/04/2013, 23:53

mhmtogz

denemedim, nasıl uygulamam gerek?
22/04/2013, 00:00

direnist

Aşağıdaki şekilde.

DoCmd.SetWarnings False
DoCmd.RunSQL ("DELETE hizmet, adet, texthizmetid FROM TBLDETAYALT WHERE (((id)= Eval('[Forms]![F_DETAY]![LSTDETAY].Column(0)')));")
DoCmd.SetWarnings True
Me.LSTDETAY.Requery
22/04/2013, 00:14

mhmtogz

eyvallah hocam oldu eline sağlık
22/04/2013, 00:19

direnist

Rica ederim.
İyi çalışmalar.
Bu arada neden windows 7 Access 2003 te uyarı vermeden çalıştığı konusunda da hocalarımızdan bilgi bekleriz..