ASP分页

Hotus 2009-07-29 11:54:53

ASP+SQL如何实现这种分页效果呢?
...全文
51 点赞 收藏 8
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
wpjwll 2009-07-30
百度一下,很多的!
回复
liuwei_IT_love 2009-07-30
Dim page_size '声明每页多少条记录 Dim page_no '声明当前是第几页 Dim page_total '声明总页数
page_size=10 '每页显示记录数
If Request("page_no")="" Then page_no=1
Else
page_no=cint(Request("page_no"))
End If
Session("page_no")=page_no rs.PageSize=page_size '设置每页多少条记录
page_total=rs.PageCount '返回总页数
rs.AbsolutePage=page_no '设置当前显示第几页
Dim I,J
I=0 '该变量用来输出序号
J=page_size '该变量用来控制显示当前页
Do While Not rs.Eof And J>0 '循环直到当前页结束或文
I=I+1
J=J-1
%>

<tr align="center" bgcolor="#FFFFFF" class="t">
<td><span class="STYLE4 STYLE1">
<% =(page_no-1)*page_size+I %>
</span>
<td>显示的内容。。。。
</td>
</tr>

<%
rs.MoveNext
Loop
End If
%>



<%
private sub select_page(page_no,total_page)
Response.Write "请选择页码:"
Dim I
for I=1 to total_page
If I=page_no Then
Response.Write I & " "
Else
Response.Write "<a href='index.asp?page_no=" & I & "'>" & I & "</a> "
End If
next
End sub
%>



<% '调用子程序,写出有关各页的链接信息
Call select_page(page_no,page_total)
%>





回复
呵呵,自己写一点问题都没有,又不是很复杂的效果,就是一些判断,客户端就是CSS的效果了
回复
hookee 2009-07-29
用jquery的插件即可
http://d-scribe.de/webtools/jquery-pagination/demo/demo_options.htm
下载http://plugins.jquery.com/files/jquery_pagination.zip
回复
wwwhhb4001 2009-07-29

同问
回复
oywkkai 2009-07-29
学习
回复
number123456 2009-07-29
你是想要那个CSS的样式效果呢,还是要页码显的效果呢?
页码显示的效果可以用以下方法
page '当前页数
paper'总页数
<a href=?page=1>1</a>
<%
for i = page - 3 to page + 3
if i > 1 and i < paper - 1 then
Response.write "<a href=?page="&i&">"&i&"</a> "
end if
next
for i = paper - 1 to paper
Response.write "<a href=?page="&i&">"&i&"</a> "
next
%>
回复
lwjsw2320214 2009-07-29
那个能吧代码发出来 嘛
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告