moveNext and MovePrev problem

is this the right code for move next?

Code:

---

Dim Ssql As String
Set rs = New ADODB.Recordset
Ssql = "select * from StuName order by Fname"
rs.Open (sql), conn, adOpenStatic, adLockOptimistic
If Not rs.EOF Then
rs.MoveNext
If rs.EOF Then
rs.MovePrevious
End If
End If

---

Code:

---

Dim Ssql As String
Set rs = New ADODB.Recordset
Ssql = "select * from StuName order by Fname"
rs.Open (Ssql), conn, adOpenStatic, adLockOptimistic

If Not (rs.EOF Or rs.BOF) Then ' ' checking any rowsets available
rs.movefirst    'moving to topfirst row
Do While Not rs.EOF ''loop all availbale rows
msgbox rs!fieldname 'your code
rs.MoveNext 'moving to next row
rs.Moveprevious 'moving to next row
Loop ''end loop
Endif

---

Wait for Senior's post because i am not sure you can catch my description. i am also new to vbsql.

Why not just take your entire recordset and display it in something like a Listview?

That way, you don't have to move through it, you can scroll through it.

your code isn't working :(

@Hack
is there no way you can use movenext or previous using textbox?