Bonjour,
Je dois travailler sur un vieux serveur, duquel il est impossible de rapatrier des données, du coup je dois travailler en VBS :(.
J'ai un fichier texte, dont je veux filtrer chaque ligne en fonction d'un critere (présence d'une chaine) et rediriger le résultat vers un autre fichier texte.
J'arrive à afficher ligne par ligne le contenu, mais le filtre dessus ne fonctionne pas.
Voici mon code :
l'erreur est : Ms vbscript runtime error: tpe mismatch : 'filter'.Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Const ForReading = 1, ForWriting = 2 Dim oFso, f Set oFso = CreateObject("Scripting.FileSystemObject") Set f = oFso.OpenTextFile("c:\temp\ecr.txt", ForReading) while Not f.AtEndOfStream g=f.readline b=Filter(g,"10.32.5.50",true,1) For each x in b wscript.echo g next wend f.Close
Quelqu'un aurait il une idée de ce qui ne va pas dans ce script?
Merci d'avance à ceux qui pourraient m'aider. :)