Bonjour,
J'utilise le code suivant pour écrire dans le le journal d'évènement windows (Merci Vincent Lainé)
Cela fonctionne mais les trace sont en double, voir en triple dans le journal, et au débuguage je ne passe qu'une seul fois dans ma méthode.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Public Shared Sub InformationApplicationLog(ByVal pFunction As String, ByVal pMsg As String) Dim vEventLog As EventLogTraceListener = New EventLogTraceListener("MonAppli") With vEventLog .TraceOutputOptions = TraceOptions.DateTime .Name = pFunction ' Ajout de l'écouteur. Trace.Listeners.Add(vEventLog) 'ecriture du message dans le gestionnaire d'evenement. Trace.WriteLine(pMsg, pFunction) Trace.Flush() Trace.Close() End With End Sub
J'ai beau tourner le problemme dans tous les sens, je ne trouve pas.
Auriez-vous une idée de ce qui pourrait faire que les mêmes traces s'écrivent 2 ou 3 fois dans le journal?
Merci d'avance
Partager