asp中recordSet使用说明

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

%>



asp中recordSet方法属性


rs.pagesize=3每页大小（每页记录数）
rs.pagecount 由每页大小和总记录数算出页面数
rs.recordcount记录条数
rs.absolutepage 当前页

RecordSet.Fields.Count 傳回Recordset中的欄位數。
RecordSet(i).Name 傳回Recordset中第i個欄位的名稱。
RecordSet.RcordCount 傳回Recordset中資料錄的筆數。
RecordSet(i) 傳回RecordSet目前紀錄中的第i個欄位資料。
RecordSet.BookMark 傳回設定的書籍資料以儲存現在紀錄的位置。RecordSet.AbsolutePostition 將指標移致RecordSet中的某一筆資料上。
RecordSet.PageSize 設定每頁顯示的資料筆數。
RecordSet.PageCount 傳回分頁後的總頁數。
RecordSet.AbsolutePage 傳回目前所在的頁數。
RecordSet("欄位名稱") 傳回指定欄位名稱的資料內容。
RecordSet.BOF 判斷指標是否超過最前面。
RecordSet.EOF 判斷指標是否超過最後面。
RecordSet.MoveFirst 將資料錄指標移至第一筆。
RecordSet.MoveLast 將資料錄指標移至最後一筆。
RecordSet.MoveNext 將資料指標往後移一筆。
RecordSet.MovePrevious 將資料指標往前移一筆。
RecordSet.GetRows 可將Recordset中的資料儲存至陣列中。
RecordSet.AddNew 新增資料至資料表中。
RecordSet.Update更新目前這筆資料。
RecordSet.Delete 刪除目前這筆資料。
RecordSet.Find 尋找資料