looping through recordsets

[MBall2003]

Got a pretty easy one i think but i dont know how to do it. How can i open a recordset in code and loop through each record so i can test certain conditions for each record any help would be appreciated thanks

 

[jebry]

Hi!

This is the normal method:

Dim rst As DAO.Recordset

Set rst = CurrentDB.OpenRecordset("YourSet", dbOpenDynaset)

If rst.EOF = True And rst.BOF = True Then
Call MsgBox("There are no records&quot
Else
rst.MoveFirst
Do Until rst.EOF = True
Do your stuff here
rst.MoveNext
Loop
End If

Set rst = Nothing

hth


Jeff Bridgham
bridgham@purdue.edu

 

[MBall2003]

alrite thanks how do i get to a specific column in the recordset?

 

[jebry]

Hi!

After you have set a recordset you can access the fields using rst!YourField

hth


Jeff Bridgham
bridgham@purdue.edu