El método Fields se utiliza para obtener el valor de columna del registro actual.
Sintaxis
Object.Fields(ColumnInfo)
Argumentos:
Object: necesario. Siempre es el nombre del objeto ADODB RecordSet.
ColumnInfo: necesario. Puede ser un nombre de columna o índice. En el caso de un índice, comenzará desde cero.
Observaciones
En el siguiente ejemplo se muestra el uso del método Fields.
Ejemplo 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