How do you move to a specific record?

[MrMajik]

Opening a recordset as ADODB...I have a loop that searches for a record in a table using the MoveNext command until the search is satisfied.

TableName = tblAgency
The field on the form that the search is done to is called txtAgencyId

When it finds the record how do I make that record the current record so it's data appear in the fields on a form?

Thank you.

 

[FirstAndGoal4]

I assume you have a form that does not have a RecordSource but does have unbound controls on it? If so, you write code to set the value of the controls to the values in the recordset.

 

[jbehrne]

Try this bit of code: Set it on your form's "On Open" event

Me.RecordsetClone.MoveLast
Me.Bookmark = Me.RecordsetClone.Bookmark

jbehrne If at first you don't succeed, call in an airstrike. - Murphy's Laws of Combat Operations

 

[jbehrne]

Sorry,

That returns the last record! I pulled it from the wrong form in my db...

Try this instead:
- You will have to rename FormName to your form's name in the code
- You will have to rename YourVariableHoldingValue to whatever the name of your variable is that holds the value returned from your loop
**********************************************************
Dim RecNum

RecNum = YourVariableHoldingValue
Requery
Forms!FormName.RecordsetClone.FindFirst "FormName.txtAgencyId
= " & RecNum
Forms!FormName.Bookmark = Forms!FormName.RecordsetClone.Bookmark
**********************************************************

HTH,

jbehrne If at first you don't succeed, call in an airstrike. - Murphy's Laws of Combat Operations