导读:
估计很多初学ASP的朋友开始利用Dreamweaver强大的组件功能写出自己的需要的程序,可惜,程序毕竟是程序,永远也没人转的快。所以当有了比较变态的需求后,问题就来了,好了,废话少说,马上给出在Dreamweaver组件基础上修改来的分页控制!
首先我们要得到数据集的总数,好像直接写CONT得到的是-1,所以我在我私人技术总监张总的提示下这样修改了一下:
将这个:
程序代码
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()
修改为:
程序代码
rs.CursorType = 3
rs.CursorLocation = 3
rs.LockType = 1
rs.Open()
这样我们就可以得到数据集的总数了。
在最接近上面加入下面代码:
程序代码
<%
'当前页数
Dim rs_nowpage
rs_nowpage = rs.AbsolutePosition/rs.pagesize+1
%> '当前页数
Dim rs_nowpage
rs_nowpage = rs.AbsolutePosition/rs.pagesize+1
%>
好了,修改完毕,我们现在要开始调用了
程序代码
<% If (MM_param = "0") then %>
首页
<=上页
< <% else %>
首页
<=上页
<% End If %>
<% for i = 1 to rs.PageCount if i = rs_nowpage then%> for i = 1 to rs.PageCount if i = rs_nowpage then%> <%else%> <% end if next %> end if next %>
<%If (rs_nowpage=rs.PageCount) Then%>
下页=>
尾页
<% else %>
下页=> 尾页
<%End If%>
最后我们来给个总提示和当前显示信息
程序代码
共 <%=rs_total%> 条记录 <%=rs_nowpage%>/<%=rs.PageCount%> 页
'rs_total 总记录数
'rs_nowpage 当前页数
'rs.PageCount 总页数
好了,修改完成,呵呵,是不是比要到处找组件,又不知道该怎么用简单啊!
其实我也是没办法,开始太依赖我的私人技术总监,所以没动什么脑筋,后来给逼的快死了,自己用蠢办法搞吧!
下一步我还要用我的蠢办法来修改出一个功能强大的综合性,多条件搜索引擎,大家祈祷我能成功吧,呵呵!
本文转自
http://www.cnrui.cn/blog/article.asp?id=61
估计很多初学ASP的朋友开始利用Dreamweaver强大的组件功能写出自己的需要的程序,可惜,程序毕竟是程序,永远也没人转的快。所以当有了比较变态的需求后,问题就来了,好了,废话少说,马上给出在Dreamweaver组件基础上修改来的分页控制!
首先我们要得到数据集的总数,好像直接写CONT得到的是-1,所以我在我私人技术总监张总的提示下这样修改了一下:
将这个:
程序代码
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()
修改为:
程序代码
rs.CursorType = 3
rs.CursorLocation = 3
rs.LockType = 1
rs.Open()
这样我们就可以得到数据集的总数了。
在最接近上面加入下面代码:
程序代码
<%
'当前页数
Dim rs_nowpage
rs_nowpage = rs.AbsolutePosition/rs.pagesize+1
%> '当前页数
Dim rs_nowpage
rs_nowpage = rs.AbsolutePosition/rs.pagesize+1
%>
好了,修改完毕,我们现在要开始调用了
程序代码
<% If (MM_param = "0") then %>
首页
<=上页
< <% else %>
首页
<=上页
<% End If %>
<%If (rs_nowpage=rs.PageCount) Then%>
下页=>
尾页
<% else %>
下页=> 尾页
<%End If%>
最后我们来给个总提示和当前显示信息
程序代码
共 <%=rs_total%> 条记录 <%=rs_nowpage%>/<%=rs.PageCount%> 页
'rs_total 总记录数
'rs_nowpage 当前页数
'rs.PageCount 总页数
好了,修改完成,呵呵,是不是比要到处找组件,又不知道该怎么用简单啊!
其实我也是没办法,开始太依赖我的私人技术总监,所以没动什么脑筋,后来给逼的快死了,自己用蠢办法搞吧!
下一步我还要用我的蠢办法来修改出一个功能强大的综合性,多条件搜索引擎,大家祈祷我能成功吧,呵呵!
本文转自
http://www.cnrui.cn/blog/article.asp?id=61