an option to cancel an edit

[shrive22]

I have a form with a button to edit the current record. How do it up so that once the user has entered new data or changed the data then they can either choose to save what they have entered or cancel the changes they made???

Thanks for the help

 

[Mile-O-Phile]

If Me.Dirty Then
    If MsgBox("Do you wish to save your changes?", vbQuestion + vbYesnNo, "Save Changes?") = vbNo Then
        Me.Undo
    Else
        DoCmd.RunCommand acCmdSaveRecord
    End If
End If