How to Loop thru DAO recordset connected to ODBC database

[steveapa]

Hi.

How do I loop thru the recordset? rsRDO.movenext works, but rsRDO.movelast, first, previous does not work. Excerpts below

Dim wsEngine As DAO.Workspace
Dim dbConnect As DAO.Database
Dim rsRDO As DAO.Recordset

Set wsEngine = CreateWorkspace("ODBCWorkspace", "[User Name]", "[Password]", dbUseODBC)
Set dbConnect = wsEngine.OpenDatabase("[Name]", , , connectstr)
Set rsRDO = dbConnect.OpenRecordset(sqlstr)
rsRDO.movenext
'do stuff
rsRDO.movefirst

The query runs properly. rsRDO.movenext works properly, but how do I go back in the recordset? I need to loop thru the recordset, looking for something, then go back to the beginning and look for the next something.

When I try rsRDO.movefirst, I get error# 3219

Thanks.
Steve
Harrisburg, PA

 

[steveapa]

SOLVED: Problem was how I opened the recordset. It should have been:
Set rsRDO = dbConnect.OpenRecordset(sqlstr, dbOpenDynaset) ' to read and edit, move forward and back
or
Set rsRDO = dbConnect.OpenRecordset(sqlstr, dbOpenSnapshot) ' to only read forward and back, no edit