IWMSIPList.Item (Visual Basic .NET)

Previous

Next

IWMSIPList.Item (Visual Basic .NET)

The Item property retrieves a specific IWMSIPEntry object from the IWMSIPList collection.

Syntax

  IWMSIPEntry = IWMSIPList.Item(varIndex)

Parameters

varIndex

[in] VARIANT containing the index of the IP entry to retrieve.

Property Value

An IWMSIPEntry object.

If this property fails, it throws an exception.

Number	Description
0x8002000B	The index contained in varIndex is not valid.

Remarks

This property is read-only.

Example Code

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

Private Sub GetItem()

    ' Declare variables.
    Dim Server As WMSServer
    Dim Plugin As IWMSPlugin
    Dim IPAdmin As IWMSIPAdmin
    Dim IPList As IWMSIPList
    Dim IPEntry As IWMSIPEntry
    Dim strIPAddress As String
    Dim strMask As String

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

    ' Retrieve the plug-in to be configured.
    Plugin = Server.EventHandlers.Item("WMS IP Address Authorization")

    ' Retrieve the custom interface of the plug-in.
    IPAdmin = Plugin.CustomInterface

    ' Retrieve the list of banned IP addresses.
    IPList = IPAdmin.DisallowIP

    ' Retrieve the information associated
    ' with each banned address.
    For i = 0 To IPList.Count - 1
        IPEntry = IPList.Item(i)
        strIPAddress = IPEntry.Address
        strMask = IPEntry.Mask
    Next i

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

• IWMSIPEntry Object (Visual Basic .NET)
• IWMSIPList Object (Visual Basic .NET)

Previous

Next