Cari amici,

ho sempre lo stesso problema che non riesco a risolvere. c'è tra voi una o più anime gentili?

Passo al problema:

Con questo script la paginazione và avanti ed indietro ottimamente ma il risultato propone sempre la stessa pagina…….

dim serie
serie=1
if len(trim(request.querystring("s")))>0 then
serie=cint(request.querystring("s"))
end if

dim page
if trim(request.querystring("pag")) <> "" then
page = cint(request.querystring("page"))
else
page = 1
end if


showPage=10 'numero di pagine visualizzate

dim lpage,tpage
lpage=((serie*showPage)-showPage)+1
tpage=serie*showPage

if page<lpage then page=lpage

if serie>1 then response.write " Precedenti "

for i=lpage to tpage
if i=page then
response.write i
else
response.write " . " & i & ""
end if
next

response.write ". Successive"