D
Diarmuid
I'm having a problem using the RecordsetClone. The form is based on a
snapshot. The code below works fine unless I make a change to the data. If I
edit the record in frmTimePop, I get an error on rsClone.FindFirst stSearch
as follows
3420 Object invalid or no longer set.
Any ideas?
Thanks
Diarmuid
'************************************
Dim rsClone As DAO.Recordset
stDocName = "frmTimePop"
stSearch = "DetailID = " & Me.DetailID
DoCmd.OpenForm stDocName, , , , , acDialog, stOpenArgs
Me.Requery
Set rsClone = Me.RecordsetClone
rsClone.FindFirst stSearch
If rsClone.NoMatch Then
MsgBox "Problem finding record", vbCritical
Else
Me.Bookmark = rsClone.Bookmark
End If
rsClone.Close
snapshot. The code below works fine unless I make a change to the data. If I
edit the record in frmTimePop, I get an error on rsClone.FindFirst stSearch
as follows
3420 Object invalid or no longer set.
Any ideas?
Thanks
Diarmuid
'************************************
Dim rsClone As DAO.Recordset
stDocName = "frmTimePop"
stSearch = "DetailID = " & Me.DetailID
DoCmd.OpenForm stDocName, , , , , acDialog, stOpenArgs
Me.Requery
Set rsClone = Me.RecordsetClone
rsClone.FindFirst stSearch
If rsClone.NoMatch Then
MsgBox "Problem finding record", vbCritical
Else
Me.Bookmark = rsClone.Bookmark
End If
rsClone.Close