(30/11/2016, 21:14)atoz112 yazdı: sayın nightashes,
EK'te;
tüm öneri mahiyetinde yapılan bilgilendirmeler üzerine hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.
Kod:
Private Sub btn_sil_Click()
'ATOZ112
'AŞAĞIDAKİ KODLAR DAHİL EDİLMİŞTİR.
If MsgBox("Seçilen kaydı silmek istiyor musunuz?", vbYesNo, "GERİ ALMA UYARISI") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE FROM MUSTERI_YENI WHERE Kimlik=" & Me.Metin24
DoCmd.SetWarnings True
Me.lst_liste.Requery
Me.Requery
Else
Me.Undo
Exit Sub
End If
End Sub