Message for Required Fields in Form

[tngirl]

Hi,

I am using this code to display a message when a required data entry field is left empty on a data entry form. It is not working though. Any help you can provide is greatly appriecated, thank you.


Private Sub Form_AfterUpdate()
If IsNull(Me.Last_Name) Or IsNull(Me.First_Name) Or IsNull(Me.Date) Then
MsgBox "Please enter Last Name, First Name and Date before saving this record! "
Cancel = True


End If
End Sub

[pbaldy]

It needs to be in the before update event:

http://www.baldyweb.com/BeforeUpdate.htm

[tngirl]

Thank you! One more question though, after my message box displays, I get the automatic Access Error Message. is there a way to turn that message off? The message I see is, "you can't go to the specific record". Thank you for your help.

[pbaldy]

What is your code now, and under what circumstance does this happen?