Prüft, ob der Cursor aktuell am Ende von RecordSet positioniert ist.
Syntax
Object.Eof
Argumente: Object: Erforderlich. Immer der Name des Objekts ADODB RecordSet
Rückgabe
"True", wenn die aktuelle Cursorposition nicht am Ende von RecordSet liegt, andernfalls "False"
Anmerkungen
Das folgende Beispiel veranschaulicht die Verwendung der Eof-Methode.
Beispiel 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
'Fetch the Column Value from the Record Set Object
End If
RecSetObj.Close()
ConnObj.Close()
Set RecSetObj = Nothing
Set ConnObj = Nothing