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