ASP小菜鸟提问

来源:百度知道 编辑:UC知道 时间:2024/05/21 16:58:06
请哪位大哥帮我决绝下分页的问题```加我QQ 120019268 谢谢了 我会给分的

加你的QQ,帮你“决绝”解决。

什么分页问题

<%
e_page=8 '每页记录数
set rs=server.createobject("adodb.recordset") '声明一个记录集
sql="select * from ebook order by id desc"
rs.open sql,conn,3,2
dim pagenum '分页程序代码
rs.pagesize=e_page
if request.querystring("pagenum")="" or request.querystring("pagenum")=0 then
pagenum=1
else
pagenum=request.querystring("pagenum")
rs.absolutepage=trim(request.querystring("pagenum"))
end if
do while not rs.eof and e_page>0
response.write(rs("title"))
response.write(rs("..."))
response.write(rs("..."))
e_page=e_page-1
rs.movenext
loop
for p=1 to rs.pagecount '逐个输出分页页面
response.write "<a href=index.asp?pagenum="&p&">第"&p&"页</a> "
next
%>

QQ:267359631