MySQL - Mover el Recordset en VB6 con Mysql

Tengo una BD en MYSQL con VB6 adiciono y borro registros muy bien pero no se como programar para moverme por el recordset o sea mostrar el siguiente registro o el anterior, porque el primero y el ultimo me salen bien
Esto es lo que hice para ver el primero
Private Sub cmdPrimero_Click()
Set conn = New ADODB.Connection
conn.CursorLocation = adUseClient
conn.ConnectionString = "Data Source=Jigue"
conn.Open
Set Jose = New ADODB.Recordset
Jose.Open "SELECT * FROM laris", conn, adOpenDynamic, adLockOptimistic
Jose.MoveFirst
txtnombre.Text = Jose!nombre
txtapellido.Text = Jose!apellido
txtedad.Text = Jose!edad
End Sub

Pero no me resulta para Anterior y Siguiente

Les agradecere cualquier ayuda

para moverte al sig. es con movenext(jose.movenext) y para el anterior es movelast(jose.movelast), asi de facil espero te sirva

Ya lo hice pero no me funciona.
me dice que necesita un registro o el BOF o el EOF son verdaderos

Debes validar si existen registros antes de hacer un movimiento dentro de los recordsets.

Si ya tienes datos y te sale con que el recordcount está en cero, entonces hay algo mal.

Mmmmmm. Eso me suena como que tuvieras un campo de texto largo dentro de la tabla, eso me había pasado antes.

Logre resolverlo

tendras que que validar primero si el recordset tiene informacion con la sig. instruccion

if rstdatos.recordcount>0 then
' una vez que compruebes que tiene informacion, preguntaras si no esta al inicio o fin de tus datos con la sig. instruccion
if rstados.bof=false and rstdatos.eof=false then
.
.
end
....
else
msgbox "no hay datos"
end

en tal caso hazle caso al otro comentario de ayudante

Como seria el script para hacer esto en una aplicacion php-mysql