fieldsメソッドを使用して、現在のレコードの列値を取得します。
構文
Object.Fields(ColumnInfo)
引数:
Object: 必須。常にADODB RecordSetオブジェクトの名前
ColumnInfo: 必須。列名または索引を指定できます。索引の場合、ゼロから開始します
備考
次の例では、Fieldsメソッドの使用方法を示します。
例1:
'Create ADODB.Connection Object
Dim ConnObj ' Create a variable.
Set ConnObj = CreateObject("ADODB.Connection")
ConnObj.Open("ConnectionString") 'Creates DB Connection by Using Connection String
Dim RecSetObj
Dim CmdTxt
CmdTxt = "SELECT * FROM EMPLOYEE_DETAILS WHERE ID = 101"
Set RecSetObj = ConnObj.Execute(CmdTxt) 'Returns RecordSet
If Not RecSetObj.Eof Then
RecSetObj.Fields(0) 'Returns value of 0th Index Column from the current Record Set
RecSetObj.Fields("SALARY") 'Returns value of SALARY Column from the current Record Set
End If
RecSetObj.Close()
ConnObj.Close()
Set RecSetObj = Nothing
Set ConnObj = Nothing