ti chiedo scusa.. questo è il codice della mia pagina... come dovrei modificarlo?

<%
pagina = Request.QueryString("pag")

indice = pagina * 10 - 9

If pagina = "" Then
indice = 1
pagina = 1
End If

Set connNews = Server.CreateObject("ADODB.Connection")
connNews.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database/casanet.mdb")
sql = "SELECT * FROM listino ORDER BY 4 ASC"
Set news = Server.CreateObject("ADODB.Recordset")
news.Open sql, connNews, 3, 3
news_totali = news.RecordCount

For i = 1 to (indice - 1)
If not news.EOF Then
news.MoveNext
End If
Next
%>[/i] <%
For i = 1 To 10
If not news.EOF Then
%>



grazie mille e scusami ancora :\