AbsolutePage
カレントレコードのページ設定
文法
Recordsetオブジェクト.AbsolutePage
機能説明
カレントレコードがあるページを設定
カレントレコード位置定数
定数 | 値 | 説明 |
adPosBOF | -2 | カレントレコードがファイルの頭 |
adPosEOF | -3 | カレントレコードがファイルの末尾 |
adPosUnknown | -1 | 不明 |
使用例
<%
Dim objConn, objRs
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open = "sample"
Set objRs = Server.CreateObject("ADODB.Recordset")
'1ページの表示レコード数を10件に設定
objRs.PageSize = 10
objRs.Open "select * from test"
'カレントレコードを最終行に移動
objRs.MoveLast
Response.Write "カレントレコードのページ : " & objRs.AbsolutePage & "
"
'オブジェクトを閉じる
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>
Topへ