GetString
レコードセットを文字列として取得
文法
RecordsetオブジェクトGetString([Format],[Count],[ColumnDelimeter],[RowDelimeter],[Null])
パラメータ
Format : adClipString(固定)
Count : レコード数/定数
ColumnDelimeter : 列デリミタ
RowDelimeter : 行デリミタ
Null : Null値の変換内容
機能説明
レコードセットの内容を文字列として取得
Formatパラメータはパラメータ指定時に「adClipString」を設定
パラメータ省略時
ColDelimeter : タブ
RowDelimeter : 改行
Null : Null
文字列変換
取得対象レコード
| 定数 | 値 | 説明 |
|---|
| adGetRowsRest | -1 | カレント・指定位置から取得 |
使用例
<![CDATA[
<%
Dim objConn, objRs, DataList, i1, i2
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open = "sample"
Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.Open "select * from test"
DataList = "<tr><td>" & objRs.GetString(adCripString, 1, "</td><td>", "</td></tr>" & vbCrLf & "<tr>")
DataList = Left(DataList, Len(DataList) - 4)
Response.Write "<table>" & vbCrlf
Response.Write DataList
Response.Write "<table>" & vbCrlf
'オブジェクトを閉じる
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>
]]>
Topへ