[..] Récupérer la liste des logiciels
Posté : jeu. 12 août 2021 16:04
Bonjour à tous,
je souhaiterais récupérer la liste des logiciels ouverts sur mon poste à un instant comme le fait le gestionnaire de tâches de Windows mais j'ai bien des difficultés à y parvenir.
J'ai toujours des logiciels vus par mon script, comme la calculatrice (et d'autres applications) et je ne comprends pas pourquoi puisquie je ne les ai jamais lancées.
Voici une capture d'écran pour être plus clair :
https://ibb.co/RPmWB9x
Voici mon script actuel :
Sauriez-vous comment je dois m'y prendre ?
Merci pour votre aide,
je souhaiterais récupérer la liste des logiciels ouverts sur mon poste à un instant comme le fait le gestionnaire de tâches de Windows mais j'ai bien des difficultés à y parvenir.
J'ai toujours des logiciels vus par mon script, comme la calculatrice (et d'autres applications) et je ne comprends pas pourquoi puisquie je ne les ai jamais lancées.
Voici une capture d'écran pour être plus clair :
https://ibb.co/RPmWB9x
Voici mon script actuel :
Code : Tout sélectionner
#include <Process.au3>
#include <Array.au3>
$tabFenetre = WinList()
$cpteur = 0
For $i = 1 To $tabFenetre[0][0]
If $tabFenetre[$i][0] <> "" And BitAND(WinGetState($tabFenetre[$i][1]), 2) Then
$cpteur = $cpteur + 1
EndIf
Next
Dim $tabScan[$cpteur+1][2]
$tabScan[0][0] = $cpteur
$cpteur = 0
For $i = 1 To $tabFenetre[0][0]
If $tabFenetre[$i][0] <> "" And BitAND(WinGetState($tabFenetre[$i][1]), 2) Then
$cpteur = $cpteur + 1
$tabScan[$cpteur][0] = $tabFenetre[$i][0]
$tabScan[$cpteur][1] = _ProcessGetName(WinGetProcess($tabFenetre[$i][1]))
EndIf
Next
_ArrayDisplay($tabScan, "$tabSavScan")Merci pour votre aide,