Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Scripting Microsoft Utilisation du CPU

Utilisation du CPU

2 réponses
Avatar
OlivierT
Bonjour,

J'aurai aimé récupérer le pourcentage d'utilisation (comme dans Task
Manager) du processeur à un instant t en VBScript.

Quelqu'un peut-il m'aider ?

Merci d'avance,

Olivier
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Gilles LAURENT
"OlivierT" a écrit dans le message
de news:
| Bonjour,

Bonjour,

| J'aurai aimé récupérer le pourcentage d'utilisation (comme dans Task
| Manager) du processeur à un instant t en VBScript.

Ci-dessous le script VBScript 'getProcUsage.vbs' permettant de
déterminer le pourcentage d'utilisation du processeur. Tout cela repose
sur WMI et en particulier sur la manipulation des compteurs de
performance.

+++ Pré requis
Windows XP/2003

+++ Usage
>cscript getProcUsage.vbs

-- Coupez ici : getProcUsage.vbs --

Option Explicit

' déclaration des variables
Dim oWMI, oRef, oProc
Dim nLoop

' déclaration des constantes
Const PERFDATACLASS = "Win32_PerfFormattedData_PerfOS_Processor"
Const NBMEASURE = 10

' initialisation des objets
Set oWMI = GetObject ("winmgmts:.rootcimv2")
Set oRef = CreateObject ("WbemScripting.SWbemRefresher")
Set oProc = oRef.Add (oWMI , PERFDATACLASS & ".Name='_Total'").Object

' initialisation des compteurs de performance
oRef.Refresh

' boucle permettant de "relever les compteurs" à interval
' régulier. Les compteurs sont mis à jour à chaque itération
For nLoop = 1 to NBMEASURE
WScript.Sleep (1000)
oRef.Refresh
WScript.Echo "CPU Usage : " & oProc.PercentProcessorTime & " %"
Next

-- Coupez ici : getProcUsage.vbs --

--
Gilles LAURENT
Me contacter : http://cerbermail.com/?zoTY7ZkLcD
Avatar
OlivierT
Merci beacoup.
Je garde ton code bien precieusement :-)

Olivier


"OlivierT" a écrit dans le message
de news:
| Bonjour,

Bonjour,

| J'aurai aimé récupérer le pourcentage d'utilisation (comme dans Task
| Manager) du processeur à un instant t en VBScript.

Ci-dessous le script VBScript 'getProcUsage.vbs' permettant de
déterminer le pourcentage d'utilisation du processeur. Tout cela repose
sur WMI et en particulier sur la manipulation des compteurs de
performance.

+++ Pré requis
Windows XP/2003

+++ Usage
>cscript getProcUsage.vbs

-- Coupez ici : getProcUsage.vbs --

Option Explicit

' déclaration des variables
Dim oWMI, oRef, oProc
Dim nLoop

' déclaration des constantes
Const PERFDATACLASS = "Win32_PerfFormattedData_PerfOS_Processor"
Const NBMEASURE = 10

' initialisation des objets
Set oWMI = GetObject ("winmgmts:.rootcimv2")
Set oRef = CreateObject ("WbemScripting.SWbemRefresher")
Set oProc = oRef.Add (oWMI , PERFDATACLASS & ".Name='_Total'").Object

' initialisation des compteurs de performance
oRef.Refresh

' boucle permettant de "relever les compteurs" à interval
' régulier. Les compteurs sont mis à jour à chaque itération
For nLoop = 1 to NBMEASURE
WScript.Sleep (1000)
oRef.Refresh
WScript.Echo "CPU Usage : " & oProc.PercentProcessorTime & " %"
Next

-- Coupez ici : getProcUsage.vbs --

--
Gilles LAURENT
Me contacter : http://cerbermail.com/?zoTY7ZkLcD