最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp中实用分页程序代码
时间:2022-06-29 14:23:12 编辑:袖梨 来源:一聚教程网
page=request("page")
if page<>"" then
p_absolutepage=cint(page)
else
p_absolutepage=1
end if
sql="select * from [date]"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
p_pagesize=2
rs.pagesize=p_pagesize
rs.absolutepage=p_absolutepage
p_pagecount=rs.pagecount
if p_pagecount=0 then p_pagecount=1
p_recordcount=rs.recordcount