Ciao a tutti. Ho questo problema:
Ho inserito lo script della paginazione di Roby72 su una mia pagina con già degli script. a far Invece di farmi visualizzare 6 record alla volta per pagina, mi visualizza tutti i record. Non riesco a trovare l'errore... potete aiutarmi?
Ho sottolineato in rosso dove penso, non sono sicuro, ci sia da fare la modifica, ma non ho idea di come intervenire e....
Spero di essere stato comprensivo
Vi ringrazio a tutti sin da ora
Ciao
Codice:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
iPageSize = 6 'NUMERO RECORD PER PAGINA
If Request.QueryString("page") = "" Then
iPageCurrent = 1
Else
iPageCurrent = CInt(Request.QueryString("page"))
End If
Set rs=server.CreateObject("ADODB.recordset")
strSQL = "SELECT * FROM storico ORDER BY id desc"
rs.PageSize = iPageSize
rs.CacheSize = iPageSize
rs.Open strSQL,conn,3,3
reccount = RS.recordcount
iPageCount = RS.PageCount
If iPageCurrent > iPageCount Then iPageCurrent = iPageCount
If iPageCurrent < 1 Then iPageCurrent = 1
If iPageCount = 0 Then
Response.Write "
<table><td><font face='verdana' size='2' color='#000000'>Non sono stati trovati.</td></table></p>"
Else
RS.AbsolutePage = iPageCurrent
iRecordsShown = 0
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
</head>
<body topmargin="2" leftmargin="5" marginwidth="0" marginheight="5">
<%
cella = 1
Do While not rs.eof
if cella = 1 then
%>
<tr>
<%
end if
if cella < 4 then
%> <td nowrap bgcolor="#FFFFFF" align="center"><span class="Stile3">
<font face="Verdana" size="1">
<a href="javascript:aprix('/archivio_dettaglio.asp?id=<%=rs("id")%>','','menub ar=no,status=no,scrollbars=yes,menubar=no,resizabl e=no,location=no,top=20,left=20,width=450,height=5 00')">
[img]images/archivio/<%=rs([/img]" alt=""></a></font>
<font face="Verdana" size="1">
','','menubar=no,status=no,scrollbars=yes,menubar= no,resizable=no,location=no,top=20,left=20,width=4 50,height=500')"><%=rs("data")%></font></span>
</td>
<%
cella = cella + 1
end if
if cella = 4 then
cella = 1
%>
</tr>
<%
end if
rs.movenext
loop
%>
</table>
<%If ipagecount <> 1 Then%>
<center>
<table>
<tr valign="middle">
<td width="50%" align="center" valign="middle"><font face="verdana" size="1" color="#000000">
[
<%if iPageCurrent-2 > 0 and iPageCurrent > 2 then%>
[img]images2/first.gif[/img]
<%end if%>
<%if iPageCurrent > 1 then%>
[img]images2/pre.gif[/img]
<%end if%>
<%if iPageCount > 2 then
if iPageCurrent-2 < 1 then da_pag = 1 else da_pag = iPageCurrent-2
if iPageCurrent+2 > iPageCount then fino_a_pag = iPageCount else fino_a_pag = iPageCurrent+2
else
da_pag = 1
fino_a_pag = iPageCount
end if%>
<%for i = da_pag to fino_a_pag%>
<%if i = iPageCurrent then%>
<font color="red"><%=i%></font>
<%else%>
<%=i%>
<%end if%>
<%next%>
<%if iPageCurrent > 0 and iPageCurrent < iPageCount then%>
[img]images2/next.gif[/img]
<%end if%>
<%if iPageCurrent+1 < iPageCount then%>
[img]images2/last.gif[/img]
<%end if%>
]
</font></td>
</tr>
<tr>
<td colspan="2" align="center"><font face="verdana" size="1" color="#000000">
<center>
Pagina
<font color="#FF0000"><%=iPageCurrent%></font>
di
<font color="#FF0000"><%=iPageCount%></font>
</center>
</font></td>
</tr>
</table>
</center>
<%end if%>
<%end if%>
Rispondi quotando
