Monitoring services Automatic startup type

Question

I've installed Opsmgr 2012 R2 CU5 in a test environment. Going to replace our Opsmgr 2007 R2 live environment within 2 months.
I want to monitor all Automatic startup services. In Opsmgr 2007 R2 I created an override for the rule " A service terminated Unexpectedly". Did the same In Opsmgr 2012, but I don't get an alert if I stop a service. I noticed that there or a few
services in the "Core Windows Services Rollup" monitor that do create an alert if I stop them.
What am I missing?
Thanx

Answer 1

I've got something similar in my toolbox. No clue where I've got the VBS from (ages ago, thanks to the author :-) ) but it still works fine:
<UnitMonitor ID="Syliance.Windows.Server.Extension.ManagementPack.Generic.Service.Monitor" Accessibility="Internal" Enabled="false" Target="Windows!Microsoft.Windows.Server.Computer" ParentMonitorID="Health!System.Health.AvailabilityState" Remotable="true" Priority="Normal" TypeID="Windows!Microsoft.Windows.TimedScript.TwoStateMonitorType" ConfirmDelivery="false">
<Category>AvailabilityHealth</Category>
<AlertSettings AlertMessage="Syliance.Windows.Server.Extension.ManagementPack.Generic.Service.Monitor_AlertMessageResourceID">
<AlertOnState>Error</AlertOnState>
<AutoResolve>true</AutoResolve>
<AlertPriority>Normal</AlertPriority>
<AlertSeverity>Error</AlertSeverity>
<AlertParameters>
<AlertParameter1>$Data/Context/Property[@Name='Description']$</AlertParameter1>
</AlertParameters>
</AlertSettings>
<OperationalStates>
<OperationalState ID="Success" MonitorTypeStateID="Success" HealthState="Success" />
<OperationalState ID="Error" MonitorTypeStateID="Error" HealthState="Error" />
</OperationalStates>
<Configuration>
<IntervalSeconds>300</IntervalSeconds>
<SyncTime />
<ScriptName>Monitor_Auto_Services.vbs</ScriptName>
<Arguments>/Exclude:"'Microsoft .NET Framework NGEN v4.0.30319_X64' 'Microsoft .NET Framework NGEN v4.0.30319_X86' 'Performance Logs and Alerts'"</Arguments>
<ScriptBody><![CDATA[' Monitor if any automatic service is not running
' Excluded: Performance Logs and Alerts service is auto but never running
' Create a two state timed generic script unit monitor
' HEALTH EXPRESSIONS
' Healthy Property[@Name='State'] Contains GOOD
' Unhealthy Property[@Name='State'] Contains BAD
' ALERT DESCRIPTION
' $Data/Context/Property[@Name='Description']$
Set oAPI = CreateObject("MOM.ScriptAPI")
Set oShell = CreateObject( "WScript.Shell" )
Set arArgs = WScript.Arguments.Named
Set oBag = oAPI.CreatePropertyBag()
dim StateRegPath : StateRegPath = "HKLM\" & oAPI.GetScriptStateKeyPath("ServicesStopped")
On Error Resume Next
GetState = oShell.RegRead(StateRegPath & "\ServicesList")
on error Goto 0
allGood = TRUE
RepeatDown = FALSE
sExcludeList = arArgs.Item("Exclude")
Set oWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
'Get System Uptime, if recently rebotted, do not continue
Set colOperatingSystems = oWMI.ExecQuery("Select * From Win32_PerfFormattedData_PerfOS_System")
For Each objOS in colOperatingSystems
intSystemUptime = Int(objOS.SystemUpTime)
Next
If (intSystemUptime > 900) Then
Set allSvc = oWMI.ExecQuery("Select * from Win32_Service Where StartMode = 'Auto'")
For Each oSvc in allSvc
If (oSvc.Started = FALSE and instr(1,sExcludeList,"'" & oSvc.DisplayName & "'") < 1) Then
sList = sList & oSvc.DisplayName & ", "
allGood = FALSE
if instr(1,GetState,oSvc.DisplayName) > 0 then RepeatDown = TRUE
End If
Next
If allGood = TRUE then
Call oBag.AddValue("State", "GOOD")
call oShell.RegWrite (StateRegPath & "\ServicesList", "", "REG_SZ")
Else
if RepeatDown = TRUE then
Call oBag.AddValue("State", "BAD")
Call oBag.AddValue("Description", "Automatic service(s) not running: " & sList)
end if
call oShell.RegWrite (StateRegPath & "\ServicesList", sList, "REG_SZ")
End if
Else
Call oBag.AddValue("State", "GOOD")
End If
Call oAPI.Return(oBag)]]></ScriptBody>
<TimeoutSeconds>60</TimeoutSeconds>
<ErrorExpression>
<SimpleExpression>
<ValueExpression>
<XPathQuery Type="String">Property[@Name='State']</XPathQuery>
</ValueExpression>
<Operator>Equal</Operator>
<ValueExpression>
<Value Type="String">BAD</Value>
</ValueExpression>
</SimpleExpression>
</ErrorExpression>
<SuccessExpression>
<SimpleExpression>
<ValueExpression>
<XPathQuery Type="String">Property[@Name='State']</XPathQuery>
</ValueExpression>
<Operator>Equal</Operator>
<ValueExpression>
<Value Type="String">GOOD</Value>
</ValueExpression>
</SimpleExpression>
</SuccessExpression>
</Configuration>
</UnitMonitor>
</Monitors>
HTH,
Cheers,
Patrick
Please remember to click “Mark as Answer” on the post that helped you.
Patrick Seidl (System Center and Private Cloud)
Website: http://www.syliance.com
Blog: http://www.systemcenterrocks.com