ASP分页显示Recordset数据(2)
来源:互联网 责任编辑:栏目编辑 发表时间:2013-07-01 03:40 点击:次
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对象 '定义娈数 相关新闻>>最新推荐更多>>>
|