Recherche de fichiers

Recherche de fichiers - XML/XSL - Programmation

Marsh Posté le 06-09-2006 à 17:42:02    

Salut à tous!
Je débute le VBscript puisque je dois en faire pour le boulot. Je vous explique mon probleme.
J'effectue une recherche de fichier par extension en l'occurence les PST. Elle marche mais cette recherche s'effectue sur tous les supports (tous les disques). Je veux uniquement rechercher les fichiers sur le disque C. Peut-on aussi rechercher les fichiers qui ont une date de creation inférieur à 1 ans?
Voici mon code :
 
strComputer = "."  
Set objFSO = CreateObject("Scripting.FileSystemObject" )
Set objWMIService = GetObject("winmgmts:" _  
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )  
Set colFiles = objWMIService.ExecQuery _  
("Select * from CIM_DataFile where Extension = 'pst'" )  
For Each objFile in colFiles  
Wscript.Echo objFile.Name  
Next
 
Autre question, est-il possible d'afficher les resultats de la recherche autre que sur des msgbox, une fenetre avec tous les noms de fichiers par exemple et pouvoir ainsi les choisir (case à cochée par ex) pour les sauvegardés, qui est le but de mon utilitaire.
Merci d'avance pour vos réponses!

Reply

Marsh Posté le 06-09-2006 à 17:42:02   

Reply

Marsh Posté le 06-09-2006 à 17:42:41    

Oups, trompé de catégorie, voulai mettre VB/VBA/VBS!
Désolé ...

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed