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.