Forum Discussion

scsvel's avatar
scsvel
Frequent Contributor
14 years ago
Solved

VBScript - Get CPU Usage

Hi all, I want to get CPU Usage from VBScript. I can't use TC API that's why I am getting like this. Here is my code. strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strCompute...
  • vex's avatar
    vex
    14 years ago
    I use this in my scripts all the time.  This should work.



    Function sdGetCpu(proc)



      proc = aqString.Replace(proc, ".exe", "")

      proc = lcase(proc)

      

      Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")

      set objRefresher = CreateObject("WbemScripting.SWbemRefresher")

      Set colItems = objRefresher.AddEnum(objWMIService, "Win32_PerfFormattedData_PerfProc_Process").objectSet

      objRefresher.Refresh



      For Each objItem in colItems

        If lcase(objItem.Name) = proc Then 

          objRefresher.Refresh

          sdGetCpu = objItem.PercentProcessorTime

        End If

      Next

      

    End Function
HKosova's avatar
HKosova
Icon for Alumni rankAlumni
14 years ago
Hi Shanmugavel,



Win32_PerfFormattedData_PerfOS_Processor.PercentProcessorTime in the script that you posted is the CPU usage -- per processors/cores indeed. I'm afraid, it's not clear from your post what issues you're having with this code.



Could you please clarify which exactly CPU usage do you need? --

- A list of CPU usage per each process (application) (marked 1 in the attached screenshot)

- CPU usage for a specific process (application)

- Total CPU usage (marked 2 on the attached screenshot)

- Something else



Also, why don't TestComplete's Sys.CPUUsage and Sys.Process(...).CPUUsage suit your needs? Is it because you are planning to run this code using wscript/cscript outside of TestComplete?