Update Changes to Record before Record Changes

[mcaliebe]

On my form, I have a command to edit data, save data, and cancel changes and these all work well. I want to include a message if the current record is dirty and the user uses changes the record without saving changes. I tried setting the following code in the forms current even, but it doesn't seem to check if the current record is dirty. It appears to look at the condition of the next record, however if I check for Dirty with my Cancel Changes command, it recognizes the form is dirty.

Any Thoughts?

If Me.Dirty = True Then
    response = MsgBox("Change Record and Discard Changes?", vbYesNo)
        If response = vbYes Then
        DoCmd.RunCommand acCmdUndo
        Else
        Exit Sub
        End If
End If

[aytee111]

Try using the BeforeUpdate event instead.

[mcaliebe]

This works well to check if the user made changes. I am testing for Me.Dirty and if the form is, the warning fires off. However, even after the record is saved and updated, the form still shows as Dirty so when moving onto the next record, the warning fires again. How do I bypass this check after a recent save, or how do I have a clean form after a save?

[aytee111]

Me.Dirty=False

[RuralGuy]

For the record: the BeforeUpdate event *only* fires when the Form is Dirty!