Klasse OLEDBError - einen OLE DB-Fehler (Excel VBA)

Die Klasse OLEDBError stellt einen OLE DB-Fehler dar, der von der zuletzt ausgeführten OLE DB-Abfrage zurückgegeben wurde. Um eine OLEDBError -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim oleer as OLEDBError
Set oleer = Application.OLEDBErrors(Index:=1)

For Each

Hier ist ein Beispiel für die Verarbeitung der OLEDBError -Elemente in einer Sammlung

Dim oleer As OLEDBError
For Each oleer In Application.OLEDBErrors
	
Next oleer

ErrorString

Gibt einen String-Wert zurück, der die ODBC-Fehlerzeichenfolge darstellt.

Dim strErrorString As String
strErrorString = Application.OLEDBErrors(1).ErrorString

Native

Gibt einen providerspezifischen numerischen Wert zurück, der einen Fehler angibt.

Dim lngNative As Long
lngNative = Application.OLEDBErrors(1).Native

Number

Gibt einen numerischen Wert zurück, der einen Fehler angibt.

Dim lngNumber As Long
lngNumber = Application.OLEDBErrors(1).Number

SqlState

Gibt den SQL-Statusfehler zurück.

Eine Erläuterung des spezifischen Fehlers finden Sie in der SQL-Dokumentation.

Dim strSqlState As String
strSqlState = Application.OLEDBErrors(1).SqlState

Stage

Gibt einen numerischen Wert zurück, der das Stadium eines Fehlers angibt, der nach der letzten OLE DB-Abfrage aufgetreten ist.

Dim lngStage As Long
lngStage = Application.OLEDBErrors(1).Stage