[R] Recherche d'un fichier log

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
richie6700
Niveau 4
Niveau 4
Messages : 57
Enregistré le : ven. 21 janv. 2011 16:22
Status : Hors ligne

[R] Recherche d'un fichier log

#1

Message par richie6700 »

Bonjour à tous,

Ma question est dans le titre :D. J'aurais aimé effectué une recherche dans un fichier LOG. Voici mon script

Code : Tout sélectionner

#Include <File.au3>

$file = FileOpen("test.log",0)
$NB = _FileCountLines("test.log")

;si probleme
    If $NB=0 Then
        MsgBox(64, "Erreur", "impossible de trouver le fichier log")
        Exit
    EndIf

For $i=1 to $NB

        $line = FileReadLine($file) ; lire toute les lignes

;si il y a "error" dans le fichier
        If StringInStr($line,"error" ,2) Then ;flag=2 => on s'interesse pas a la casse
                    MsgBox(0,"","il existe erreur ")
        EndIf

Next

FileClose($file); on oublie pas de fermer le fichier!!!!
Le script marche... Mais le problème c'est que par exemple si il y a 4 error la msgbox s'affiche 4 fois (ce qui est normal lol). Comment faire pour ne l'afficher qu'une fois...

Merci à vous
Modifié en dernier par richie6700 le lun. 11 avr. 2011 11:15, modifié 1 fois.
Avatar du membre
jchd
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 2284
Enregistré le : lun. 30 mars 2009 22:57
Localisation : Sud-Ouest de la France (43.622788,-1.260864)
Status : Hors ligne

Re: [...] Recherche d'un fichier log

#2

Message par jchd »

Comme ça ?

Code : Tout sélectionner

$log = FileRead("test.log")
If @error Then
    MsgBox(64, "Erreur", "impossible de lire le fichier log")
Else
    If StringRegExp($log, '(?i)error', 0) Then
        MsgBox(0, "", "il existe erreur ")
    EndIf
EndIf
La cryptographie d'aujourd'hui c'est le taquin plus l'électricité.
richie6700
Niveau 4
Niveau 4
Messages : 57
Enregistré le : ven. 21 janv. 2011 16:22
Status : Hors ligne

Re: [R] Recherche d'un fichier log

#3

Message par richie6700 »

Merci beaucoup!!!!!
Répondre