enregistrer tous les messages d'erreur ou autres dans un fichier text

Question

salut
je cherche comment enregistrer tous les textes des messages d'erreur ou autres dans un fichier text avec date heure
afin de faire une trace sur les événements apparus dans mon programme

phil

sonoboss · Answer

les erreurs font partie de la collection "Err"
Donc en gros dans ta gestion d'erreur tu met en début de procédure : 
private sub jesépaskoi()
On error goto lenomketuveux

exit sub

lenomketuveux:

open "lenomdetonfichier.txt" for append as #1

   write #1, err.description & "/" & now

close #1

tagestiond'erreur

end sub
 Et pis voila tu auras un joli log... pas trop granis j'espère!

Le jour où la merde vaudra de l'or, les pauvres naîtons sans trou du cul!

cs_philcolins · Answer

ok
ça c'est fait pour les gestions des erreurs
par contre il faut a chaque gestion ajouter
> open "lenomdetonfichier.txt" for append as #1
> 
>    write #1, err.description & "/" & now '''' ou bien msg = " ton text"
> 
> close #1

j'en ai un paquet

y aurait pas une astuce 
qui détecte l'apparition d'une msgbox
puis copie le text de la msgbox dans ce fameux "lenomdetonfichier.txt"
du genre:

if msgbox.activate then
open "lenomdetonfichier.txt" for append as #1
write #1, msgbox.text & "/" & now 
close #1
end if

phil

sonoboss · Answer

ben non, avec 1 pe de jujote on fé kom ca : 

Public sub GestErrLog()

open "lenomdetonfichier.txt" for append as #1
write #1, err.description & "/" & now 
close #1

end sub

et ds toutes tes gestions d'erreurs tu mets : 

call GestErrLog()

é pi voilà!

Le jour où la merde vaudra de l'or, les pauvres naîtons sans trou du cul!

Enregistrer tous les messages d'erreur ou autres dans un fichier text

3 réponses

Discussions similaires