Kayıt sil butonunun tıklandığında olayına
If MsgBox("Kayıt Silinsin Mi?", vbExclamation + vbYesNo, "Silme Onayı") = vbYes Then
DoCmd.SetWarnings False
If Len(Dir(CurrentProject.Path & "\Resimler\" & Me.tckimlikno & ".jpg")) > 0 Then
Kill CurrentProject.Path & "\Resimler\" & Me.tckimlikno & ".jpg"
End If
DoCmd.RunCommand acCmdDeleteRecord
DoCmd.SetWarnings True
End If
kodu ekleyerek deneyiniz.
Kayıt ekle'da verdiği hatanın resmini ekleyiniz.