hello tous le monde!
 
 
je cherche à créer un script qui cherche un certain fichier, dans tous les disques durs d'un ordinateur, pour le supprimer.
 
mais je ne sais pas comment faire une telle recherche !
 
 
 
merci de vos réponses !!

 
Voir http://forum.hardware.fr/hardwaref [...] 8287-1.htm pour une solution en VBS. Il faut sans doute un peu l'adapter si c'est pour du VBA ou du VB.

http://support.microsoft.com/defau [...] US;q185601
 
C'est du VB, mais y'a pas grand chose à changer pour que ça marche avec VBS.
 
A noter que FSO s'appelle en VBS comme ça :
 

Grossomodo la même chose ici :
 
http://www.freevbcode.com/ShowCode.asp?ID=3103

Merci pour vos réponse, j'ai regardé un peu, mais entre temps j'ai réussi à faire de mon coté, il y a tout de même quelques thermes que je n'ai pas compris :
 
 
Dim chListe, champ, i
 
i = 0
strComputer = "."
 
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )
 
Set colFiles = objWMIService.ExecQuery _  
("Select * from CIM_DataFile where FileName = 'vie paradisiaque.zip' and Extension = 'exe'" )
 
For Each objFile in colFiles
 'objFile.delete
 i = i + 1
 'wscript.echo objfile.Name
 champ = objFile.Name
 chListe = "Le ou les fichier(s) suivant(s) ont bien été supprimé." & VbCrLf & VbCrLf
 chListe = chListe & champ & VbCrLf
 objFile.delete
Next
 
if i = 0 then
 MsgBox("Aucun fichier trouvé" )
 else
 if i = 1 then
  Wscript.Echo "Un seul fichier a été trouvé et va être effacé"
  Wscript.Echo chListe
  else
  if i > 1 then
   Wscript.Echo i & " fichiers ont été trouvé et vont être effacé."
   Wscript.Echo chListe
  end if
 end if
end if
 
 
 
ça marche, efface même les fichiers en lecture seule et les fichiers cachés.
Bref il a l'air de bien marché, mais certaines lignes m'échappent :
 
"{impersonationLevel=impersonate}!\\"  
 
Set colFiles = objWMIService.ExecQuery _    (le _ ici je ne sais pas à quoi il sert)
 
 
pour faire ce script, je me suis inspiré un peu partout.

Pour le premier, c'est juste un truc que tu copies comme ça, ça marche que comme ça
 
Au lieu de passer par FSO, ce script passe par WMI. Je sais pas ce que c'est par contre, m'enfin du moment que ça marche (WMI c'est un truc interne à Windows, c'est tout ce que je sais)
 
Le "_" en fin de ligne, ça indique que la ligne suivante est en fait la fin de cette ligne.
 
Genre :
 
a = 1
 
Peut d'écrire comme ça :
a _
= _
1
 
(pas testé, mais normalement ça doit marcher

ok dac !
 
merci pour ta réponse !
 
je regarde ça