Contact Info

Crumbtrail » Administration » Scripts » WMI Performance Counters » VBScript

NetworkProtocol - WMI sample in VBScript

The foundations for Manageability in Windows 2019/2012/2008/ and Windows 10/8/7/Vista/XP are 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.

On this site, you can find many WMI samples.

The NetworkProtocol WMI class can be used in ActiveXperts Network Monitor to monitor your servers.



Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")

Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkProtocol")

For Each objItem in colItems
	WScript.Echo "Caption:" & objItem.Caption
	WScript.Echo "ConnectionlessService:" & objItem.ConnectionlessService
	WScript.Echo "Description:" & objItem.Description
	WScript.Echo "GuaranteesDelivery:" & objItem.GuaranteesDelivery
	WScript.Echo "GuaranteesSequencing:" & objItem.GuaranteesSequencing
	WScript.Echo "InstallDate:" & objItem.InstallDate
	WScript.Echo "MaximumAddressSize:" & objItem.MaximumAddressSize
	WScript.Echo "MaximumMessageSize:" & objItem.MaximumMessageSize
	WScript.Echo "MessageOriented:" & objItem.MessageOriented
	WScript.Echo "MinimumAddressSize:" & objItem.MinimumAddressSize
	WScript.Echo "Name:" & objItem.Name
	WScript.Echo "PseudoStreamOriented:" & objItem.PseudoStreamOriented
	WScript.Echo "Status:" & objItem.Status
	WScript.Echo "SupportsBroadcasting:" & objItem.SupportsBroadcasting
	WScript.Echo "SupportsConnectData:" & objItem.SupportsConnectData
	WScript.Echo "SupportsDisconnectData:" & objItem.SupportsDisconnectData
	WScript.Echo "SupportsEncryption:" & objItem.SupportsEncryption
	WScript.Echo "SupportsExpeditedData:" & objItem.SupportsExpeditedData
	WScript.Echo "SupportsFragmentation:" & objItem.SupportsFragmentation
	WScript.Echo "SupportsGracefulClosing:" & objItem.SupportsGracefulClosing
	WScript.Echo "SupportsGuaranteedBandwidth:" & objItem.SupportsGuaranteedBandwidth
	WScript.Echo "SupportsMulticasting:" & objItem.SupportsMulticasting
	WScript.Echo "SupportsQualityofService:" & objItem.SupportsQualityofService
	WScript.Echo ""
	WScript.Echo "########"
	WScript.Echo ""