Discussion :

[homemac]

Bonjour,

J'aimerai trouver un script qui permet de rechercher un fichier "ex: toto.exe" dans l'arborescence complète d'une partition "ex : C:\", pour pouvoir ensuite le supprimer ou le modifier.
J'ai essayé avec la fonction "FileSystemObject" mais je n'arrive qu'a effectuer une recherche sur un chemin specifique "ex : C:\WINNT\..."
Donc j'attends votre aide.

Merci d'avance.

[ced600]

Peux tu poster le script qui ne fonctionne pas comme tu le souhaites ?

[pitchalov]

homemac, si tu veux faire toi-même recherche en VBScript, il faut que tu crée une fonction récursive qui parcourra l'ensemble des répertoires enfants à ton répertoire de base.

en gros, ta fonction devrait ressembler à ça :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Search(strFile, objFolder)
  For each objFile in objFolder.Files
    If objFile.Name = strFile Then WScript.Echo "Foud : " & objFile.Path
  Next
  For each objSubFolder in objFolder.SubFolders
    Search(strFile, objSubFolder)
  Next
End Sub
 
'Utilisation : 
Set objFso = CreateObject("Scripting.FileSystemObject")
Set objFolderBase = objFso.GetFoler("C:\") 'Par exemple
Search("toto.txt", objFolderBase)