复制代码 代码如下:
%
set rs=server.createobject("adodb.recordset")
exce="sql" 'sql 查询语句
rs.open exce,conn,1,1
%>
然后是分页属性的设置
%
rs.PageSize=3 ‘设置页码
pagecount=rs.PageCount '获取总页码
page=int(request("page")) '接收页码
if page=0 then page=1 '判断
if request("page")="" then page=1
rs.AbsolutePage=page '设置本页页码
%>
最后是body里的分页显示
%
if rs.bof and rs.eof then
response.write("NULL")
else
for i=1 to rs.PageSize
response.write rs("name")
response.write("hr>")
rs.movenext
next
end if
%>
p>
%if page=1 and not page=pagecount then%>
首页|前一页
a href="log1.asp?page=%=page+1%>">后一页/a>|
a href="log1.asp?page=%=pagecount%>">末页/a>
%elseif page>1 and not page=pagcount then%>
a href="log1.asp?page=1">首页/a>|
a href="log1.asp?page=%=page-1%>">前一页/a>|
a href="log1.asp?page=%=page+1%>">后一页/a>|
a href="log1.asp?page=%=pagecount%>">末页/a>
%elseif page=pagecount then%>
a href="log1.asp?page=1">首页/a>|
a href="log1.asp?page=%=page-1%>">前一页/a>|
下一页|
末页
%end if%>
您可能感兴趣的文章:- ASP.NET 高性能分页代码
- 简单的ASP分页代码(测试正确)
- asp.net下经典数据库记录分页代码
- Asp.net 通用万级数据分页代码[修正下载地址]
- asp.net 结合mysql存储过程进行分页代码
- asp 存储过程分页代码
- asp.net中使用repeater和PageDataSource搭配实现分页代码
- asp万用分页程序代码