O método Fields é usado para obter o valor da coluna do registro atual.
Sintaxe
Object.Fields(ColumnInfo)
Argumentos:
Object: Obrigatório. Sempre o nome do objeto ADODB RecordSet
ColumnInfo: Obrigatório. Pode ser o Índice ou o Nome da coluna. No caso do Índice, ele começará em Zero
Comentários
O exemplo a seguir ilustra o uso do método Fields.
Exemplo 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