Re: BeforeUpdate event

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance



As Rick said, it is possible this will not work. Moving to a different
record duing the Before Update event, even with the Cancel, may not work, but
you can try this:

Private Sub SSN_BeforeUpdate(Cancel As Integer)

If Not IsNull(DLookup("[SSN]", "Security", "[SSN]= '" & Me![SSN] &
"'")) Then MsgBox "This SSN already exists."
Cancel = True
Me.Undo
With Me.RecordsetClone
.FindFirst "[SSN] = '" & Me.SSN & "'"
If Not .NoMatch Then
Me.Bookmark = .Bookmark
End If
End With
End If
End Sub

--
Dave Hargis, Microsoft Access MVP


"Sher" wrote:

Can you write out what exactly I would need to do.

"Rick Brandt" wrote:

Sher wrote:
I have created a before update event listed below. What I would also
like it to do is go to the record that is in the database. I thought
that was what I was doing but it isn't working. Can someone please
help.

Private Sub SSN_BeforeUpdate(Cancel As Integer)
If Not IsNull(DLookup("[SSN]", "Security", "[SSN]= '" & Me![SSN] &
"'")) Then MsgBox "This SSN already exists."
Cancel = True
Me.Undo
DoCmd.GoToRecord , , acFirst
DoCmd.FindRecord SSN

End If

End Sub

You cannot navigate in the middle of an update event. Your code needs to cancel
the update, issue an Undo on the form, and then it might work to move to another
record. I'm not sure even that would work without testing it though.

--
Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com



.



Relevant Pages

  • RE: inputmask
    ... aan = Hour ... Update event. ... If not cancel ... Private Sub Aankomen_BeforeUpdate ...
    (microsoft.public.access.formscoding)
  • RE: GoToControl problems
    ... The after update event code occurs after the value is ... Private Sub txtDate_rcp_BeforeUpdate ... setting the focus while in a control to itself, but I am not absolutely sure. ... you can use the Cancel capability of that event to cancel the update of the ...
    (microsoft.public.access.formscoding)
  • Re: BeforeUpdate event
    ... like it to do is go to the record that is in the database. ... Private Sub SSN_BeforeUpdate ... You cannot navigate in the middle of an update event. ... Your code needs to cancel ...
    (microsoft.public.access.formscoding)
  • Re: Code to stop form opening on a condition
    ... Thanks Rick. ... "The OpenForm action was cancelled blah blah" ... >> Private Sub Form_Open ... > Notice that the Open event above has a Cancel argument. ...
    (microsoft.public.access.formscoding)
  • Re: GoToControl problems
    ... The after update event code occurs after the value is ... Private Sub txtDate_rcp_BeforeUpdate ... setting the focus while in a control to itself, but I am not absolutely sure. ... you can use the Cancel capability of that event to cancel the update of the ...
    (microsoft.public.access.formscoding)