[求助]翻页的时候为什么页数超过十就不能翻页了？
翻页的时候为什么页数超过十就不能翻页了？按下页的时候总是刷新
[求助]
<%
set rsc = server.CreateObject ("Adodb.recordset")
sqlc="select * from Pro_class order by ID"
rsc.open sqlc,conn02,1,1
set rsn1 = server.CreateObject ("Adodb.recordset")
sqln1="select * from Pro_nclass order by PID"
rsn1.open sqln1,conn02,1,1
PID=rsn1("PID")
OID=rsn1("ID")
set rsn = server.CreateObject ("Adodb.recordset")
if request("NID")="" then
sqln="select * from Pro_NClass where PID="&PID&" order by PID"
else
sqln="select * from Pro_nclass where PID="&request("NID")
end if
rsn.open sqln,conn02,1,1
%>
<%if request("Nname")<>"" then
Nname=request("Nname")
response.Write(Nname)
elseif request("NID")<>"" then
set rsb= server.CreateObject ("Adodb.recordset")
sqlb="select * from Pro_NClass where PID="&request("NID")
rsb.open sqlb,conn02,1,1
nameb=rsb("name")
response.Write(nameb)
elseif request("NID")="" and request("Nname")="" then
response.Write("产品列表")
end if%> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top">
<table width="500" border="0" cellspacing="20" cellpadding="0">
<tr>
<td valign="top">
<table width="500" border="0" align="center" cellpadding="1" cellspacing="6">
<%
set rs = server.CreateObject ("Adodb.recordset")
if request("OID")="" and request("NID")="" then
sql="select * from Pro_obj where nclassID="&OID
elseif request("NID")<>"" and request("OID")="" then
set rsa= server.CreateObject ("Adodb.recordset")
sqla="select * from Pro_NClass where PID="&request("NID")
rsa.open sqla,conn02,1,1
sql="select * from Pro_obj where NClassID="&rsa("ID")
else
sql="select * from Pro_obj where NClassID="&request("OID")
end if
rs.open sql,conn02,1,1
OID1=rs("NCLassID")%>
<%
set rsc = server.CreateObject ("Adodb.recordset")
sqlc="select * from Pro_class order by ID"
rsc.open sqlc,conn02,1,1
set rsn1 = server.CreateObject ("Adodb.recordset")
sqln1="select * from Pro_nclass order by PID"
rsn1.open sqln1,conn02,1,1
PID=rsn1("PID")
OID=rsn1("ID")
set rsn = server.CreateObject ("Adodb.recordset")
if request("NID")="" then
sqln="select * from Pro_NClass where PID="&PID&" order by PID"
else
sqln="select * from Pro_nclass where PID="&request("NID")
end if
rsn.open sqln,conn02,1,1
%>
<%
DIM Pages,PageNum
rs.PageSize=4
Pages=rs.PageCount
if request("page")="" OR trim(request("page"))>trim(Pages) then
rs.AbsolutePage=1
PageNo=1
else
rs.AbsolutePage=request("page")
PageNo=request("page")
end if
j=0
Do While Not rs.EOF AND j<rs.PageSize
%>
<tr align="center">
<td width="264"><%
if rs("ID")="" then
%>
<table width="100" height="150" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="100" height="6"> </td>
</tr>
</table>
<%
else
%>
<table width="100" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" background="images/dot_bg.gif"><a href="pro_inner.asp?NID=<%=rsn("PID")%>&OID=<%=rsn("ID")%>&id=<%=rs("ID")%>&Name=<%=rs("name")%>" target="_blank"><img src="./Manager/manage/leibie1/pic/pro/<%=rs("pic1")%>" alt="" width="180" border="0" /></a></td>
</tr>
<tr>
<td align="center"><a href="pro_inner.asp?NID=<%=rsn("PID")%>&OID=<%=rsn("ID")%>&id=<%=rs("ID")%>&Name=<%=rs("name")%>" target="_blank"><%=rs("name")%></a></td>
</tr>
</table>
<%end if
rs.movenext
j=j+1
%>
</td>
<td width="236"><div align="center">
<%
if rs("ID")="" then
%>
<table width="100" height="150" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="100" height="6"> </td>
</tr>
</table>
<%
else
%>
<table width="100" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" background="images/dot_bg.gif"><a href="pro_inner.asp?NID=<%=rsn("PID")%>&OID=<%=rsn("ID")%>&id=<%=rs("ID")%>&Name=<%=rs("name")%>" target="_blank"><img src="./Manager/manage/leibie1/pic/pro/<%=rs("pic1")%>" alt="" width="180" border="0" /></a></td>
</tr>
<tr>
<td align="center"><a href="pro_inner.asp?NID=<%=rsn("PID")%>&OID=<%=rsn("ID")%>&id=<%=rs("ID")%>&Name=<%=rs("name")%>" target="_blank"><%=rs("name")%></a></td>
</tr>
</table>
<%end if
rs.movenext
j=j+1
%>
</div></td>
</tr>
<%
j=j+1
Loop
%>
</table>
<table align="center">
<tr>
<td><form action='<%=request.servervariables("URL")%>' method="post" name="p2" id="p2"
style="margin-bottom:0;margin-top:0">
共<%=pages%>页 <a href='<%=request.servervariables("URL")%>?page=1&OID=<%=oid1%>'
style="color:#0066ff">首页</a>
<%if PageNo>1 then%>
<a href='<%=request.servervariables("URL")%>?page=<%=PageNo-1%>&OID=<%=oid1%>'
style="color:#0066ff">上页</a>
<%else%>
<font color='#555555'>上页</font>
<%end if%>
<%if PageNo<trim(pages) then%>
<a href='<%=request.servervariables("URL")%>?page=<%=PageNo+1%>&OID=<%=oid1%>'
style="color:#0066ff">下页</a>
<%else%>
<font color='#555555'>下页</font>
<%end if%>
<a href='<%=request.servervariables("URL")%>?page=<%=pages%>&OID=<%=oid1%>'
style="color:#0066ff">尾页</a>
</form>
