AccessTr.neT
İlişkili Kayıtlar Olduğundan Kayıt Silinemiyor. - 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ığı: İlişkili Kayıtlar Olduğundan Kayıt Silinemiyor. (/konu-iliskili-kayitlar-oldugundan-kayit-silinemiyor.html)



İlişkili Kayıtlar Olduğundan Kayıt Silinemiyor. - Oğuz Türkyılmaz - 24/12/2018

Merhaba F_01_TeklifGiriş Formunda girdiğim kaydı komple silmek istediğimde aşağıdaki hata iletisini alıyorum. Nasıl düzeltebilirim. Teşekkürler.
[Resim: do.php?imgf=15456737626651.jpg]
[Resim: do.php?imgf=154567376284052.jpg]


Cvp: İlişkili Kayıtlar Olduğundan Kayıt Silinemiyor. - ozanakkaya - 24/12/2018

If MsgBox(Me.TeklifNo & " Sayılı Teklif silinsin mi", vbCritical + vbYesNo) = vbYes Then

DoCmd.SetWarnings False

DoCmd.RunSQL "DELETE TeklifNo From T_02_TeklifDetay WHERE (((TeklifNo)=" & TeklifNo & "));"
DoCmd.RunSQL "DELETE TeklifNo From T_01_Teklifler WHERE (((TeklifNo)=" & TeklifNo & "));"

DoCmd.SetWarnings True
Me.Requery

End If



Cvp: İlişkili Kayıtlar Olduğundan Kayıt Silinemiyor. - Oğuz Türkyılmaz - 24/12/2018

(24/12/2018, 21:08)ozanakkaya yazdı:
If MsgBox(Me.TeklifNo & " Sayılı Teklif silinsin mi", vbCritical + vbYesNo) = vbYes Then

DoCmd.SetWarnings False

DoCmd.RunSQL "DELETE TeklifNo From T_02_TeklifDetay WHERE (((TeklifNo)=" & TeklifNo & "));"
DoCmd.RunSQL "DELETE TeklifNo From T_01_Teklifler WHERE (((TeklifNo)=" & TeklifNo & "));"

DoCmd.SetWarnings True
Me.Requery

End If
 Ozan bey teşekkür ederim. Sorunum çözülmüştür.