一个简单的ASP分页程序

本程序主要用到Connection、RecordSet这两个对象,程序中的数据库为Access库,采用OLEDB方式连接库。

  这个东西是作为菜鸟的我弄的一个东西.
  你可以对这个东西不屑一顾.但是请记住: 菜鸟也有这个权利把自己的心得体会附注文字贡献出来.....当然,技术方面真的是好菜的..一些ASP中的比较正统的中规中矩的方法.我觉得这个东西可能对初学者有些帮助.......见笑了..

一个简单的分页教程:
<%
Set conn = Server.CreateObject("ADODB.Connection")
strcon="provider=microsoft.jet.oledb.4.0;data source="& _
server.mappath("mdb.mdb")
conn.Open strcon

Set rs = Server.CreateObject ("ADODB.Recordset")
sql="select * from table order by id desc"
rs.Open sql, conn, 1

page=1    ' 设置变量PAGE=1
rs.PageSize = 5 '每页显示记录数

if Not IsEmpty(Request("Page")) then '如果PAGE已经初始化...

Page = CInt(Request("Page")) '接收PAGE并化为数字型赋给PAGE变量
    
    if Page > rs.PageCount then '如果接收的页数大于总页数
        rs.AbsolutePage = rs.PageCount '设置当前显示页等于最后页
        
    elseif Page <= 0 then '如果page小于等于0
        Page = 1 '设置PAGE等于第一页
    else
        rs.AbsolutePage = Page '如果大于零,显示当前页等于接收的页数
    end if
End if
Page = rs.AbsolutePage
%>
<%

For i = 1 to rs.PageSize
if rs.EOF then     
Exit For
end if '利用for next 循环依次读出记录
%>

  上面的代码只需要改动Rs.pagesize=5,把5改为你想显示的记录数.比如说
改为10.那么每页就是显示10页.还需要修改的是select语句.就是你要检索的数据库了.
也就是说放到任何一个系统中上面的代码只需很小的改动都可以直接拿过来用.


  然后:就是要循环读出记录的显示内容了..............比如

<table width=50 border=1 align=center>
<tr>
<TD><% =rs("内容") %></td>
</tr>
</table>
<%
rs.MoveNext
next
%>
  当然也可以改为response.write输出.那是你的事了.你可以自由发挥版面样式.

  最后,添加"下一页,上一页"的链接:

<%if request("page")>1 then%>
<a Href="test.asp?Page=<% = 1%>">首页</a>
<a Href="test.asp?Page=<% =request("page") -1 %>">上一页</a>
<%end if %>
<%if request("page")<>rs.pagecount then %>
<a Href="test.asp?Page=<% =request("page") + 1%>">下一页</a>
<a Href="test.asp?Page=<% = rs.PageCount%>">尾页</a>
<% end if %>
  上面的代码反正不管三七二十一只管复制粘贴.只需把"fenye.asp"改成你自己的文件名就可以了.随便把这段代码放在什么地方?就是你想让它出现下一页下一页链接的地方吧.

  最后.关闭记录集释放资源:
<%
rs.close
Set rs = Nothing
conn.close
set conn=nothing
%>


  一个非常简单的分页函数就完成了.以后随便做什么程序反正只管套用这个好了.绝对没错的.当然这个程序还有很多错误.....不足之处还望高手多多批评指正.小弟献丑了.......^_^.......
  

相关推荐:

·ASP:在结果中搜索
·在ASP中使用事务控制_web开发_ASP
·在ASP.NET中将数据直接输出成Excel格式
·利用ASP打造网站论坛DIY
·ASP整合的一个SQL语句类
·ASP+SQL Server构建网页防火墙
·漫谈ASP.NET 页面对象模型
·一个简单的ASP分页程序
·ASP 生成 XBM 图可用作验证码
·ASP用JMail、CDO发送邮件
· [Asp]教你制作简单的留言簿                
·ASP 中 Split 函数的实例
·ASP 之  Cookies 讲座
·用ASP学做一个在线调查
·ASP+SQL Server之图象数据处理
·WEB应用的缓存兼容性设计
·利用ASP连接各种数据库
·ASP计数器设计详解
·ASP与数据库应用
·[ASP]向数据库读写image文件
·asp作品保护方案
·如何在ASP中实现网络打印功能
·ASP的函数详解
·ASP编程中20个非常有用的例子
·[asp]禁止站外提交表单
·ASP中巧用Response存取文件
·ASP发送邮件的class(完)
·如何把ASP编写成DLL
·个人主页的数据库ASP解决方案
·在ASP中使用简单Java类
· DW+ASP 玩转动态二级菜单                
·Asp常见问题(新手)
·用ASP实现ASP文件的运行
·用ASP编写计数器的方法
·ASP通用分页类
·内容管理系统的设计和选型
·浅谈 ASP 模板技术之参数传递
·用Asp隐藏文件路径,实现防盗链
·asp 中对 ip 进行过滤限制函数

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值