Mi accade una cosa stranissima.
Se vado avanti si un record funziona correttamente, se vado indietro mi torna indietro di 2 o 3 record.

codice:
<%
  page = request.queryString("page")
  azione=request.querystring("azione")
  if page = "" then
   page= 1
  end if
  RecordsPerPagina = 1
  SET objConn=Server.CreateObject("ADODB.Connection")
  strconn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="
  strconn= strconn + Server.MapPath("db\Negozio.mdb")
  objconn.Open strconn
  SET objrs=Server.CreateObject("ADODB.Recordset")
  SQL="SELECT * FROM Prodotti"
  objrs.Open SQL, objConn, 3,3
  objrs.PageSize = RecordsPerPagina
  objrs.AbsolutePage = page
  For i=1 to RecordsPerPagina
   if not azione="indietro" and not azione="avanti" then
    response.write "Prezzo:"&objrs("prezzo")&"" %>
    [img]images/avanti.gif[/img]
    [img]images/indietro.gif[/img]
 <% else
    if azione ="indietro" then
     if not objrs.bof then
      objrs.moveprevious
      response.write "Prezzo:"&objrs("prezzo")&"" %>
      [img]images/avanti.gif[/img]
      [img]images/indietro.gif[/img]
   <% else
      objrs.movelast
      response.write "Prezzo:"&objrs("prezzo")&"" %>
      [img]images/avanti.gif[/img]
      [img]images/indietro.gif[/img]
 <%  end if
    else
     if not objrs.eof then
      objrs.movenext
      response.write "Prezzo:"&objrs("prezzo")&"" %>
      [img]images/avanti.gif[/img]
      [img]images/indietro.gif[/img]
 <%   else
       objrs.movefirst
       response.write "Prezzo:"&objrs("prezzo")&"" %>
       [img]images/avanti.gif[/img]
       [img]images/indietro.gif[/img]
<%   end if
    end if
   end if
  Next %>

 <%
    objrs.Close
    Set objrs = Nothing
    objconn.close
    Set objconn=nothing
%>
Dove sbaglio? :master: :master:
In più non riesco a capire perchè non capisce quando arriva alla fine del file!