Mala pomoc oko koda za brisanje

Pozdrav svima!
\molicu za pomoc oko koda za brisanje. Imeno imam na forme imam na On Load sledeci kod

Private Sub Form_Load()
Application.SetOption "Confirm Record Changes", 0
End Sub

Onda na On Delete sledeci kod

Private Sub Form_Delete(Cancel As Integer)
Dim SID As String
Dim rsc As DAO.Recordset
Set rsc = Me.RecordsetClone

SID = Me.Ispratnica_broj1.Value

Dim LResponse As Integer
LResponse = MsgBox(" Dali ste sigurni deka sakate da ja izbrišete Ispratnica br.: " & SID, vbYesNo + vbQuestion, "Brišenje?")
Response = acDataErrContinue
If LResponse = vbNo Then
DoCmd.CancelEvent
LResponse = MsgBox("Prekin na brišenje Isptatnica br.: " & SID, vbInformation, "Áðèøåœå?")
Me.Undo
End If
Set rsc = Nothing
End Sub


a na dugme Brishi koje se nalazi na forme imam postavjeno sledeci kod na On Click

Private Sub Command123_Click()
On Error GoTo Err_Command123_Click


DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_Command123_Click:
Exit Sub

Err_Command123_Click:
MsgBox Err.Description
Resume Exit_Command123_Click

End Sub

Radi OK ali kad idem na otkazivanje brisanje pored moje poruke za otkazivanje kad zatvorim javi mi i Ms Access poruku "Jou canceled the previous operation". Moje pitanje za pomoc je:
1. Kako da je ostranim da se ne pojavlja MS Access poruka.
i josh jedno pitanje ako moze za pomoc
2. Dali mogu i kako u kodu na On Delite da dodam moju poruka kad se potvrdi brisanje od strane korisnika da se rekord brishe.
Ocekujem vashu pomoc i Hvala unapred

Potpis

Lj.Kirovski

Isključite sistemske poruke.
DoCmd.SetWarnings False na početku izvršenja koda i
DoCmd.SetWarnings True na kraju izvršenja koda.

Hvala Miki 2013 ubacio sam kao shto si naglasio na pocetku i na kraju izvrshavanje koda na Od Delete ali isto opet izbacuje Ms Access Poruku Jou Canceled the previous operation

Potpis

Lj.Kirovski

Evo brzinski primjer i to je to ako sam Vas dobro shvatio.