Discussion :

[parker13]

J'aimerais savoir comment rechercher une chaine de caractères dans un fichier TXT.
Si vous avez un exemple de script, je suis preneur.
Merci d'avance

[ludo96x]

Hello,

Ce que tu cherches en gros est ceci :

exemple général :
----------------

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
chaine = "bonjour tout le monde"
mot_cherche = "tout"
 
if instr(1, chaine, mot_cherche) > 0 then
wscript.echo "mot trouvé dans la chaîne"
end if

-------------------------------------------------------------

un exemple pour le fichier "open.txt" :
----------------------------------

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
mot_cherche = "tout"
compteur = 0
 
fichier_lecture_1 = "open.txt"
Set fso = CreateObject("Scripting.FileSystemObject") 
set fichier_lecture_2 = fso.opentextfile(fichier_lecture_1, 1, true)
do until fichier_lecture_2.atendofstream 
chaine = fichier_lecture_2.readline() 
if instr(1, chaine, mot_cherche) > 0 then
compteur = compteur + 1
end if
loop
fichier_lecture_2.close 
set fichier_lecture_2 = nothing
set fso = nothing 
 
wscript.echo "mot trouvé " & compteur " fois !!"

-------------------------------------------------------------

PS : si tu souhaites plus de détail cherche la fonction "instr"

LUDO96x

[Edit] bbil : Penser à rajouter les balises de codes, utiliser le bouton