(24/12/2018, 21:08)ozanakkaya yazdı:Ozan bey teşekkür ederim. Sorunum çözülmüştür.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
Access Çekirgesi