Page Template Framework for ASP.NET 1.1

Imports System
Imports System.Collections
Imports System.Xml.Serialization

Namespace Config

    ' Represents the Page Templates available within the PageConfig
    <XmlRoot("PageTemplates")> _
    Public Class PageTemplateCollection
        Inherits System.Collections.CollectionBase

        ' Indexer that will return the PageTemplate at the specified index
        <XmlArrayItem("PageTemplate")> _
        Default Public Property Item(ByVal index As Int32) As PageTemplate

            Get

                ' Return the PageTemplate from the internal IList at the specified index
                Return CType(Me.List.Item(index), PageTemplate)

            End Get

            Set(ByVal Value As PageTemplate)

                ' Store the specified Page in the internal IList
                Me.List.Item(index) = Value

            End Set

        End Property


        ' Method that will Add a PageTemplate to the PageTemplateCollection
        ' @page: The PageTemplate to add to the PageTemplateCollection
        Public Sub Add(ByVal pageTemplate As PageTemplate)

            ' Add the specified PageTemplate to the internal IList
            Me.List.Add(pageTemplate)

        End Sub

        ' Method that will insert the specified PageTemplate to the 
        ' PageTemplateCollection at the specified index
        ' @index: The index at which to PageTemplate should be inserted
        ' @page: The PageTemplate to insert into the PageTemplateCollection
        Public Sub Insert(ByVal index As Int32, ByVal pageTemplate As PageTemplate)

            ' Insert the specified PageTemplate to the internal IList
            Me.List.Insert(index, pageTemplate)

        End Sub

        ' Method that will remove the specified PageTemplate from the PageTemplateCollection
        ' @page: The PageTemplate to be removed from the PageTemplateCollection
        Public Sub Remove(ByVal pageTemplate As PageTemplate)

            ' Remove the PageTemplate from the internal IList
            Me.List.Remove(pageTemplate)

        End Sub

        ' Method that will return the index of the specified PageTemplate
        ' in the PageTemplateCollection
        ' @page: The PageTemplate whose index is being requested
        ' returns: The index of the specified PageTemplat in the PageTemplateCollection
        Public Function IndexOf(ByVal pageTemplate As PageTemplate) As Int32

            ' Obtain the index of the PageTemplate from the interal IList
            Return Me.List.IndexOf(pageTemplate)

        End Function

        ' Method that will determine if the specified PageTemplate exists in 
        ' the PageTemplateCollection
        ' @page: The PageTemplate to be located
        ' returns: A boolean value indicated whether or not the PageTemplateCollection 
        ' contains the specified PageTemplate
        Public Function Contains(ByVal pageTemplate As PageTemplate) As Boolean

            ' Check to see if the PageTemplate exists in the internal IList
            Return Me.List.Contains(pageTemplate)

        End Function

    End Class

End Namespace