[R] Rechercher une chaine dans un fichier (.txt)

[sambalec]

Salut j'ai fouiné dans les topics sans trouver exactement ma requête.
J'aimerais savoir comment rechercher une valeur "$valeur" dans un fichier texte et si cette valeur est trouvée, un textbox apparait par exemple disant que la chaine est trouvée.

Merci d'avance

[jbnh]

Salut, tu devrais trouver la réponse ici.

[sambalec]

Ca m'aide un petit peu mais mon code semble foireux :

Code : Tout sélectionner

#include <file.au3>

;-------------------------------------------
Dim $valeur = "chaine", $i, $text
$filename = 'test.txt'
;-------------------------------------------

While 1
    $i += 1
    $var = FileReadLine($filename, $i)
    if @error = -1 Then ExitLoop
   
    If StringInStr($var, $valeur) Then ; SI LA CHAINE EST TROUVEE
        MsgBox(4096, "Sambatest", "Trouvé", 1)  
        exitloop
    Else ; SI LA CHAINE N'EST PAS TROUVEE
        MsgBox(4096, "Sambatest", "Pas Trouvé", 1) 
        exitloop
    EndIf
Wend

N'y a t'il pas plus simple ?

[sambalec]

Oui le code foire totalement

[Tlem]

Personnellement, j'irais au plus simple.

Code : Tout sélectionner

#include <file.au3>

;-------------------------------------------
Dim $valeur = "chaine", $i, $text
$filename = 'test.txt'
;-------------------------------------------

If _ReplaceStringInFile($filename, $valeur, $valeur) Then
    MsgBox(4096, "Sambatest", "Trouvé", 1)
Else ; SI LA CHAINE N'EST PAS TROUVEE
    MsgBox(4096, "Sambatest", "Pas Trouvé", 1)
EndIf

[sambalec]

Parfait ! Merci bien !!