Bonjour,
je début sous VBS et j'aimerais savoir comment faire en utilisant un VBS vérifier si le process est lancé " le vbs doit recupérer le nom du process depuis un XML".
j'ai fais ça mais , sans resultat :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31 '****************** Chargement du XML ******************************* Set xmlDoc = CreateObject("Microsoft.XMLDOM") xmlDoc.async = "false" xmlDoc.load("Services.xml") Set oElement = xmlDoc.documentElement '****************** Fonction d'exploration du XML ******************* Function xml_reader() If Not oElement Is Nothing Then For Each x In oElement.getElementsByTagName("Nom_Serveur") For Each y In oElement.getElementsByTagName("Nom_Appli") Set objWMI = GetObject("winmgmts:root\cimv2") sQuery = "Select * from Win32_process where name=&y " For Each oproc In objWMI.execquery(sQuery) Next Set objWMI = Nothing Next Next End If End Function ' ****************** PROGRAMME PRINCIPAL ********************** xml_reader()
Partager