Script pour lister les fichiers pst sur un ordinateur sur le réseauRésolu

Question

Bonjour a tous,

j'aurais besoin d'un coup de main. Voici la problèmatique :

Voici mon script : 

Dim ordinateur
ordinateur=inputbox("Entrez le nom d'ordinateur")
Set objWMIService = GetObject("winmgmts:" _ 
& "{impersonationLevel=impersonate}!\" & ordinateur & "\root\cimv2")
Set colFiles = objWMIService.ExecQuery _
("Select * from CIM_DataFile where Extension = 'pst'")
Msgbox("Résultat dans quelques instants")
For Each objFile in colFiles
Wscript.Echo objFile.Name 
Next
 
Ce script demande le nom d'ordinateur sur le réseau afin d'y recherche tous les pst existants, mais je souhaite que l'on me complète ce script afin qu'il affiche sur un fichier texte la liste de tous les pst sur un ordinateur on y mettant le chemin de chaque pst.

Merci d'avance

Folarin

Folarin

hellangel777 · Accepted Answer

Bonjour,

Le fait de reposter ton message alors que tu l'as posté à un peu plus de 9h c'est poussé !
Relis le règlement.

Bonne journée

HellAngel777
<hr />
Les machines ne font pas d'erreurs
Heureusement nous sommes humains

cs_Folarin · Answer

Folarin

Script pour lister les fichiers pst sur un ordinateur sur le réseau

2 réponses

Votre réponse

Discussions similaires