Application.AccessError-Methode (Access)

Verwenden Sie die AccessError-Methode , um die beschreibende Zeichenfolge zurückzugeben, die einem Microsoft Access- oder DAO-Fehler (Data Access Objects) zugeordnet ist.

Syntax

Ausdruck verwendet werden. AccessError (ErrorNumber)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Fehlernummer Erforderlich Variant Die Nummer des Fehlers, für den Sie eine beschreibende Zeichenfolge zurückgeben möchten.

Rückgabewert

Variant

Hinweise

Verwenden Sie die AccessError-Methode , um die beschreibende Zeichenfolge zurückzugeben, die einem Microsoft Access- oder DAO-Fehler zugeordnet ist, wenn der Fehler nicht tatsächlich aufgetreten ist, aber Sie können sie nicht für ADO-Fehler verwenden.

Verwenden Sie die Visual Basic Raise-Methode, um einen Visual Basic-Fehler auszulösen. Nachdem Sie den Fehler ausgelöst haben, können Sie die zugehörige beschreibende Zeichenfolge ermitteln, indem Sie die Description-Eigenschaft des Err-Objekts lesen.

Sie können die RaiseRaise-Methode nicht verwenden, um einen Microsoft Access-Fehler oder einen DAO-Fehler auszulösen. Mithilfe der AccessErrorAccessError-Methode können Sie jedoch die diesen Fehlern zugeordnete beschreibende Zeichenfolge zurückgeben, ohne den Fehler generieren zu müssen.

Verwenden Sie die AccessError-Methode , um eine beschreibende Zeichenfolge aus dem Error-Ereignis eines Formulars zurückzugeben.

Wenn der Microsoft Access-Fehler aufgetreten ist, können Sie die beschreibende Zeichenfolge entweder mithilfe der Methode AccessErrorAccessError oder der Eigenschaft DescriptionDescription des Visual Basic-Objekts Err zurückgeben.

Beispiel

Die folgende Funktion gibt eine Fehlerzeichenfolge für jede gültige Fehlernummer zurück.

Hinweis

Sie müssen Ihre Optionen für die Fehlerabfangfunktion auf "Unterbrechen bei unbehandelten Fehlern " eingestellt haben, damit der Code in der VBA-IDE ausgeführt werden kann. Sie können diese Option auf der Registerkarte "Allgemein" im Dialogfeld "Optionen " im Menü "VBA-Tools" festlegen.

Function ErrorString(ByVal lngError As Long) As String 
 
 Const conAppError = "Application-defined or " & _ 
 "object-defined error" 
 
 On Error Resume Next 
 Err.Raise lngError 
 
 If Err.Description = conAppError Then 
 ErrorString = AccessError(lngError) 
 ElseIf Err.Description = vbNullString Then 
 MsgBox "No error string associated with this number." 
 Else 
 ErrorString = Err.Description 
 End If 
 
End Function

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.