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
Comments (
)
<00>
<01>
<02>
<03>
<04>
<05>
<06>
<07>
<08>
<09>
<10>
<11>
<12>
<13>
<14>
<15>
<16>
<17>
<18>
<19>
<20>
<21>
<22>
<23>
Link to this page:
//www.vb-net.com/asp2/35/9.htm
<SITEMAP> <MVC> <ASP> <NET> <DATA> <KIOSK> <FLEX> <SQL> <NOTES> <LINUX> <MONO> <FREEWARE> <DOCS> <ENG> <CHAT ME> <ABOUT ME> < THANKS ME> |