Question Check if any changes have been made to the record

[bignate]

I use the code below when a form is closed to either save or undo changes. However I only want the msg box to appear if there have been any changes to the record that the form is based on, if there aren't any changes then it will just docmd.close without the msgbox. How would I check if there have been any changes to the record? I think you have to use 'Dirty' but im not really sure how to use it.




Private Sub CLoseUR_Click()


Dim strMsg As String, strTitle As String


strMsg = "Do you want to save changes?"
strTitle = " Save Changes?"


If ValidateForm Then
Else
If MsgBox(strMsg, vbQuestion + vbYesNo, strTitle) = vbNo Then
Me.Undo
DoCmd.Close
Else
DoCmd.Close
End If
End If
End Sub

[pbaldy]

If Me.Dirty Then

[Bob Fitz]

IMHO it would be better to have validation code in the form's Before Update event.

[bignate]

I just got Me.Dirty to work, thanks guys.
Bob Fitz are you suggesting I use Me.Dirty in the BeforeUpdate?

[Missinglinq]

No, he's suggesting that you put your code asking the user if he wants to save the changes in the Form_BeforeUpdate event. Doing this, there is no need to 'check' whether the Form is Dirty or not. The Form_BeforeUpdate event only fires if the Form has been Dirtied!

Linq ;0)>

[bignate]

Oh okay thanks, if I do it this way would it think there is an update if a user adds a space and removes it again using backspace.