简单的分页小处理
page=clng(request("page")) '取得当前页
pagesize=30 '每页30条
sql="select count(id) from grzl"
rs.open sql,conn,1,1
maxnum=rs(0) '总记录数
rs.close
if maxnum>0 then
pagenum=clng(maxnum/pagesize)+1
if page<=0 or page>pagenum then page=1
sql="select top "&pagesize&"* from grzl where id not in (select top "&pagesize*(page-1)&" id from grzl order by zcrq) order by zcrq"
rs.open sql,conn,1,1
else
'没有记录处理
end if
分页链接自己做吧 跟通常的差不多
[此贴子已经被作者于2006-11-7 16:56:37编辑过]