Invalid Bookmark

[maggielea]

Hi! I have the following code.........

' Find the record in CCinventory that matches the control.
Set rstccinv = db.OpenRecordset("CCInventory", dbOpenDynaset)
If Not IsNull(Me.txtAlloyIDFK) Then
rstccinv.FindFirst "[alloyid] = " & Me.txtAlloyIDFK.Value
If Not rstccinv.EOF Then Forms!invtabnew.Bookmark = rstccinv.Bookmark
End If
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

I get error 3159 - Not a valid Bookmark when I run this.
This has only begun to happen on the new records I've been adding to an existing table...
All help is appreciated! Thanks, Maggie

 

[PHV]

what happens if you replace this:
Set rstccinv = db.OpenRecordset("CCInventory", dbOpenDynaset)
with this ?
Set rstccinv = Forms!invtabnew.RecordsetClone

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[maggielea]

Hi, I just tried your suggestion and got the same error message... It almost seams that somehow when I add a new record to CCInventory table that the AutoNumber AlloyID gets corrupted somehow. Do you have any other suggestions. Thanks, Maggie