Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
only FoxPro-Code would be much better
it shows 100% the whole time.. there must be something wrong...
lcExeName=[vfp7.exe]
lcComputer = "."
loWMIService = Getobject("winmgmts:" ;
+ "{impersonationLevel=impersonate}!\\" + lcComputer + "\root\cimv2")
colProcessList = loWMIService.ExecQuery ;
("Select * from Win32_Process")
FOR EACH loProcess In colProcessList
IF TRANSFORM(loProcess.Name)=lcExeName
? "Name "+ TRANSFORM(loProcess.Name)
? "Process ID: " + TRANS(loProcess.ProcessID)
? "App Command Line: " + TRANS(loProcess.CommandLine)
? "CPU usage to date: " + ;
TRANSFORM((VAL(loProcess.KernelModeTime)+;
VAL(loProcess.UserModeTime)) / 10000000)
ENDIF
NEXT
Do I need FoxPro 7 for the code or is FoxPro 6 enough?
lcComputer = "."
loWMIService = Getobject("winmgmts:" ;
+ "{impersonationLevel=impersonate}!\\" + lcComputer + "\root\cimv2")
colProcessList = loWMIService.ExecQuery ;
("Select * from Win32_Process where name='System Idle Process'")
FOR EACH loProcess In colProcessList
? "Name "+ TRANSFORM(loProcess.Name)
? "Process ID: " + TRANS(loProcess.ProcessID)
? "App Command Line: " + TRANS(loProcess.CommandLine)
? "CPU usage to date: " + ;
TRANSFORM((VAL(loProcess.KernelModeTime)+;
VAL(loProcess.UserModeTime)) / 10000000)
NEXT
now i realize, that my idee to get informations about the usage/utilization of the CPU is very difficult...