Return to Snippet

Revision: 48598
at July 6, 2011 02:32 by CaptainProton

Initial Code
Dim sql As String
Dim rstRecordset As recordset

sql = "SELECT * FROM xxx;"
Set rstRecordset = CurrentDb.OpenRecordset(sql, dbOpenSnapshot)

If rstRecordset.RecordCount > 0 Then

  Do While Not rstRecordset.EOF
    'Access values with rstRecordset(0), rstRecordset(1), etc.
End If

Initial URL

Initial Description

Initial Title
Loop through Recordset

Initial Tags

Initial Language
Visual Basic