Append

Fieldコレクションにオブジェクト追加


文法
Fieldsコレクション.Append Name,Type,[Size],[Attribute],[Value]


パラメータ
Name : Fieldオブジェクト名
Type : データ型
Size : サイズ
Attribure : 属性
Value : 値


機能説明
Fieldsコレクションにオブジェクト追加(データベース接続していないRecordSetオブジェクト)


フィールドデータ型
定数説明
adBigInt 20 8バイトの符号付整数型
adBinary 128 バイナリ型
adBoolean 11 ブール型
adBSTR 8 Unicode文字列型
adChapter 136 4バイトチャプタ
adChar 129 文字列型
adCurrency 6 通貨型
adDate 7 日付型
adDBDate 133 YYYYMMDD形式日付型
adDBTime 134 HHMMSS形式時刻型
adDBTimeStamp 135 日付時刻型
adDecimal 14 バリアント型
adDouble 5 倍精度浮動小数点型
adEmpty 0 指定なし
adError 10 32ビットエラーコード
adGUID 72 固有のグローバルID
adIDispatch 9 COMオブジェクトのIDispatchインターフェースへのポインタ
adInteger 3 4バイト符号付き整数型
adIUnknown 13 COMオブジェクトのIUnknownインターフェースへのポインタ
adNumeric 131 数値型
adSingle 4 単精度浮動小数点型
adSmallInt 2 4バイトの符号付き整数型
adTinyInt 16 1バイトの符号付き整数型
adUnSignedBigInt 21 8バイトの符号付き整数型
adUnSignedInt 19 4バイトの符号なし整数型
adUnSignedSmallInt 18 2バイトの符号なし整数型
adUnSignedTinyInt 17 1バイトの符号なし整数型
adUserDefined 132 ユーザー定義変数
adVariant 12 バリアント型
adWChar 130 Unicode文字列型

フィールドの状態
定数説明
adFldCacheDeferred 0x1000 キャッシュされたフィールド値
adFldFixed 0x10 固定長データ
adFldIsNullable 0x20 NULL値を指定可
adFldLong 0x80 長バイナリ型のフィールド
adFldMayBeNull 0x40 NULL値を読み取り可
adFldRowID 0x100 行IDを含む
adFldRowVersion 0x200 更新記録の時刻または日付スタンプ
adFldUnknownUpdatable 0x8 書き込み権限不明
adFldUnspecified -1 属性指定不明
adFldUpdatable 0x4 書き込み可能

使用例
<% Dim objConn, objRS 'オブジェクト作成 Set objRS = Server.CreateObject("ADODB.Recordset") 'フィールド追加 objRS.Fields.Append "Name", adChar objRS.Fields.Append "Tall", adInteger objRS.Fields.Append "Update", adDBDate For i = 0 To objRS.Fields.Cont - 1 Response.Write "フィールド名 : " & objRS.fields(i).Name & "<br>" Response.Write "フィールドタイプ : " & objRS.fields(i).Type & "<br><br>" Next 'オブジェクト開放 objRS.Close Set objRS = Nothing %>
Topへ