大家都知道在Dreamwerver中可以很方便地实现记录集的分页显示,但是生成的代码的确很庞大,影响了网页的显示速度,看起来条理也不是很清晰,那么,可不可以用简单的方式实现同样的功能呢?当然可以,笔者通过以下一些简单的代码就实现了记录集的分页显示,现在拿出来大家一起分享。 主要代码如下: <% If rs1.recordcount>0 Then ' 记录集不为空则处理记录 rs1.pagesize = 10 ' 设置每页显示的记录数 num=rs1.recordcount ' 记录总数 pagenum=rs1.pagecount ' 页总数 page=request("page") ' 获取页码的原始信息 ' 处理页码原始信息的开始! If page <> "" then page = cint(page) if err.number <> 0 then err.clear page = 1 end if if page < 1 then page = 1 end if else page = 1 End if if page*rs1.pagesize > num and not((page-1)*rs1.pagesize < num)then page=1 end if ' 处理页码原始信息的结束!设置当前页码 rs1.absolutepage = page %> <!--判断当前页是否是最后一页,并根据判断设置记录的重复显示--> <% if page<>pagenum then lablenum=rs1.pagesize else lablenum=num-(page-1)*rs1.pagesize end if for i=1 to lablenum %> <tr bgcolor="#FFFFFF"> <td height="25"><div align="center"><%=(rs1.Fields.Item("id").Value)%></div></td> <td><div align="center"><%=(rs1.Fields.Item("名称").Value)%></div></td> <td><div align="center"><%=(rs1.Fields.Item("地址").Value)%></div></td> <td><div align="center"><%=(rs1.Fields.Item("类别").Value)%></div></td> <td><div align="center"><%=(rs1.Fields.Item("最后修改").Value)%></div></td> <td><div align="center"><%=(rs1.Fields.Item("修改人").Value)%></div></td> </tr> <% rs1.movenext next %> <!--当前页的记录显示结束,以下代码为记录集分页链接代码--> <table width="70%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="35"> <div align="right"> <font color="#333333"> 共有 <%=num%> 个链接 | <a href=linkadmin.asp?page=1>首页</a> | <%if page>1 then%><a href=linkadmin.asp?page=<%=page-1%>><%end if%>上一页</a> | <%if page<pagenum then%><a href=linkadmin.asp?page=<%=page+1%>><%end if%>下一页</a> | <a href=linkadmin.asp?page=<%=pagenum%>>尾页</a> | 页次:<%=page%>/<%=pagenum%>页 | 共<%=pagenum%>页 </font> </div> </td> </tr> </table> <!--记录集分页链接代码结束,记录集为空时执行以下代码--> <%else%> <tr bgcolor="#FFFFFF"> <td height="25" colspan="6"><div align="center"><% response.Write("没有结果可显示!") %> </div></td> </tr> <% end if rs1.Close() Set rs1 = Nothing %> 好了,很简单吧!只要简单地修改一下就能插入到你的网页显示记录的地方了,赶快试试吧! |
相关推荐
通过浏览器访问数据量大的表时需要进行分页。ASP对数据库记录分页显示可以通过ADO对象集Recordset对象...本文将介绍一种利用 ASP实现对Oracle数据记录分页显示的方法,使得Oracle用户能够轻松方便地实现记录分页显示。
在Web 开发中,我们经常会遇到分页显示和排序数据记录集的情况,这在服务器端使用服务器端的代码和数据库技术是件很轻松的事情,比如:ASP、PHP、JSP 等。然而,如果要在客户端显示多条记录并且排序是一件很令人头疼...
[数据库] 自带记录集分页和调用存储过程分页功能,拥有功能丰富的可完全自定义配置及调用。 [数据库] 能方便的执行带各种参数的MSSQL存储过程并返回多个值或多个记录集。 [数据库] 完善的数据库操作容错功能,能...
ASP.NET2.0中themes、Skins轻松实现网站换肤! ASP.NET 2.0 中的代码隐藏和编译 ASP.NET 2.0 Language Swithcer and Theme Swicher 多语言转换和多样式主题转换 ASP.NET2.0 ObjectDataSource的使用详解(1) ASP.NET...
EasyASP是一个方便快速开发ASP的类,其中包含了数据库控制类Easp.db,具有同时对一个或多个数据库进行各类操作、调用MSSQL存储过程及记录集分页等功能。EasyASP同时提供了大量实用的ASP通用过程及方法,可以简化大...
EasyASP是一个方便快速开发ASP的类,其中包含了数据库控制类Easp.db,具有同时对一个或多个数据库进行各类操作、调用MSSQL存储过程及记录集分页等功能。EasyASP同时提供了大量实用的ASP通用过程及方法,可以简化大...
轻松解决在不同打印机上位置不准(在打印设置中修改坐标原点即可) 普通大写金额、逐字填空大写金额等的操作与普通元素相同 强大的打印设置,可动态添加票据元素、拖动票据元素... 帮助: 帮助文件还算...
111 <br>0184 如何在ASP.NET中获取文件的扩展名 111 <br>0185 如何在ASP.NET中用URL在页面之间传值 112 <br>0186 如何使用IsPostBack实现ASP.NET页面加载 112 <br>0187 如何利用输出缓存技术缓存...
轻松解决在不同打印机上位置不准(在打印设置中修改坐标原点即可) 普通大写金额、逐字填空大写金额等的操作与普通元素相同 强大的打印设置,可动态添加票据元素、拖动票据元素... 帮助: 帮助文件还算...
GWT Advanced Table 是一个基于 GWT 框架的网页表格组件,可实现分页数据显示、数据排序和过滤等功能! Google Tag Library 该标记库和 Google 有关。使用该标记库,利用 Google 为你的网站提供网站查询,并且可以...
GWT Advanced Table 是一个基于 GWT 框架的网页表格组件,可实现分页数据显示、数据排序和过滤等功能! Google Tag Library 该标记库和 Google 有关。使用该标记库,利用 Google 为你的网站提供网站查询,并且可以...
在有状态SessionBean中,用累加器,以对话状态存储起来,创建EJB对象,并将当前的计数器初始化,调用每一个EJB对象的count()方法,保证Bean正常被激活和钝化,EJB对象是用完毕,从内存中清除…… Java Socket 聊天...
在有状态SessionBean中,用累加器,以对话状态存储起来,创建EJB对象,并将当前的计数器初始化,调用每一个EJB对象的count()方法,保证Bean正常被激活和钝化,EJB对象是用完毕,从内存中清除…… Java Socket 聊天...
GWT Advanced Table 是一个基于 GWT 框架的网页表格组件,可实现分页数据显示、数据排序和过滤等功能! Google Tag Library 该标记库和 Google 有关。使用该标记库,利用 Google 为你的网站提供网站查询,并且可以...
GWT Advanced Table 是一个基于 GWT 框架的网页表格组件,可实现分页数据显示、数据排序和过滤等功能! Google Tag Library 该标记库和 Google 有关。使用该标记库,利用 Google 为你的网站提供网站查询,并且可以...