专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅

首页 »Asp教程 » 分页显示:1栏分页显示 »正文

分页显示:1栏分页显示

来源: 发布时间:星期四, 2008年9月25日 浏览:723次 评论:0

显示的形式
id name
1 juliet
2 cristine
3 boy
4 girl
>>首页 前页 后页 尾页 页数:1/44记录/页 总记录数:13条
代码:
<!--page.asp-->
<!--#include file=\"conn.asp\"-->
<html>
<body bgcolor=\"#FFFFFF\" text=\"#000000\">
<table width=\"60%\" border=\"1\" align=\"center\">
<%
dim rs
dim sql
msg_per_page = 4 \'定义每页显示记录条数
set rs = server.createobject(\"adodb.recordset\")
sql = \"select * from page order by id\" \'改成你自己的SQL语句
rs.cursorlocation = 3 \'使用客户端游标,可以使效率提高

rs.pagesize = msg_per_page \'定义分页记录集每页显示记录数
rs.open sql,conn,0,1

if err.number<>0 then \'错误处理
response.write \"数据库操作失败:\" & err.description
err.clear
else
if not (rs.eof and rs.bof) then \'检测记录集是否为空
totalrec = RS.RecordCount \'totalrec:总记录条数
if rs.recordcount mod msg_per_page = 0 then \'计算总页数,recordcount:数据的总记录数
n = rs.recordcountmsg_per_page \'n:总页数
else
n = rs.recordcountmsg_per_page+1
end if

相关文章

读者评论

  • 共0条 分0页

发表评论

  • 昵称:
  • 内容: