ASP Recordset 分页显示数据的方法(修正版)


1.建立Recordset对象

复制代码 代码如下:

Dim objMyRst
Set objMyRst=Server.CreateObject(“ADODB.Recordset”)
objMyRst.CursorLocation=adUseClientBatch ‘客户端可批量处理
objMyRst.CursorType=adOpenStatic'光标类型为静态类型

注意:Recordset对象不能用Set objMyRst=Connection.Excute strSQL的语句建立,因为其建立的Recordset对象为adOpenFowardOnly不支持记录集分页
2.打开Recordset对象
复制代码 代码如下:

Dim strSql
strSql=”select * from ietable”
objMyRst.Oepn strSql,ActiveConnection,,,adCmdText

3.设置Recordset的PageSize属性
复制代码 代码如下:

objMyRst.PageSize=20

默认的PageSize为10
4.设置Recordset的AbsolutePage属性
以下为引用的内容:
复制代码 代码如下:

Dim intCurrentPage
intCurrentPage=1
objMyRst.AbsolutePage=intCurrentPage

AbsolutePage为1到Recordset对象的PageCount值
5.显示数据
复制代码 代码如下:

Response.Write("<table>")
PrintFieldName(objMyRst)
For i=1 To objMyRst.PageSize
PrintFieldValue(objMyRst)
objMyRst.MoveNext
If objMyRst.Eof Then Exit For
Next
Response.Write("</table>")

说明:
1. adOpenStatic,adUseCilentBatch,adCmdText为adovbs.inc定义的常量,要使用的话要把adovbs.inc拷到当前目录中并包含于在程序中
复制代码 代码如下:

<!--#Include File=”adovbs.inc”-->

2. PrintFielName,PrintFieldValue函数的代码如下:
复制代码 代码如下:

<%
Function PrintFieldName(objMyRst)
'参数objMyRst是Recordset对象
'定义娈数
Dim objFld
Response.Write "<tr bgcolor='#CCCCCC'>"
For Each objFld In objMyRst.Fields
Response.Write "<td>" & objFld.Name & "</td>"
Next
Response.Write("</tr>")
End Function
Function PrintFieldValue(objMyRst)
'参数objMyRst是Recordset对象
'定义娈数
Dim objFld
Response.Write("<tr >")
For Each objFld In objMyRst.Fields
'Response.Write "<td>" & objMyRst.Fields(intLoop).value & "</td>"
Response.Write "<td>" & objFld.value & "</td>"
Next
Response.Write("<tr>")
End Function
%>



相关阅读:
使用alternate镜像升级ubuntu 8.04到8.10
asp.net网站安全从小做起与防范小结
解决3.01版的jquery.form.js中文乱码问题的解决方法
Asp.net 基于Cookie简易的权限判断
jquery.boxy插件的iframe扩展代码
为JavaScript的String增加Trim函数
CSS制作网页的一些经验分享
Ajax技术概述与现状应用
PHP 的未来:了解 PHP6 的变化及其对脚本的影响
web 页面分页打印的实现
JSP和JSF双剑合并 打造完美Web应用
jQuery AnythingSlider滑动效果插件
自制基于jQuery的智能提示插件一枚
Linux系统中添加自己的库文件路径
快速导航
PHP MySQL HTML CSS JavaScript MSSQL AJAX .NET JSP Linux Mac ASP 服务器 SQL jQuery C# C++ java Android IOS oracle MongoDB SQLite wamp 交通频道 作文范文 那片天空有点儿涩[贰拾捌](5)作文700字 人生之窗作文800字 小学第二学期教科研工作计划_2014年工作计划 初中时代的晕作文1000字 人教版八年级下复习--初二(下)文言文专题训练 (3)(会员上传) 中学田径运动会的开幕词 一群畜生、一群王八蛋 Thedreaminmyworld作文100字 邮政技能鉴定初级试题 挫折也美丽作文400字 未来的提包 甜点情侣(上)作文1300字 综合运输体系构建的国际经验的体系构建分析 大学生爱国演讲稿——未来属于你,我的祖国 放飞梦想,我心飞翔的高二主题班会教案 那些都是身外物 最牛逼的经典语录摘抄 描写感动心理的语段 马拉松观后感 走过作文100字 带很有哲理的句子 如果再做一回小学生作文 创先争优村支部申报材料 民族气节与遗臭万年(康有山) 重庆市前期物业服务合同 为生命中的荆棘感恩作文400字 新来的“同伴” 《鲁宾逊漂流记》读后感400字 今天我看见了蝴蝶(TodayISawaButterfly) 那天,也是这个季节 从什么时候开始习惯一个人 仙桃水果公司作文300字 遇见你,是我生命里美丽的意外 我看美550字 蝉赞 在人民心中找准位置 初中班长个人工作总结 描写花坛的小学生写景作文_一个美丽的花坛 四年级,先拜拜了作文300字 小学五年级作文800字:逗笑活动 七星岩200字 租房合同范本下载 常言道做不成情人,连朋友都没的做 2015县劳动局实施妇女儿童发展规划中期监察评估工作报告 初中初二作文750字:十载耕耘沧海变桑田——一个异乡人眼中顺德的变迁 大学体育足球心得体会 容易寂寞的人 感怀“五四” 井字棋 小学三年级作文300字:六年学习匆匆过 同学篇

Copyright © 2016 phpStudy |