Forums Neueste Beiträge
 

Err.Number wird nicht mehr ausgewertet

20/06/2009 - 01:32 von Gerhard Meier | Report spam
Hallo zusammen,

woran liegt es, dass die Err.Number pötzlich in einer eigenen
Fehlerbehandlungsfunktion keinen Fehlernummer mehr angibt, sondern nur noch
#0 ?
Bisher hatte ich den internen Wert err.Number wie eine globale Variable
erachten können. Liegt hier ein Fehler in einer Systemtabelle etc. vor
Access 03 am Anfang / Access 07 Heute.

Public Function FehlerBehandlung(ProcName, MdlName)
On Error Resume Next
Dim ErN As Long
Dim ErD As String

ErN = err.Number =>> Keine Angabe mehr !!
ErD = err.Description

Besten Dank für jeden Hinweis

Gruss Gerhard
 

Lesen sie die antworten

#1 Andreas Vogt
20/06/2009 - 07:43 | Warnen spam
Hallo,
wenn das eine Funktion zur Fehlerbehandlung ist, warum übergibst du
dann nicht das Err Objekt?
Imo kann das so nicht funktionieren.

Probier mal das:

Sub test()
On Error GoTo Fehler

Dim i As Integer
i = 100000

Fehler:
FehlerBehandlung "test", "Modul1", Err

End Sub


Public Function FehlerBehandlung(ProcName As String, MdlName As
String, Err As ErrObject)
If Err Then
MsgBox Err.Number
End If
End Function

Gruß Andreas

Ähnliche fragen