I have the following code attached to the "before update" event on my main customer form:
Sub Form_BeforeUpdate(Cancel As Integer)
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to save changes ?" Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "Data...