Controlé si une application est lancée

Question

Slt à tous

Je débute en VB Script et je recherche à voir les applications lancés sur le pc. Pourriez m'aider car avec la fonction createobject j'arrive à voir un soft du style Excel mais pas les autres.

Merci par avance.

TheEwook · Answer

Salut, 

Ben ce que tu peux faire c'est d'afficher la liste des procces sur l'ordi distant.

Et aprés de controler les process lancés.

Voilà le code pour afficher les processus distant ou local :


strComputer = "Nom du poste"
Set objWMIService = GetObject("winmgmts:\" & strComputer & "\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * from Win32_Process", , 48)
For Each objItem In colItems
Wscript.Echo "process en cours : " & objItem.Caption

Next


Voilà bien sur l'affichage des résultats et à personnaliser mais sinon c'est ca

Si tu veux savoir si des applications en particulieres sont lancées il suffit de les tester une par une.

Ex: 


strComputer = "Nom du poste"
Set objWMIService = GetObject("winmgmts:\" & strComputer & "\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * from Win32_Process", , 48)
For Each objItem In colItems

if(objItem.Caption = "notepad.exe") then
Wscript.Echo "Notepad est lancé"
end if

Next


voilà si tu as des pb n'hésite pas

@++

TheEwook

Controlé si une application est lancée

1 réponse

Discussions similaires