ADO - MoveNext &MovePrevious

1. MoveNext

• Purpose: Moves the record pointer forward to the next record in the Recordset.

• Syntax:

  rs.MoveNext
  

• Usage Notes:

  • Used when looping through all records, typically with a Do Until rs.EOF loop.

  • If the current record is the last record, calling MoveNext moves the pointer past the last record — setting EOF = True.

  • Always check for EOF after moving.

Example:

Set rs = conn.Execute("SELECT * FROM Employees")

If Not (rs.BOF And rs.EOF) Then
    rs.MoveFirst
    Do Until rs.EOF
        MsgBox rs("EmployeeName")
        rs.MoveNext
    Loop
End If

2. MovePrevious

• Purpose: Moves the record pointer backward to the previous record in the Recordset.

• Syntax:

  rs.MovePrevious
  

• Usage Notes:

  • Used when you want to move backward through the records.

  • If the current record is the first record, calling MovePrevious moves the pointer before the first record — setting BOF = True.

  • Can only be used if the Recordset supports backward movement (not possible with adOpenForwardOnly).

Example:

rs.Open "SELECT * FROM Employees", conn, adOpenStatic, adLockReadOnly

rs.MoveLast
Do Until rs.BOF
    MsgBox rs("EmployeeName")
    rs.MovePrevious
Loop

3. Cursor Type Requirement

• Both MoveNext and MovePrevious depend on the cursor type:

  • MoveNext → works with all cursor types.

  • MovePrevious → requires a scrollable cursor, such as:

    • adOpenStatic

    • adOpenKeyset

    • adOpenDynamic

Example:

rs.Open "SELECT * FROM Employees", conn, adOpenStatic

4. Summary Table