Redirector - 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 Redirector WMI class can be used in ActiveXperts Network Monitor to monitor your servers.

---

Redirector

Example(s)

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

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

For Each objItem in colItems
	WScript.Echo "BytesReceivedPersec:" & objItem.BytesReceivedPersec
	WScript.Echo "BytesTotalPersec:" & objItem.BytesTotalPersec
	WScript.Echo "BytesTransmittedPersec:" & objItem.BytesTransmittedPersec
	WScript.Echo "Caption:" & objItem.Caption
	WScript.Echo "ConnectsCore:" & objItem.ConnectsCore
	WScript.Echo "ConnectsLanManager20:" & objItem.ConnectsLanManager20
	WScript.Echo "ConnectsLanManager21:" & objItem.ConnectsLanManager21
	WScript.Echo "ConnectsWindowsNT:" & objItem.ConnectsWindowsNT
	WScript.Echo "CurrentCommands:" & objItem.CurrentCommands
	WScript.Echo "Description:" & objItem.Description
	WScript.Echo "FileDataOperationsPersec:" & objItem.FileDataOperationsPersec
	WScript.Echo "FileReadOperationsPersec:" & objItem.FileReadOperationsPersec
	WScript.Echo "FileWriteOperationsPersec:" & objItem.FileWriteOperationsPersec
	WScript.Echo "Frequency_Object:" & objItem.Frequency_Object
	WScript.Echo "Frequency_PerfTime:" & objItem.Frequency_PerfTime
	WScript.Echo "Frequency_Sys100NS:" & objItem.Frequency_Sys100NS
	WScript.Echo "Name:" & objItem.Name
	WScript.Echo "NetworkErrorsPersec:" & objItem.NetworkErrorsPersec
	WScript.Echo "PacketsPersec:" & objItem.PacketsPersec
	WScript.Echo "PacketsReceivedPersec:" & objItem.PacketsReceivedPersec
	WScript.Echo "PacketsTransmittedPersec:" & objItem.PacketsTransmittedPersec
	WScript.Echo "ReadBytesCachePersec:" & objItem.ReadBytesCachePersec
	WScript.Echo "ReadBytesNetworkPersec:" & objItem.ReadBytesNetworkPersec
	WScript.Echo "ReadBytesNonPagingPersec:" & objItem.ReadBytesNonPagingPersec
	WScript.Echo "ReadBytesPagingPersec:" & objItem.ReadBytesPagingPersec
	WScript.Echo "ReadOperationsRandomPersec:" & objItem.ReadOperationsRandomPersec
	WScript.Echo "ReadPacketsPersec:" & objItem.ReadPacketsPersec
	WScript.Echo "ReadPacketsSmallPersec:" & objItem.ReadPacketsSmallPersec
	WScript.Echo "ReadsDeniedPersec:" & objItem.ReadsDeniedPersec
	WScript.Echo "ReadsLargePersec:" & objItem.ReadsLargePersec
	WScript.Echo "ServerDisconnects:" & objItem.ServerDisconnects
	WScript.Echo "ServerReconnects:" & objItem.ServerReconnects
	WScript.Echo "ServerSessions:" & objItem.ServerSessions
	WScript.Echo "ServerSessionsHung:" & objItem.ServerSessionsHung
	WScript.Echo "Timestamp_Object:" & objItem.Timestamp_Object
	WScript.Echo "Timestamp_PerfTime:" & objItem.Timestamp_PerfTime
	WScript.Echo "Timestamp_Sys100NS:" & objItem.Timestamp_Sys100NS
	WScript.Echo "WriteBytesCachePersec:" & objItem.WriteBytesCachePersec
	WScript.Echo "WriteBytesNetworkPersec:" & objItem.WriteBytesNetworkPersec
	WScript.Echo "WriteBytesNonPagingPersec:" & objItem.WriteBytesNonPagingPersec
	WScript.Echo "WriteBytesPagingPersec:" & objItem.WriteBytesPagingPersec
	WScript.Echo "WriteOperationsRandomPersec:" & objItem.WriteOperationsRandomPersec
	WScript.Echo "WritePacketsPersec:" & objItem.WritePacketsPersec
	WScript.Echo "WritePacketsSmallPersec:" & objItem.WritePacketsSmallPersec
	WScript.Echo "WritesDeniedPersec:" & objItem.WritesDeniedPersec
	WScript.Echo "WritesLargePersec:" & objItem.WritesLargePersec
	WScript.Echo ""
	WScript.Echo "########"
	WScript.Echo ""
Next