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. AccessError (ErrorNumber)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

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

Rückgabewert

Variant

Bemerkungen

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

Verwenden Sie die Raise-Methode von Visual Basic, 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 Fehlerabfangoptionen auf Unterbrechen bei nicht behandelten Fehlern festgelegt haben, damit der Code in der VBA-IDE ausgeführt werden kann. Sie können diese Option auf der Registerkarte Allgemein des Dialogfelds 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.