ASP编程：ASP中轻松完成纪录集分页
使用filesystemobject，可以对服务器上的文件进行操作，浏览、复制、移动、删除等。有ado的支持，asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样，管理远程主机上的数据库，对表格、记录进行各种操作。分页|纪录集|分页|纪录集人人都晓得在Dreamwerver中能够很便利地完成纪录集的分页显现，可是天生的代码切实其实很复杂，影响了网页的显现速率，看起来层次也不是很明晰，那末，可不成以用复杂的体例完成一样的功效呢？固然能够，笔者经由过程以下一些复杂的代码就完成了纪录集的分页显现，如今拿出来人人一同分享。次要代码以下:
＜%
Ifrs1.recordcount＞0Then’纪录集不为空则处置纪录
rs1.pagesize=10’设置每页显现的纪录数
num=rs1.recordcount’纪录总数
pagenum=rs1.pagecount’页总数
page=request("page")’猎取页码的原始信息
’处置页码原始信息的入手下手！
Ifpage＜＞""then
page=cint(page)
iferr.number＜＞0then
err.clear
page=1
endif
ifpage＜1then
page=1
endif
else
page=1
Endif
ifpage*rs1.pagesize＞numandnot((page-1)*rs1.pagesize＜num)then
page=1
endif
’处置页码原始信息的停止！设置以后页码
rs1.absolutepage=page
%＞
＜!--判别以后页是不是是最初一页，并依据判别设置纪录的反复显现--＞
＜%
ifpage＜＞pagenumthen
lablenum=rs1.pagesize
else
lablenum=num-(page-1)*rs1.pagesize
endif
fori=1tolablenum
%＞
＜trbgcolor="#FFFFFF"＞
＜tdheight="25"＞＜divalign="center"＞＜%=(rs1.Fields.Item("id").Value)%＞＜/div＞＜/td＞
＜td＞＜divalign="center"＞＜%=(rs1.Fields.Item("称号").Value)%＞＜/div＞＜/td＞
＜td＞＜divalign="center"＞＜%=(rs1.Fields.Item("地点").Value)%＞＜/div＞＜/td＞
＜td＞＜divalign="center"＞＜%=(rs1.Fields.Item("种别").Value)%＞＜/div＞＜/td＞
＜td＞＜divalign="center"＞＜%=(rs1.Fields.Item("最初修正").Value)%＞＜/div＞＜/td＞
＜td＞＜divalign="center"＞＜%=(rs1.Fields.Item("修正人").Value)%＞＜/div＞＜/td＞
＜/tr＞
＜%
rs1.movenext
next
%＞
＜!--以后页的纪录显现停止，以下代码为纪录集分页链接代码--＞
＜tablewidth="70%"border="0"align="center"cellpadding="0"cellspacing="0"＞
＜tr＞
＜tdheight="35"＞
＜divalign="right"＞
＜fontcolor="#333333"＞
共有＜%=num%＞个链接|
＜ahref=linkadmin.asp?page=1＞首页＜/a＞|
＜%ifpage＞1then%＞＜ahref=linkadmin.asp?page=＜%=page-1%＞＞＜%endif%＞上一页＜/a＞|
＜%ifpage＜pagenumthen%＞＜ahref=linkadmin.asp?page=＜%=page+1%＞＞＜%endif%＞下一页＜/a＞|
＜ahref=linkadmin.asp?page=＜%=pagenum%＞＞尾页＜/a＞|
页次:＜%=page%＞/＜%=pagenum%＞页|
共＜%=pagenum%＞页
＜/font＞
＜/div＞
＜/td＞
＜/tr＞
＜/table＞
＜!--纪录集分页链接代码停止，纪录集为空时实行以下代码--＞
＜%else%＞
＜trbgcolor="#FFFFFF"＞
＜tdheight="25"colspan="6"＞＜divalign="center"＞＜%response.Write("没有了局可显现！")%＞
＜/div＞＜/td＞
＜/tr＞
＜%
endif
rs1.Close()
Setrs1=Nothing
%＞
好了，很复杂吧！只需复杂地修正一下就可以拔出到你的网页显现纪录的中央了，从速尝尝吧！
</p>优点：简单易学、开发速度快、有很多年“历史”，能找到非常多别人做好的程序来用、配合activeX功能强大，很多php做不到的asp+activeX能做到，例如银行安全控件 虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。 另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件) 那么，ASP.Net有哪些改进呢？ Session:这个存储跟客户端会话过程的数据，默认20分钟失效 在平时的学习过程中要注意现学现用，注重运用，在掌握了一定的基础知识后，我们可以尝试做一些网页，也许在开始的时候我们可能会遇到很多问题，比如说如何很好的构建基本框架。 掌握asp的特性而且一定要知道为什么。 他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标.
页:
[1]