Error trapping date format

[mikemaki]

I have a text box that is formatted to military time. The user does not like the awkward cursor placement that occurs when using an input mask. So I took the mask out. If I enter a value that is not formatted correctly, I receive a microsoft error. I tried to trap the error in the after update event, but the system beats me to it. Where can I trap this error in order to display a more user friendly message?

 

[dcx693]

Use the Before Update event instead.

 

[Rich]

The form OnError event

 

[mikemaki]

dcx693, sometimes the obvious is the hardest answer to find! Thanks.

 

[mikemaki]

The error takes control before the BeforeUpdate event. I still can't trap it.

 

[dcx693]

What error are you receiving?

 

[Rich]

I'LL TRY AGAIN, YOU HAVE TO USE THE FORM ON ERROR EVENT

Private Sub Form_Error(DataErr As Integer, Response As Integer)
If DataErr = 2113 Then
Response = acDataErrContinue
MsgBox " Wrong value dummy!"
End If
End Sub

you'll have to use the number that corresponds to the error your getting

 

[mikemaki]

Thanks Rich, I'll try that. I was stuck on the text box error events.

 

[mikemaki]

The form OnError event was the answer!

 

[dcx693]

Cool, but I don't know if " Wrong value dummy!" qualifies as a "more user friendly message".

 

[scouser]

Awkward Cursor Placement

Can use the following on: Got Focus Event:

Private Sub [FieldNameHere]_GotFocus()
Me.ActiveControl.SelStart = 0
End Sub

This places the cursor at first input point when user tabs to the field. This way you can keep the input mask!!
Just a thought, ignore me if i'm talking tosh!
Phil.