CLASSE DE LOG - LOGGER LES ÉVÈNEMENT D'UNE APPLICATION
teamtiti
Messages postés
61
Date d'inscription
jeudi 19 juillet 2007
Statut
Membre
Dernière intervention
28 mai 2008
-
1 déc. 2007 à 17:16
goldorakiller Messages postés 16 Date d'inscription mercredi 31 octobre 2007 Statut Membre Dernière intervention 6 juillet 2011 - 6 juil. 2011 à 10:36
goldorakiller Messages postés 16 Date d'inscription mercredi 31 octobre 2007 Statut Membre Dernière intervention 6 juillet 2011 - 6 juil. 2011 à 10:36
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/44852-classe-de-log-logger-les-evenement-d-une-application
https://codes-sources.commentcamarche.net/source/44852-classe-de-log-logger-les-evenement-d-une-application
6 juil. 2011 à 10:36
A quoi sert cette instruction : 'If LogLevel <= _Level Then _Stream.WriteLine("[" & Format(Now(), "yyyy/MM/dd-HH:mm:ss") & "] " & sMessage)
6 juil. 2011 à 10:19
Très simple d'utilisation.
10 déc. 2007 à 17:57
Il faut que tu fasses un appel à la fonction write("J'appuie sur le bouton", _Debug) dans ta fonction event (click sur le bouton) et le texte apparaitra dans ton fichier log.
Comme tu l'as fait, il faut que tu te mettes en level _Debug pour que ce message s'affiche dans ton log.
10 déc. 2007 à 17:43
[2007/12/10-17:22:29] [NORMAL ] Opérator for ESRR v1.0.0.0
[2007/12/10-17:22:29] [NORMAL ] Application Started...
[2007/12/10-17:22:29] [NORMAL ] Log level has been changed due to user settings: _DEBUG
par exemple si je clique sur un bouton pour faire une action comment il faut faire pour que l'info remonte dans le fichier ?
Tu m'escuse d'être lourd mais je suis débutant et c'est pas facile d'être débutant
3 déc. 2007 à 09:59
'Déclaration d'une variable de type cLog
Dim MyLog As cLog
'Instanciation de la varaible
MyLog = New cLog(TRUE, "DEFAULT") 'DEFAULT is set to \ApplicationPath\Logfiles
'Activation du log
MyLog.Enable()
'Ecriture du fichier log
MyLog.Write("Application Started...", cLog.LEVEL._NORMAL)
MyLog.SetLevel(cLog.LEVEL._DEBUG) 'To set a different logging level
...
MyLog = Nothing
Voili voulou.
1 déc. 2007 à 17:16