Preventing an add to db when error exists

[sms28]

I have a field, agency_id (exit event)with the following code below. If this error exists, I do not want to save the record. I've tried adding the code in the close, deactivate, unload events of the form. That does not seem to work. What's a good solution for preventing the save when there is an error?

If Len(Agency_ID) <> 3 Then
MsgBox &quot;Please enter 3 numbers for Agency ID&quot;
DoCmd.GoToControl &quot;Agency_ID&quot;
End If

 

[ajdesalvo]

Move the code to the BeforeUpdate event:

If Len(Agency_ID) <> 3 Then
MsgBox &quot;Please enter 3 numbers for Agency ID&quot;
DoCmd.CancelEvent
Me.Undo
End If

Anthony J. DeSalvo
President - ScottTech Software
&quot;Integrating Technology with Business&quot;