00001: '------------------------------------------------------------------------------
00002: ' <auto-generated>
00003: ' Этот код создан программой.
00004: ' Исполняемая версия:2.0.50727.1433
00005: '
00006: ' Изменения в этом файле могут привести к неправильной работе и будут потеряны в случае
00007: ' повторной генерации кода.
00008: ' </auto-generated>
00009: '------------------------------------------------------------------------------
00010:
00011: Option Strict Off
00012: Option Explicit On
00013:
00014: Imports System
00015: Imports System.Web
00016: Imports System.Web.Profile
00017:
00018:
00019: Public Class ProfileCommon
00020: Inherits System.Web.Profile.ProfileBase
00021:
00022: Public Overridable Property MailAddToBan() As Boolean
00023: Get
00024: Return CType(Me.GetPropertyValue("MailAddToBan"),Boolean)
00025: End Get
00026: Set
00027: Me.SetPropertyValue("MailAddToBan", value)
00028: End Set
00029: End Property
00030:
.....
00301: Public Overridable Property usGrowth() As String
00302: Get
00303: Return CType(Me.GetPropertyValue("usGrowth"),String)
00304: End Get
00305: Set
00306: Me.SetPropertyValue("usGrowth", value)
00307: End Set
00308: End Property
00309:
00310: Public Overridable Function GetProfile(ByVal username As String) As ProfileCommon
00311: Return CType(ProfileBase.Create(username),ProfileCommon)
00312: End Function
00313: End Class
