IWMSPublishingPointPeakCounters.AllCounters (Visual Basic .NET)

The AllCounters property retrieves an array that contains all of the counters that are supported by the object.

Variant = IWMSPublishingPointPeakCounters.AllCounters

Property Value

A Variant array containing the counters.

Remarks

This property is read-only. The array is two-dimensional. The first element in each row contains the name of the counter property, and the second element in each row contains the value. The AllCounters property is used to speed up counter retrieval during remote administration, by making one call instead of multiple calls to retrieve multiple counter properties.

The properties returned by the array are shown in the following table.

Property	Description
ConnectedPlayers	Retrieves the maximum number of players that have been connected to the publishing point simultaneously.
OutgoingDistributionAllocatedBandwidth	Retrieves the maximum bandwidth that has been allocated to a distribution connection.
OutgoingDistributionConnections	Retrieves the maximum number of distribution connections permitted.
PlayerAllocatedBandwidth	Retrieves the maximum bandwidth that has been allocated to player connections.
StreamingPlayers	Retrieves the maximum number of players that have streamed content simultaneously from the publishing point.
StreamingHTTPPlayers	Retrieves the maximum number of players that have streamed content simultaneously by using the HTTP protocol from the publishing point.
StreamingRTSPPlayers	Retrieves the maximum number of players that have streamed content simultaneously by using the RTSP protocol from the publishing point.
StreamingUDPPlayers	Retrieves the maximum number of players that have streamed content simultaneously by using the User Datagram Protocol (UDP) from the publishing point.

Example

Imports Microsoft.WindowsMediaServices.Interop
Imports System.Runtime.InteropServices

Private Sub GetCounterArray()

    ' Declare variables.
    Dim Server As WMSServer
    Dim PubPoints As IWMSPublishingPoints
    Dim PubPoint As IWMSPublishingPoint
    Dim PeakCounters As IWMSPublishingPointPeakCounters
    Dim aAllCounters As Object
    Dim varValue As Object

Try
    ' Create the WMSServer object.
    Server = New WMSServer()

    ' Retrieve the IWMSPublishingPoints object.
    PubPoints = Server.PublishingPoints

    ' Retrieve information about each publishing point.
    For Each PubPoint In PubPoints

        ' Retrieve a list of peak statistics
        ' for the publishing point.
        PeakCounters = PubPoint.PeakCounters

        ' Retrieve an array of all the counters in this object.
        aAllCounters = PeakCounters.AllCounters

        ' Process each array element.
        Dim j As Integer, k As Integer
        For j = LBound(aAllCounters) To UBound(aAllCounters)

            For k = LBound(aAllCounters, 2) To UBound(aAllCounters, 2)

                varValue = aAllCounters(j, k)

                If TypeName(varValue) = "String" Then
                    ' TODO: Handle counter names.
               End If

                If TypeName(varValue) = "Integer" Then
                    ' TODO: Handle counter values.
               End If

            Next k

        Next j

    Next

Catch excCom As COMException
    ' TODO: Handle COM exceptions.
Catch exc As Exception
    ' TODO: Handle errors.
Finally
    ' TODO: Clean-up code goes here.
End Try

End Sub

Requirements

Reference: Add a reference to Microsoft.WindowsMediaServices.

Namespace: Microsoft.WindowsMediaServices.Interop.

Assembly: Microsoft.WindowsMediaServices.dll.

Library: WMSServerTypeLib.dll.

Platform: Windows Server 2003 family, Windows Server 2008 family.

Note

   Some counters are not available in the Windows Server 2003 family.

See Also

Reference

IWMSPublishingPointPeakCounters Object (Visual Basic .NET)