Ciao a tutti, pultroppo pensavo di aver risolto ma non va ancora


allora io ho bisogno di scorrere il database cosi:

esempio: ho 10 record ed un tasto avanti ed uno indietro

clicco su avanti e scorro 1,2,3,4,5,6,7,8,9,10, poi deve tornare a 1,2, ecc... al contrario se clicco su indietro deve andare cosi 3,2,1, poi 10,9,8, ecc..

io ho fatto cosi:

codice:
            Case "sfogliaavanti"
            
                If Data.Recordset.EOF Then
                    Data.Recordset.MoveFirst
                
                Else
                
                id = (Data.Recordset.Fields("id"))
                autore = (Data.Recordset.Fields("autore"))
                descrizione = (Data.Recordset.Fields("descrizione"))
                url = (Data.Recordset.Fields("url"))
                foto = (Data.Recordset.Fields("foto"))

                Data.Recordset.MoveNext
                
                End If

            Case "sfogliaindietro"

              If Data.Recordset.BOF Then
                    Data.Recordset.MoveLast
                    
                Else
                    
                id = (Data.Recordset.Fields("id"))
                autore = (Data.Recordset.Fields("autore"))
                descrizione = (Data.Recordset.Fields("descrizione"))
                url = (Data.Recordset.Fields("url"))
                foto = (Data.Recordset.Fields("foto"))

                
                Data.Recordset.MovePrevious
                    
                End If

            End Select
ma non va propio bene perché??