You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
543 B
16 lines
543 B
' Get the performance counter instance for the Windows Management process
|
|
set refresher = CreateObject("WbemScripting.SWbemRefresher")
|
|
|
|
set services = GetObject ("winmgmts://alanbos5/root/cimv2")
|
|
|
|
if err then WScript.Echo Err.Description
|
|
set refreshableItem = refresher.AddEnum (services, "win32_perfrawdata_perfproc_process")
|
|
|
|
for i = 1 to 100000
|
|
WScript.Echo "***********************************"
|
|
refresher.Refresh
|
|
|
|
for each process in refreshableItem.ObjectSet
|
|
Wscript.Echo process.Name, process.HandleCount
|
|
next
|
|
next
|