Untitled

Imports SqlToolBox

Public Class RSSFEEDS

#Region "Private Local Fields"
    Private _RSSID As Integer
    Private _URL As String
    Private _Name As String
    Private _isNew As Boolean
#End Region

#Region "Constructors"
    Public Sub New()
        Me._isNew = True
    End Sub

    Public Sub New(ByVal RSSID)

    End Sub
#End Region

#Region "Public Properties"

    Public Property RSSID() As String
        Get
            Return Me._RSSID
        End Get
        Set(ByVal value As String)
            Me._RSSID = value
        End Set
    End Property

    Public Property URL() As String
        Get
            Return Me._URL
        End Get
        Set(ByVal value As String)
            Me._URL = value
        End Set
    End Property

    Public Property Name() As String
        Get
            Return Me._Name
        End Get
        Set(ByVal value As String)
            Me._Name = value
        End Set
    End Property

#End Region

End Class