Error trapping dirty event

[PaleRider]

Hi,

The FirstName and LastName fields in main table have required property set
to true. In my form controls txtFirstName and txtLastName I want to trap
when a user backspaces over something they typed.

How do you trap error 3314 in the control's Dirty property. I want to allow
people to clear out what they typed in a control and move to a different
control without getting the error 3314. Is this possible?

PR

 

[Graham Mandeno]

Hi PR

I haven't tried this, but you should be able to use the Change event of the
textbox to detect when all the characters have been deleted and Undo the
textbox:

Private Sub FirstName_Change()
If Me.NewRecord and Len(FirstName.Text) = 0 Then FirstName.Undo
End Sub

 

[PaleRider]

Graham,

Ohhhh, what a wonderful little piece of code you just wrote. I had just
figured out how to trap things and was about to post back with my solution,
but your solution is much smaller and achieves the same thing. Your a genius


I have included both versions below:

(Grahams version)
If Me.NewRecord And Len(Me.txtPersonnel) = 0 Then
Me.txtPersonnel.Undo
End If

(My discarded version, thanks to Graham)

If Me.NewRecord And Me.Dirty And IsNull(Me!txtPersonnel) Then
If MsgBox("A Personnel name is required data. Click OK to enter " _
& "the data, or Cancel to erase all the data in this record.", _
vbOKCancel) = vbOK Then
Cancel = True
Me!txtPersonnel.SetFocus
Else
Cancel = True
Me.Undo
End If
End If


-PR

Hi PR

I haven't tried this, but you should be able to use the Change event of the
textbox to detect when all the characters have been deleted and Undo the
textbox:

Private Sub FirstName_Change()
If Me.NewRecord and Len(FirstName.Text) = 0 Then FirstName.Undo
End Sub

--
Good Luck

Graham Mandeno [Access MVP]
Auckland, New Zealand

Hi,

The FirstName and LastName fields in main table have required property set
to true. In my form controls txtFirstName and txtLastName I want to trap
when a user backspaces over something they typed.

How do you trap error 3314 in the control's Dirty property. I want to
allow
people to clear out what they typed in a control and move to a different
control without getting the error 3314. Is this possible?

PR