IWMSBroadcastPublishingPoint.SharedPlaylist (Visual Basic .NET)

banner art

Previous Next

IWMSBroadcastPublishingPoint.SharedPlaylist (Visual Basic .NET)

The SharedPlaylist property retrieves an IWMSPlaylist object for the broadcast publishing point.

Syntax

  IWMSPlaylist = IWMSBroadcastPublishingPoint.SharedPlaylist

Property Value

An IWMSPlaylist object.

If this property fails, it returns an error number.

Number Description
0xC00D145AL The publishing point has already been removed.

Remarks

This property is read-only. You must call IWMSBroadcastPublishingPoint.Start before calling the SharedPlaylist property. The broadcast publishing point path (returned by the IWMSPublishingPoint.Path property) must point to a playlist file.

Example Code

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

Private Sub GetPlaylist()

    ' Declare variables.
    Dim Server As WMSServer
    Dim PubPoints As IWMSPublishingPoints
    Dim PubPoint As IWMSPublishingPoint
    Dim BCPubPoint As IWMSBroadcastPublishingPoint
    Dim Playlist As IWMSPlaylist
    Dim ppsStatus As WMS_BROADCAST_PUBLISHING_POINT_STATUS
    Dim i As Integer

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

    ' Retrieve the IWMSPublishingPoints object.
    PubPoints = Server.PublishingPoints

    ' Retrieve each publishing point and retrieve the
    ' IWMSBroadcastPublishingPoint object.
    For i = 0 To Server.PublishingPoints.Count – 1

        PubPoint = PubPoints.Item(i)
        If PubPoint.Type = WMS_PUBLISHING_POINT_TYPE.WMS_PUBLISHING_POINT_TYPE_BROADCAST Then
            BCPubPoint = PubPoint
            Exit For
        End If
    Next i

    ' Retrieve the current status of the publishing point.
    ' The status is reported as the result of a bitwise OR
    ' of any of the designated values.
    ppsStatus = BCPubPoint.BroadcastStatus

    ' If the publishing point is currently stopped, start
    ' it and retrieve the shared playlist file.
    If ppsStatus = WMS_BROADCAST_PUBLISHING_POINT_STATUS.WMS_BROADCAST_PUBLISHING_POINT_STOPPED Then
        BCPubPoint.Start()
        Playlist = BCPubPoint.SharedPlaylist
    End If

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.

See Also

Previous Next