asp如何实现分页 - ASP - 新微赢技术网

让爱留在心底

电梯直达

1^#

发表于 2010-1-10 22:59:10 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

小弟刚刚开始学asp
不知asp如何实现分页,请说的仔细一点,最好附上带有注释的塬代码

不甚感激

收藏0

使用道具举报

(のkisδ≒雪

2^#

发表于 2010-1-10 22:59:15 | 只看该作者

回复支持反对

使用道具举报

遗失ぜ的ァ美

3^#

发表于 2010-1-10 22:59:19 | 只看该作者

<%
dim page_size
dim page_no
dim page_total
dim wenjianming
wenjianming="a.asp"
page_size=10
if request.querystring("page_no")="" then
page_no=1
else
page_no=cint(request.querystring("page_no"))
end if
rs.pagesize=page_size
page_total=rs.pagecount
if not(rs.bof or rs.eof) then
rs.absolutepage=page_no
end if
dim i
i=page_size
%>

<%
if page_total=1 then
response.write "首页|上一页|下一页|尾页"
else
response.write "<a href=" & wenjianming & "?page_no=1>首页</a>|"
if page_no-1>0 then
response.write "<a href=" & wenjianming & "?page_no=" & page_no-1 & ">上一页</a>|"
else
response.write "上一页|"
end if
if page_no+1<=page_total then
response.write "<a href=" & wenjianming & "?page_no=" & page_no+1 & ">下一页</a>|"
else
response.write "下一页|"
end if
response.write "<a href=" & wenjianming & "?page_no=" & page_total & ">尾页</a>"
end if
%>

回复支持反对

使用道具举报

水清苓

4^#

发表于 2010-1-10 22:59:23 | 只看该作者

为什么我问同样的问题确得不到这样的回答,看来我运气太差了.

回复支持反对

使用道具举报

^o^星禾じ☆v

5^#

发表于 2010-1-10 22:59:27 | 只看该作者

学习中!!!!!!!!!!

回复支持反对

使用道具举报

緣妢_兲紸龍

6^#

发表于 2010-1-10 22:59:32 | 只看该作者

真耐心，真好人！！！

回复支持反对

使用道具举报

‘為ㄋ袮

7^#

发表于 2010-1-10 22:59:36 | 只看该作者

以下是引用piaoxue在2006-2-13 10:04:00的发言：

<%
dim page_size
'声明变量这个应该是每页的从数据库中读取的纪录数
dim page_no
'这个变量应该是当前页的页码（也就是记录第几页的变量)
dim page_total
'总页数变量
dim wenjianming
wenjianming="a.asp"
page_size=10'设定每页读取10条数据库记录
if request.querystring("page_no")="" then
'判断当前页的页码，为空证明为第一页
page_no=1'设置为第一页
else
'不为空得到当前页码
page_no=cint(request.querystring("page_no"))
end if
rs.pagesize=page_size
'rs.pagesize设定RecordSet对象的pagesize属性该属性已经解释了
page_total=rs.pagecount
'rs.pagesize属性设定后rs.pagecount自动计算一共有多少页。
if not(rs.bof or rs.eof) then'防止错误如果数据库中有记录继续执行
rs.absolutepage=page_no'设定RecordSet对象的当前页
end if
dim i
i=page_size
%>

<%
'一下为翻页的代码防止翻页出错。
if page_total=1 then
response.write "首页|上一页|下一页|尾页"
else
response.write "<a href=" & wenjianming & "?page_no=1>首页</a>|"
if page_no-1>0 then
response.write "<a href=" & wenjianming & "?page_no=" & page_no-1 & ">上一页</a>|"
else
response.write "上一页|"
end if
if page_no+1<=page_total then
response.write "<a href=" & wenjianming & "?page_no=" & page_no+1 & ">下一页</a>|"
else
response.write "下一页|"
end if
response.write "<a href=" & wenjianming & "?page_no=" & page_total & ">尾页</a>"
end if
%>