Combo boxes and subform

[Erik Gjertsen]

I Have synchronize two Combo Boxes. That is going good. But I try to set inn
a subform I got problem.

The fist combo boxes name is master and the second is slave.
The name of the forms is LinkFRM.

SELECT IdentTBL.IdentID, IdentTBL.Fornavn, IdentTBL.Etternavn,
IdentTBL.TkNr, TkTBL.Tknavn, IdentTBL.Telefon, IdentTBL.Mobil
FROM TkTBL INNER JOIN IdentTBL ON TkTBL.TkNr = IdentTBL.TkNr;

And I use following query in the second combo boxes

I have use following query in the second combo boxes
SELECT TkTBL.TkNr, TkTBL.Tknavn, TkTBL.FTKID
FROM TkTBL
WHERE (((TkTBL.FTKID)=[Forms]![LinkFRM]![master]))
ORDER BY TkTBL.TkNr;



I use followed procedure:


Private Sub slave_AfterUpdate()
Me.RecordsetClone.FindFirst "[TkNr]=" & Me![slave]
Me.Bookmark = Me.RecordsetClone.Bookmark

End Sub

And I got following error masages:
Runtime Error 7951
You entered an expression that has an invalid reference to the
RecordsetClone property.

Can someone help me??

Thanks
Erik Gjertsen

 

[Larry Linson]

You need to test the .NoMatch property of the RecordsetClone object to
determine whether or not the Record was, in fact, found, and set the
bookmark only if it was.

Larry Linson
Microsoft Access MVP

 

[Erik Gjertsen]

I am not so familiar with the code so I need a explanation how to do it.

Thanks
Erik Gjertsen

You need to test the .NoMatch property of the RecordsetClone object to
determine whether or not the Record was, in fact, found, and set the
bookmark only if it was.

Larry Linson
Microsoft Access MVP

I Have synchronize two Combo Boxes. That is going good. But I try to set inn
a subform I got problem.

The fist combo boxes name is master and the second is slave.
The name of the forms is LinkFRM.

SELECT IdentTBL.IdentID, IdentTBL.Fornavn, IdentTBL.Etternavn,
IdentTBL.TkNr, TkTBL.Tknavn, IdentTBL.Telefon, IdentTBL.Mobil
FROM TkTBL INNER JOIN IdentTBL ON TkTBL.TkNr = IdentTBL.TkNr;

And I use following query in the second combo boxes

I have use following query in the second combo boxes
SELECT TkTBL.TkNr, TkTBL.Tknavn, TkTBL.FTKID
FROM TkTBL
WHERE (((TkTBL.FTKID)=[Forms]![LinkFRM]![master]))
ORDER BY TkTBL.TkNr;



I use followed procedure:


Private Sub slave_AfterUpdate()
Me.RecordsetClone.FindFirst "[TkNr]=" & Me![slave]
Me.Bookmark = Me.RecordsetClone.Bookmark

End Sub

And I got following error masages:
Runtime Error 7951
You entered an expression that has an invalid reference to the
RecordsetClone property.

Can someone help me??

Thanks
Erik Gjertsen