Equivalent ADO command for .Findfirst in DAO

[DougP]

I know I can turn on DAO in references and it will work. But I also use ADO for everything else and would rather just have one Database technolgy going instead of both. Plus this old legacy code still works.

I am "syncing" using a bookmark two subforms to each other and the main form does not have any recordset at all.

here is my code:
------------------------------
Dim SyncCriteria As String
Dim rs As Recordset

'Define the from object and recordset object for the AutoCAD form
Set rs = Me![Manuals subform].RecordsetClone

' define the criteria used for the sync
SyncCriteria = "[Manual]='" & Me![Manual] & "'"

' find the corresponding record in the Parts table
rs.FindFirst SyncCriteria '<<<<< what ADO will work here
f.Bookmark = rs.Bookmark
------------------------------

Thanks for Any Ideas
DougP, MCP

Visit my WEB site

http://www.barcodeone.com

to see how Bar-codes can help you be more productive

 

[braindead2]

rs.find SyncCriteria