NAP vbscript sample code
The foundations for Manageability in Windows is Windows Management Instrumentation (WMI; formerly WBEM) and WMI extensions for Windows Driver Model (WDM).
ActiveXperts Network Monitor provides the ability to build monitor check routines based on WMI. ActiveXperts has collected more than a hundred WMI samples. You can use these samples as a base for new check routines you can write yourself. The NAP WMI class can be used in ActiveXperts Network Monitor to monitor your servers.
Sample Code
Set objWMIService = GetObject("winmgmts:\\.\root\nap")
Set colItems = objWMIService.ExecQuery("Select * From NAP_Client")
For Each objItem in colItems
WScript.Echo "description:" & objItem.description
WScript.Echo "fixupURL:" & objItem.fixupURL
WScript.Echo "name:" & objItem.name
WScript.Echo "napEnabled:" & objItem.napEnabled
WScript.Echo "napProtocolVersion:" & objItem.napProtocolVersion
WScript.Echo "probationTime:" & objItem.probationTime
WScript.Echo "systemIsolationState:" & objItem.systemIsolationState
WScript.Echo ""
WScript.Echo "########"
WScript.Echo ""
Next
