Problema Paginazione

[AleXab]

Questo script mi da un problema quando tento di visualizzare le pagine successive cioè non mostra i record

<%
Response.Buffer = true;


var cerca = new String(Request.QueryString("cerca"));
var testo = new String(Request("stringa"));
var apice = testo.replace(/'/g,"''");
var stringa = apice.split(" ");
if (cerca == "OK")
{
if (testo == "" || testo == "undefined")
{
Response.Write("

Inserire almeno una parola per effettuare una rcerca</p>");
}
else
{
var Cn = new ActiveXObject("ADODB.Connection");
var Sc = "driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("database.mdb");
Cn.Open(Sc);

var sql = "SELECT * FROM documenti WHERE ";
var Mostra = new ActiveXObject("ADODB.Recordset");





for (var c=0; c<stringa.length; c++)
{if (c > 0)
{sql += " AND";
}
sql += " titolo LIKE '%" + stringa[c] + "%'";
}
sql += " ORDER BY titolo";


Mostra.Open(sql,Cn,1);

var pag = parseInt(Request.QueryString("id"));
if (isNaN(pag) || pag < 1) pag = 1;
if (!Mostra.EOF) {
Mostra.PageSize = 1;
Mostra.AbsolutePage = pag;
}
var i = 0;


if (Mostra.EOF)
{
Response.Write("

Nessun risultato</p>");
}
else

{
while (!Mostra.EOF && i<1)
{
with (Response)
{

Write("[img]" + Mostra("foto") + "[/img]

");
Write("" +Mostra("titolo") + "
");
Write(Mostra("descrizione"));
Write("</p>");
Mostra.MoveNext();
i++;

}
}
}




%>


<div align="center">
<%
for (var i=0; i<Mostra.PageCount; i++)
{
if (pag == (i + 1))
{
%>
<%=(i + 1)%>
<%} else {%>
<%=(i + 1)%>
<%
}
}
%>
</div>

<%

Cn.Close();
}
}
%>

Dove sbaglio!!!!!!!!!!!

[Roby_72]

I parametri nella query mediante i quali filtri i record vanno messi nei link della paginazione.

Roby

[AleXab]

Grazie Roby la tua indicazione è stata molto prezziosa

[AleXab]

con 3 zzz

[Roby_72]

Originariamente inviato da AleXab
Grazie Roby la tua indicazione è stata molto prezziosa