AccessTr.neT
form alt liste silme hatası - Baskı Önizleme

+- 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ığı: form alt liste silme hatası (/konu-form-alt-liste-silme-hatasi.html)



form alt liste silme hatası - bulenttum - 14/01/2014

arkadaşlar musteriler formumun içinde liste384 liste kutusu var bu liste kutusuna çift tıkama ile silmek istiyorum fakat ana formumun veri tabanındaki dosyaları siliyor çift tıklama için kullandığı kod

If MsgBox("Kayıt Silinsin mi?", vbYesNo, "Siliniyor...") = vbYes Then
DoCmd.SetWarnings False
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
DoCmd.SetWarnings True
Liste384.Requery
Else
Me.Undo
End If

bu konuda yardım edebilirmisniz


Cvp: form alt liste silme hatası - POWER - 14/01/2014

Aşağıdaki komut dizinini uygularmısın...

Private Sub Liste384_DblClick(Cancel As Integer)
Dim Sql As String
If MsgBox("Kayıt Silinsin mi?", vbYesNo, "Siliniyor...") = vbYes Then
DoCmd.SetWarnings False
SQL = "Delete * FROM mahal_sikayet WHERE Kimlik=" & Me.Liste384
DoCmd.RunSQL SQL
DoCmd.SetWarnings True
Liste384.Requery
Else
Me.Undo
End If
End Sub

Lütfen olumlu veya olumsuz geri dönüş yapınız...


Cvp: form alt liste silme hatası - bulenttum - 15/01/2014

hocam teşekkürler emeğine sağlık oldu