在ASP中轻松实现记录集分页显示
文章来自 (http://edu.chinaz.com )
大家都知道在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
%>
转载于:https://www.cnblogs.com/loway/archive/2006/03/27/359838.html
在ASP中轻松实现记录集分页显示相关推荐
- asp oracle 分页显示,利用ASP实现Oracle数据记录的分页显示
[IT168 服务器学院]一.引言 通过浏览器访问数据量大的表时需要进行分页.ASP对数据库记录分页显示可以通过ADO对象集Recordset对象来实现.Recordset具有以下几个用于分页显示的属 ...
- asp.net oracle 分页,asp.net教程之利用ASP实现Oracle数据记录的分页显示
一.引言 通过浏览器访问数据量大的表时需要进行分页.ASP对数据库记录分页显示可以通过ADO对象集Recordset对象来实现.Recordset具有以下几个用于分页显示的属性: PageSize:每 ...
- ASP.NET中实现大结果集分页研讨 转
转自http://www.codeproject.com/Articles/6936/Paging-of-Large-Resultsets-in-ASP-NET 不知道是谁翻译的, 感觉找了很多分页的 ...
- PHP中利用EXIF函数集来显示单反照片的EXIF信息
要成功做到能用EXIF函数显示单反EXIF信息需要一下几个不步骤: 1.修改php.ini的exif相关信息 2.继续修改php.ini信息,找到以下模块,将带exif的配置属性前的;号去掉,然后重启 ...
- Oracle 数据库中对记录进行分页处理
学习到 oracle 的视图的时候,了解到对 Oracle 中数据的记录进行分页处理和 Mysql 提供的 limit 来进行分页处理大有不同,limit 是 mysql 中特有的关键字. 那么在 o ...
- html表单 asp验证,ASP中JavaScript处理复杂表单的生成与验证
ASP中JavaScript处理复杂表单的生成与验证 更新时间:2007年03月25日 00:00:00 作者: 这里所谓的复杂表单,是指表单中包含多种不同的输入类型,比如下拉列表框.单行文本.多 ...
- Qt工作笔记-使用SQL中的LIMIT进行数据分页
目录 概念 操作 概念 这里使用SQL语言的中LIMIT的特点进行分页显示.这个关键字我就不多说了,现在来看运行截图! 表结构如下: 程序一开始运行: 分页显示: 操作 关键源码如下: sql.h # ...
- 应用displaytag完成大数据量分页显示的例子
应用displaytag在struts中完成大数据量分页显示,Oracle数据库 JSP文件: <%...@ taglib uri="/WEB-INF/displaytag.tld&q ...
- ASP中SQL语句参考及记录集对象
DB2 提供了关连式资料库的查询语言 SQL (Structured Query Language),是一种非常口语化.既易学又易懂的语法.此一语言几乎是每个资料库系统都必须提供的,用以表示关连式的操 ...
- java recordset 记录数_【求助】asp中怎样获得一个记录集(Recordset)的所有行数?
你的位置: 问答吧 -> 网络编程 -> 问题详情 [求助]asp中怎样获得一个记录集(Recordset)的所有行数? 如标题所示 [ 本帖由 smilekiki 最后编辑于 2006- ...
最新文章
- day09_读写分离_组件介绍
- error MSB8008: 指定的平台工具集(v110)未安装或无效
- Java 蓝牙无线API 简介
- Windows下基于python3使用word2vec训练中文维基百科语料(一)
- 二周第一次课(12月18日)
- jquery $.each()函数编程实例五则图解
- SMW0 HTML模版的形式上传文件 维护MIME类型
- HDU2879(积性函数)
- 超文本传输协议及HTTP包
- C++头文件的防卫式声明(为了防止多次include)
- System verilog利用class类打印信息
- Jmeter系列之简介与环境安装
- Android项目打第三方jar包
- Dubbo中多注册中心问题与服务分组
- hashCode()和equals()的若干问题
- C-Free5注册码,秘钥,解决办法
- 读 项亮《推荐系统实践》
- 泛函分析在计算机科学中的应用,泛函分析在小波理论中的应用.doc
- 谷歌浏览器刷新快捷键
- destoon参考大全
热门文章
- weiapi2.2 HelpPage自动生成接口说明文档和接口测试功能
- OVM-V1.2正式发布,新增实时监控功能,支持一键升级
- mysql日期相关的函数
- 【python】编程语言入门经典100例--11
- Property Bags Object Model中的小“陷阱”
- K8s(二):130 道 K8s/Docker 配套练习题,学+练结合,一次吃透
- 面试官:说说 Spring 事务设计原理?面试必问!
- 最新数据库排行出炉,SQL Server 暴跌。。
- 终于找全啦!一二线城市知名互联网公司名单!对着找就对了...
- 分布式系统常见的事务处理机制