Cancel an entry and exit form

[michwh1]

What is te best way to handle a situation where someone opens a form to enter data and chooses to cancel this action after entering nothing or has enetred at least some data.



This is what I have tried so far but errors out because delete action is not available.
If MsgBox("Are you sure you want to abandon changes to this record?", vbExclamation + vbYesNo, "LogBook 2002") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdDeleteRecord
DoCmd.SetWarnings True
Else 'user clicked no
MsgBox "Deletion was aborted.", vbInformation
End If

[June7]

Can try a 'Cancel' button with code:

Me.Undo

Review

http://www.tek-tips.com/viewthread.cfm?qid=822257

[Bob Fitz]

Try:

If MsgBox("Are you sure you want to abandon changes to this record?", vbExclamation + vbYesNo, "LogBook 2002") = vbYes Then
  Me.Undo
End If

[michwh1]

Thanks for the help. That worked. I will also attach in mdb format in the future.