Office: Fehlerbehandlung

Steht die sub bzw. function auch in einer variable, damit man sie gleich anzeigen kann, oder muss man den Namen immer manuell übergeben?

 

\@kane1896,

läßt sich Deine Frage konkretisieren *confused.gif*

 

Ich meinte, ob der Name der Prozedur in der der Fehler aufgetreten ist, automatisch in einer Variable steht, also z.B. "Button_Click()", wenn man auf "Button" geklickt hat, damit ich genauer weiss, wann der Fehler aufgetreten ist.

Beim Aufruf der Funktion, die den Fehler in eine Textdatei schreibt, wird die Prozedur doch fest eingegeben, wenn ich das richtig lese.

 

schau mal bitte unter Fehlerauslösende Function anzeigen

 

Wenn du das "MZ-Tool" meinst, ist das Problem, dass ich hier leider nichts installieren darf... *frown.gif*

 

Die MZ-Tools waren gemeint. Ohne externe Tools wird es wohl nicht gehen.

 

So,

ich hab das jetzt auch mal ausprobiert. Es ist der Hammer *biggrin.gif* Vielen Dank euch beiden *top

 

Hallo,

ich habe das öffentliche Modul WanzenLog angelegt und den rest in die Private Sub (wie im Bild sichtbar).
Nun bekomme ich folgenden Fehler und weis ehrlich gesagt nicht was mir der Debugger hier sagen will.
Mein Form heist frmAktion und das Ereignis: "Private Sub btnSchliessen_Click()"
Fehlt noch was oder was mache ich falsch? *frown.gif*

 

Das Modul darf nicht den gleichen Namen haben, wie die Funktion. Benenne es mal um. Wenn deine Funktion Wanzenlog heißt, sollte es dann keine Probleme mehr geben.

 

Danke für die schnelle Hilfe.

Jetzt gehts. *Smilie

 

Hallo,
zu der Zeilennummer noch eine Frage, muss man diese manuelle inCode schreiben oder wie funktioniert das in A97. Bei mir ist Erl immer 0.
Gruss
w.i.

 

Dann geh in diesem Thread auf die erste Seite und lese Saschas letzten Beitrag noch einmal durch...

Gruß Carsten

 

Für A97 funktioniert folgendes Teil sehr gut: der Code Comment Builder Wizard von Terry Kreft & Dev Ashish

Dieses Add-In liegt in Form einer offenen MDB vor und Du kannst Dir den FehlerCode noch an diese/Deine Bedürfnisse(Errorhandler) anpassen.


Gruß Carsten

 

Ich habe noch eine Frage wegen des Wanzenlog´s:

Ich habe bei mir z.B. Folgende Funktion:

Public Function fncGetBruttoA(Wert As Variant) As Currency
Dim MwstA As String

10 On Error GoTo fncGetBruttoA_Error

20 If IsNull(Wert) Then Wert = 0

30 MwstA = fncGetDataFromRS("MWST", "MWST_SATZ", "MWST_ID = 2") 'liest den allgemeinen Mehrwertsteuersatz aus der Tabelle MWST aus

40 MwstA = (MwstA / 100) + 1 / 0 ' Erzeugt einen Fehler zum Testen !!!!!!

50 fncGetBruttoA = Wert * MwstA

60 fncGetBruttoA = fncRound(fncGetBruttoA)


70 Exit Function

fncGetBruttoA_Exit_Here:
' notwendige Aufräumarbeiten
80 Exit Function

fncGetBruttoA_Error:

90 MsgBox "Error " & Err.Number & " (" & Err.Description & ") in Prozedur fncGetBruttoA des Modul Tools"
100 Call WanzenLog("Tools", "fncGetBruttoA", Erl)
Resume fncGetBruttoA_Exit_Here:

End Function



Jetzt müsste er mir ja normalerweise die Fehlernummer auch mit Fehlernummer ausgeben, aber im Fehlerlog steht nur folgendes:

2004-03-26, 11:18:50, C:\Datenbanken\Rechnung\faktura.mdb, Ein Fehler trat auf in: Tools, fncGetBruttoE, User3, Error#: 0 in Zeile 40,

Warum wird die Fehlernummer nicht angezeigt???

 

hat Dein Modul auch nicht den Namen Wanzenlog (siehe Jan´s Beitrag) ??