一个简单的ASP分页程序
这几天在尝试用asp+access做一个网络相册
用户可以注册并上传和删除照片
由于对asp只是一知半解 所以在分页上遇到了困难
在网上搜索了一些资料和看了一些书 终于自己写出来一个分页程序
希望在这里和大家分享一下
首先介绍一下recordset的几个属性:
pagesize:就是在一个页面里面显示的最多的记录数
pagecount:系统根据pagesize的大小自动计算出的页面数
recordcount:记录数
absolutepage:当前的页面数
明白了这几个属性以后就好办了
原理:
首先设page变量=1
然后设置pagesize的值
使用两个循环达到分页的目的
第一个循环是分页
for i=1 to pagesize*(page-1)
然后在第一个循环下建立一个子循环实现输出每页的内容
for j=0 to pagesize
具体程序如下:
- <%
- page=request.querystring("page")
- if cint(page) page = 1
- elseif cint(page) > rs.pagecount then
- page = rs.pagecount
- end if
- for i=1 to rs.PageSize*(page-1)
- if not rs.EOF then
- rs.MoveNext
- end if
- next
- >%
- <%
- pagesize=10
- for i=1 to pagesize
- if not rs.eof then
- %>
- <p> 姓名: <br />
- email: <br />
- QQ:<br />
- 评论:<br />
- 日期:<br />
- ----------------------</p>
- <%
- rs.movenext
- end if
- next
- page1=rs.pagecount
- response.write (page1)
- %>
- <a href=""readdata.asp?page=1"">首页</a>
- <a href="readdata.asp?page=%=page-1%">>上一页</a>
- <a href="readdata.asp?page=%=page+1%">>下一页</a>
- <a href="readdata.asp?page=%=page1%">>末页</a>
- <%
- set rs=nothing
- conn.close
- set conn=nothing
- %>