Question

asp分页的问题

<%
rs.PageSize = 15
rs.CacheSize = 15
pagecount=CInt(rs.PageCount)
recordcount=rs.RecordCount

If request("page")="" Then
page=1
Else If IsNumeric(request("page")) then
If CInt(request("page"))>pagecount Then
page=pagecount
Else If CInt(request("page"))<1 Then
page=1
Else
page=request("page")
End If
End If
Else
page=1
End If
End If
rs.AbsolutePage = page
%>

谁来解释一下代码？

Answer 1

rs.PageSize = 15 设定逻辑页面中记录的个数
rs.CacheSize = 15 CacheSize是记录集每次从服务器返回的记录数,适当的数值可以提高速度,一般不用设啦
pagecount=CInt(rs.PageCount) 将返回记录集的逻辑个数（页面数）给变量pagecount赋值
recordcount=rs.RecordCount 将返回所有记录数的个数 给变量recordcount赋值

If request("page")="" Then request返回的值若为空 page的值为1 （默认为第一页）
page=1
Else If IsNumeric(request("page")) then 否则如果返回值为IsNumeric函数判断返回ture值（IsNumeric函数：IsNumeric(expression)如果expression为数字返回true，否则返回fouse）

If CInt(request("page"))>pagecount Then 如果返回page值大于返回的逻辑页面值，page=pagecount 那么page设置成最后为逻辑页面的最大页面（最后一页）

Else If CInt(request("page"))<1 Then 如果返回值小于1，
page=1 那么page设为1.(最初页)
Else
page=request("page") 不满足以上条件的话，直接给page赋值
End If
End If
Else
page=1 否则默认值为（显示第一页）
End If
End If
rs.AbsolutePage = page 将当前页面指定为page变量的页面

简单的说：
设定了一些recordset的值
判断一个返回值page
如果返回的数字大于你设定的逻辑页面数，那么就显示最后一页
如果返回的数字小于你设定的逻辑页面数，那么就显示第一页
如果没有变化，默认显示第一页

Answer 2

<%
set rs=server.CreateObject("adodb.recordset")
rs.open "zc",conn,1,1
if rs.eof then
response.Write("无数据")
end if
rs.pagesize=2
pageno=request("page")
if pageno="" then
pageno=1
else
pageno=cint(request("page"))
end if
if pageno<1 then
pageno=1
end if
if pageno>rs.pagecount then
pageno=rs.pagecount
end if
rs.absolutepage=pageno
rows=0
%>
加表单表格
<%
while not rs.eof and rows<rs.pagesize
%>
分页的内容
<%
rows=rows+1
rs.movenext
wend
%>
表格表单结束
<td colspan="5">
<%
if pageno<>1 then
%>
<a href=?page=1>[第一页]</a>
<a href=?page=<%=pageno-1%>>[上一页]</a>
<%
end if
%>
<%
if pageno<>rs.pagecount then
%>
<a href=?page=<%=pageno+1%>>[下一页]</a>
<a href=?page=<%=rs.pagecount%>>[最后一页]</a>
<%
end if
%>
后面是下拉列表显示分显的内容和上一页,下一页显示是一样的
<form action="" method="get" name="form1">
<table align="center" border="1" width="500">
<tr>
<td>
页数
<input name="page" type="text" id="page" value="<%=request("page")%>"/>
<input name="ok" type="submit" id="ok" value="提交" /></td>
</tr>
</table>
</form>