Initial project's source code check-in.

2011-07-13 16:07:32 -07:00 · 2011-07-13 16:07:32 -07:00 · b03b0b373f
commit b03b0b373f
4573 changed files with 981205 additions and 0 deletions
--- a/WebsitePanel/Sources/WebsitePanel.Providers.Mail.ArgoMail/ArgoMailListItem.vb
+++ b/WebsitePanel/Sources/WebsitePanel.Providers.Mail.ArgoMail/ArgoMailListItem.vb
@ -0,0 +1,165 @@
+' Copyright (c) 2011, Outercurve Foundation.
+' All rights reserved.
+'
+' Redistribution and use in source and binary forms, with or without modification,
+' are permitted provided that the following conditions are met:
+'
+' - Redistributions of source code must  retain  the  above copyright notice, this
+'   list of conditions and the following disclaimer.
+'
+' - Redistributions in binary form  must  reproduce the  above  copyright  notice,
+'   this list of conditions  and  the  following  disclaimer in  the documentation
+'   and/or other materials provided with the distribution.
+'
+' - Neither  the  name  of  the  Outercurve Foundation  nor   the   names  of  its
+'   contributors may be used to endorse or  promote  products  derived  from  this
+'   software without specific prior written permission.
+'
+' THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
+' ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,  BUT  NOT  LIMITED TO, THE IMPLIED
+' WARRANTIES  OF  MERCHANTABILITY   AND  FITNESS  FOR  A  PARTICULAR  PURPOSE  ARE
+' DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR
+' ANY DIRECT, INDIRECT, INCIDENTAL,  SPECIAL,  EXEMPLARY, OR CONSEQUENTIAL DAMAGES
+' (INCLUDING, BUT NOT LIMITED TO,  PROCUREMENT  OF  SUBSTITUTE  GOODS OR SERVICES;
+' LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)  HOWEVER  CAUSED AND ON
+' ANY  THEORY  OF  LIABILITY,  WHETHER  IN  CONTRACT,  STRICT  LIABILITY,  OR TORT
+' (INCLUDING NEGLIGENCE OR OTHERWISE)  ARISING  IN  ANY WAY OUT OF THE USE OF THIS
+' SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+
+Friend Class ArgoMailListItem
+    Private _Id As String
+    Private _listItemName As String
+    Private _Account As String
+    Private _iDescriptionLines As Integer
+    Private _desription As String
+    Private _iMembersCount As Integer
+    Private _members() As String
+    Private _bListISClosed As Boolean
+    Private _bRepliesGoToSender As Boolean
+    Private _bRequireMemberShip As Boolean
+    Private _diskSpace As Long
+
+
+    Public Sub New()
+    End Sub 'New
+
+    Public Property ID() As String
+        Get
+            Return _Id
+        End Get
+
+        Set(ByVal value As String)
+            _Id = Value
+        End Set
+    End Property
+
+
+    Public Property Name() As String
+        Get
+            Return _listItemName
+        End Get
+
+        Set(ByVal value As String)
+            _listItemName = value
+        End Set
+    End Property
+
+
+    Public Property Account() As String
+        Get
+            Return _Account
+        End Get
+
+        Set(ByVal value As String)
+            _Account = Value
+        End Set
+    End Property
+
+
+    Public Property DescriptionLines() As Integer
+        Get
+            Return _iDescriptionLines
+        End Get
+
+        Set(ByVal value As Integer)
+            _iDescriptionLines = Value
+        End Set
+    End Property
+
+
+    Public Property Desription() As String
+        Get
+            Return _desription
+        End Get
+
+        Set(ByVal value As String)
+            _desription = Value
+        End Set
+    End Property
+
+
+    Public Property Count() As Integer
+        Get
+            Return _iMembersCount
+        End Get
+
+        Set(ByVal value As Integer)
+            _iMembersCount = Value
+        End Set
+    End Property
+
+
+    Public Property Members() As String()
+        Get
+            Return _members
+        End Get
+
+        Set(ByVal value As String())
+            _members = Value
+        End Set
+    End Property
+
+
+    Public Property ListISClosed() As Boolean
+        Get
+            Return _bListISClosed
+        End Get
+
+        Set(ByVal value As Boolean)
+            _bListISClosed = Value
+        End Set
+    End Property
+
+
+    Public Property RepliesGoToSender() As Boolean
+        Get
+            Return _bRepliesGoToSender
+        End Get
+
+        Set(ByVal value As Boolean)
+            _bRepliesGoToSender = Value
+        End Set
+    End Property
+
+
+    Public Property RequireMemberShip() As Boolean
+        Get
+            Return _bRequireMemberShip
+        End Get
+
+        Set(ByVal value As Boolean)
+            _bRequireMemberShip = Value
+        End Set
+    End Property
+
+
+    Public Property DiskSpace() As Long
+        Get
+            Return _diskSpace
+        End Get
+        Set(ByVal value As Long)
+            _diskSpace = Value
+        End Set
+    End Property
+End Class 'ArgoMailListItem