Script pour lister les fichiers pst sur un ordinateur sur le réseau [Résolu]

Signaler
Messages postés
2
Date d'inscription
mardi 9 juin 2009
Statut
Membre
Dernière intervention
9 juin 2009
-
Messages postés
2
Date d'inscription
mardi 9 juin 2009
Statut
Membre
Dernière intervention
9 juin 2009
-
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

2 réponses

Messages postés
267
Date d'inscription
jeudi 5 février 2009
Statut
Membre
Dernière intervention
26 novembre 2013
1
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
Messages postés
2
Date d'inscription
mardi 9 juin 2009
Statut
Membre
Dernière intervention
9 juin 2009

Folarin