contact@activexperts.com +31748507807

ActiveXperts.com » Administration » Scripts » WMI » vbscript sample

Win32_PerfRawData_MSSQLSQLEXPRESS_MSSQLSQLEXPRESSBrokerDBMTransport vbscript sample code | ActiveXperts Network Monitor

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

Sample Code

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_PerfRawData_MSSQLSQLEXPRESS_MSSQLSQLEXPRESSBrokerDBMTransport",,48)
For Each objItem in colItems
    Wscript.Echo "Caption: " & objItem.Caption
    Wscript.Echo "CurrentBytesforRecvIO: " & objItem.CurrentBytesforRecvIO
    Wscript.Echo "CurrentBytesforSendIO: " & objItem.CurrentBytesforSendIO
    Wscript.Echo "CurrentMsgFragsforSendIO: " & objItem.CurrentMsgFragsforSendIO
    Wscript.Echo "Description: " & objItem.Description
    Wscript.Echo "Frequency_Object: " & objItem.Frequency_Object
    Wscript.Echo "Frequency_PerfTime: " & objItem.Frequency_PerfTime
    Wscript.Echo "Frequency_Sys100NS: " & objItem.Frequency_Sys100NS
    Wscript.Echo "MessageFragmentP10SendsPersec: " & objItem.MessageFragmentP10SendsPersec
    Wscript.Echo "MessageFragmentP1SendsPersec: " & objItem.MessageFragmentP1SendsPersec
    Wscript.Echo "MessageFragmentP2SendsPersec: " & objItem.MessageFragmentP2SendsPersec
    Wscript.Echo "MessageFragmentP3SendsPersec: " & objItem.MessageFragmentP3SendsPersec
    Wscript.Echo "MessageFragmentP4SendsPersec: " & objItem.MessageFragmentP4SendsPersec
    Wscript.Echo "MessageFragmentP5SendsPersec: " & objItem.MessageFragmentP5SendsPersec
    Wscript.Echo "MessageFragmentP6SendsPersec: " & objItem.MessageFragmentP6SendsPersec
    Wscript.Echo "MessageFragmentP7SendsPersec: " & objItem.MessageFragmentP7SendsPersec
    Wscript.Echo "MessageFragmentP8SendsPersec: " & objItem.MessageFragmentP8SendsPersec
    Wscript.Echo "MessageFragmentP9SendsPersec: " & objItem.MessageFragmentP9SendsPersec
    Wscript.Echo "MessageFragmentReceivesPersec: " & objItem.MessageFragmentReceivesPersec
    Wscript.Echo "MessageFragmentSendsPersec: " & objItem.MessageFragmentSendsPersec
    Wscript.Echo "MsgFragmentRecvSizeAvg: " & objItem.MsgFragmentRecvSizeAvg
    Wscript.Echo "MsgFragmentRecvSizeAvg_Base: " & objItem.MsgFragmentRecvSizeAvg_Base
    Wscript.Echo "MsgFragmentSendSizeAvg: " & objItem.MsgFragmentSendSizeAvg
    Wscript.Echo "MsgFragmentSendSizeAvg_Base: " & objItem.MsgFragmentSendSizeAvg_Base
    Wscript.Echo "Name: " & objItem.Name
    Wscript.Echo "OpenConnectionCount: " & objItem.OpenConnectionCount
    Wscript.Echo "PendingBytesforRecvIO: " & objItem.PendingBytesforRecvIO
    Wscript.Echo "PendingBytesforSendIO: " & objItem.PendingBytesforSendIO
    Wscript.Echo "PendingMsgFragsforRecvIO: " & objItem.PendingMsgFragsforRecvIO
    Wscript.Echo "PendingMsgFragsforSendIO: " & objItem.PendingMsgFragsforSendIO
    Wscript.Echo "ReceiveIObytesPersec: " & objItem.ReceiveIObytesPersec
    Wscript.Echo "ReceiveIOLenAvg: " & objItem.ReceiveIOLenAvg
    Wscript.Echo "ReceiveIOLenAvg_Base: " & objItem.ReceiveIOLenAvg_Base
    Wscript.Echo "ReceiveIPerOsPersec: " & objItem.ReceiveIPerOsPersec
    Wscript.Echo "RecvIOBufferCopiesbytesPersec: " & objItem.RecvIOBufferCopiesbytesPersec
    Wscript.Echo "RecvIOBufferCopiesCount: " & objItem.RecvIOBufferCopiesCount
    Wscript.Echo "SendIObytesPersec: " & objItem.SendIObytesPersec
    Wscript.Echo "SendIOLenAvg: " & objItem.SendIOLenAvg
    Wscript.Echo "SendIOLenAvg_Base: " & objItem.SendIOLenAvg_Base
    Wscript.Echo "SendIPerOsPersec: " & objItem.SendIPerOsPersec
    Wscript.Echo "Timestamp_Object: " & objItem.Timestamp_Object
    Wscript.Echo "Timestamp_PerfTime: " & objItem.Timestamp_PerfTime
    Wscript.Echo "Timestamp_Sys100NS: " & objItem.Timestamp_Sys100NS
Next
M