S
SElgin via AccessMonster.com
i have the following code in the OnCurrent event of my form. Ut is supposed
to find the newly added record based on the Id. Id is the PK and NewId is
the newly added Id number.
If Not IsNull(Me.NewId) Then
Dim rs As DAO.Recordset
Set rs = Me.RecordsetClone
'rs.FindFirst "[Id] = " & ""[NewId]""
rs.FindFirst "[id] = " & "NewId"
If rs.NoMatch Then
MsgBox "This id not found"
Else
Me.Bookmark = rs.Bookmark 'synch the form to the found record
End If
End If
I could not find an applicable thread so TIA for the help
Steve
to find the newly added record based on the Id. Id is the PK and NewId is
the newly added Id number.
If Not IsNull(Me.NewId) Then
Dim rs As DAO.Recordset
Set rs = Me.RecordsetClone
'rs.FindFirst "[Id] = " & ""[NewId]""
rs.FindFirst "[id] = " & "NewId"
If rs.NoMatch Then
MsgBox "This id not found"
Else
Me.Bookmark = rs.Bookmark 'synch the form to the found record
End If
End If
I could not find an applicable thread so TIA for the help
Steve