Monitor all processes EXCEPT _Total

Question

Hi!
My goal is to monitor all processes on a given server, and raise an alert if memory usage (working set) exceeds 1 GB. I've tried the following: https:// sites.google.com/site/scomblogs/journal-blog/processperformancemonitoringinscom
The problem is that the instance _Total will always contain a value higher than 1 GB. I can't seem to figure out how to override this. Is it possible at all?

Answer 1

Thanks a lot! The WMI link did the trick. My final script came out as follows:
On Error Resume Next
strComputer = "."
' Instantiate MOM API
Set objMOM = CreateObject("MOM.ScriptAPI")
Set ObjBag = objMOM.CreatePropertyBag()
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery _
("Select * from Win32_Process")
counter = 0
proc = ""
For Each objProcess in colProcesses
' 1 GB
wsetGb = objProcess.WorkingSetSize / 1073741824
'100 MB
' wsetGb = objProcess.WorkingSetSize / 104857600
IF (wsetGb > 1) THEN
usr = objProcess.GetOwner(strNameOfUser,strUserDomain)
counter = counter + 1
proc = proc + objProcess.Name +", owner: " +strUserDomain + " " + strNameOfUser +" cmd: " +objProcess.CommandLine
END IF
Next
IF (counter > 0) THEN
Call ObjBag.AddValue("State","Error")
Call ObjBag.AddValue("Culprit",proc)
Call ObjBag.AddValue("WorkingSetSizeInGb",wsetGb)
ELSE
Call ObjBag.AddValue("State","Ok")
Call ObjBag.AddValue("Culprit","None")
Call ObjBag.AddValue("WorkingSetSizeInGb","Not Applicable")
END IF
IF Err.Number <> 0 THEN
EH
END IF
Sub EH
Call ObjBag.AddValue("State","Warning")
Call ObjBag.AddValue("Culprit",Err.Source)
Call ObjBag.AddValue("Warning",Err.Description)
Err.Clear
End Sub
objMOM.AddItem(ObjBag)
Call objMOM.ReturnItems