1。建立记录集对象
复制代码代码如下所示：
昏暗的objmyrst
集objmyrst = server.createobject（ADODB。集）
ObjMyRst。cursorlocation = aduseclientbatch客户批量处理
的objmyrst。CursorType = adopenstatic'cursor类型是静态类型

注：记录集对象不能被设置objmyrst = connection.excute如何声明建造的，因为它是adopenfowardonly Recordset对象，不支持记录集分页。
2。打开记录集对象
复制代码代码如下所示：
定义一个strSQL
如何选择*从ietable =
ObjMyRst。Oepn strSql，ActiveConnection adCmdText，，

三.集集PageSize属性
复制代码代码如下所示：
ObjMyRst。PageSize = 20

默认的PageSize 10
4。集集的AbsolutePage属性
下面提到：
复制代码代码如下所示：
昏暗的intcurrentpage
intcurrentpage = 1
ObjMyRst intcurrentpage AbsolutePage =。

AbsolutePage是1到记录集对象的总页数的价值
5。显示数据
复制代码代码如下所示：
响应。写入（）
printfieldname（objmyrst）
我objmyrst.pagesize = 1
printfieldvalue（objmyrst）
objmyrst.movenext
如果objmyrst EOF然后退出。
下一个
响应。写入（）

解释uff1a
1。adopenstatic，adusecilentbatch，adCmdText定义adovbs.inc常数和用于复制adovbs.inc到当前的目录包括在程序
复制代码代码如下所示：


2。printfielname，printfieldvalue函数的代码如下：
复制代码代码如下所示：
<
功能printfieldname（objmyrst）
参数objmyrst是一个记录集对象
偶数的定义
昏暗的objfld
响应。写
在每个领域objmyrst objfld。
响应。写的名字objfld。
下一个
响应。写入（）
端功能
功能printfieldvalue（objmyrst）
参数objmyrst是一个记录集对象
偶数的定义
昏暗的objfld
响应。写入（）
在每个领域objmyrst objfld。
response.write objmyrst。领域（日本盈联）。价值
响应。写objfld.value
下一个
响应。写入（）
端功能
%>