Combo boxes and subform

  • Thread starter Thread starter Erik Gjertsen
  • Start date Start date
E

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
 
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 am not so familiar with the code so I need a explanation how to do it.

Thanks
Erik Gjertsen
Larry Linson said:
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 said:
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
Click to expand...
Click to expand...
 
Back
Top