After the form opens, I'm trying the following in the Load Event of the form
Dim lngID As Long
If Len(Trim(Nz(Me.txtAuthorizationID, ""))) > 0 Then
lngID = CLng(Me.txtAuthorizationID)
If lngID <> 0 Then
Me.RecordsetClone.FindFirst "AuthorizationID=" & lngID
If Not Me.RecordsetClone.NoMatch Then
Me.Bookmark = Me.RecordsetClone.Bookmark
Else
If Not Me.NewRecord Then
DoCmd.RunCommand acCmdRecordsGoToNew
End If
End If
End If
End If
It's erroring on Me.RecordsetClone.FindFirst "AuthorizationID=" & lngID
I'm not sure if this is the best approach so any suggestions are appreciated.
|