918博天堂

Server : Microsoft-IIS/10.0
System : Windows NT EBS-6136 10.0 build 17763 (Windows Server 2016) i586
User : jxgj ( 0)
PHP Version : 7.0.33
Disable Function : passthru,exec,system,shell_exec,proc_open,popen,pcntl_exec,socket_bind,stream_socket_server
Directory : D:/tmp_aspnet/root/f4d99ea2/746fa38d/
Upload File :
Current File : D:/tmp_aspnet/root/f4d99ea2/746fa38d/App_Web_1pn_abca.0.vb
?#ExternalChecksum("D:\wwwroot\xcszxy\wwwroot\Default2.aspx","{406ea660-64cf-4c82-b6f0-42d48172a799}","966F0C6DCBC56626BA0FA4C7D18749A4")
'------------------------------------------------------------------------------
' <auto-generated>
'     此代码由工具天生。
'     运行时版本:2.0.50727.9055
'
'     对此文件的更改可能会导致不正确的行为，并且若是
'     沉新天生代码，这些更改将会迷失。
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict Off
Option Explicit On

Imports Microsoft.VisualBasic
Imports System
Imports System.Collections
Imports System.Collections.Specialized
Imports System.Configuration
Imports System.Text
Imports System.Text.RegularExpressions
Imports System.Web
Imports System.Web.Caching
Imports System.Web.Profile
Imports System.Web.Security
Imports System.Web.SessionState
Imports System.Web.UI
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts

Namespace ASP
    
    <System.Runtime.CompilerServices.CompilerGlobalScopeAttribute()>  _
    Public Class default2_aspx
        Inherits Global.Default2
        Implements System.Web.SessionState.IRequiresSessionState, System.Web.IHttpHandler
        
        Private Shared __initialized As Boolean
        
        Private Shared __fileDependencies As Object
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Dim dependencies() As String
            CType(Me,Global.Default2).AppRelativeVirtualPath = "~/Default2.aspx"
            If (Global.ASP.default2_aspx.__initialized = false) Then
                dependencies = New String(0) {}
                dependencies(0) = "~/Default2.aspx"
                Global.ASP.default2_aspx.__fileDependencies = Me.GetWrappedFileDependencies(dependencies)
                Global.ASP.default2_aspx.__initialized = true
            End If
            Me.Server.ScriptTimeout = 30000000
        End Sub
        
        Protected ReadOnly Property Profile() As System.Web.Profile.DefaultProfile
            Get
                Return CType(Me.Context.Profile,System.Web.Profile.DefaultProfile)
            End Get
        End Property
        
        Protected Overrides ReadOnly Property SupportAutoEvents() As Boolean
            Get
                Return false
            End Get
        End Property
        
        Protected ReadOnly Property ApplicationInstance() As System.Web.HttpApplication
            Get
                Return CType(Me.Context.ApplicationInstance,System.Web.HttpApplication)
            End Get
        End Property
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function __BuildControl__control3() As Global.System.Web.UI.HtmlControls.HtmlTitle
            Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlTitle
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",7)
            __ctrl = New Global.System.Web.UI.HtmlControls.HtmlTitle
            
            #End ExternalSource
            Return __ctrl
        End Function
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function __BuildControl__control2() As Global.System.Web.UI.HtmlControls.HtmlHead
            Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlHead
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",6)
            __ctrl = New Global.System.Web.UI.HtmlControls.HtmlHead("head")
            
            #End ExternalSource
            Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlTitle
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",6)
            __ctrl1 = Me.__BuildControl__control3
            
            #End ExternalSource
            Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",6)
            __parser.AddParsedSubObject(__ctrl1)
            
            #End ExternalSource
            Return __ctrl
        End Function
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function __BuildControlTextBox55() As Global.System.Web.UI.WebControls.TextBox
            Dim __ctrl As Global.System.Web.UI.WebControls.TextBox
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",13)
            __ctrl = New Global.System.Web.UI.WebControls.TextBox
            
            #End ExternalSource
            Me.TextBox55 = __ctrl
            __ctrl.ApplyStyleSheetSkin(Me)
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",13)
            __ctrl.ID = "TextBox55"
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",13)
            __ctrl.AutoPostBack = true
            
            #End ExternalSource
            Return __ctrl
        End Function
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function __BuildControlLabel1() As Global.System.Web.UI.WebControls.Label
            Dim __ctrl As Global.System.Web.UI.WebControls.Label
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",16)
            __ctrl = New Global.System.Web.UI.WebControls.Label
            
            #End ExternalSource
            Me.Label1 = __ctrl
            __ctrl.ApplyStyleSheetSkin(Me)
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",16)
            __ctrl.ID = "Label1"
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",16)
            __ctrl.Text = "Label"
            
            #End ExternalSource
            Return __ctrl
        End Function
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function __BuildControlform1() As Global.System.Web.UI.HtmlControls.HtmlForm
            Dim __ctrl As Global.System.Web.UI.HtmlControls.HtmlForm
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __ctrl = New Global.System.Web.UI.HtmlControls.HtmlForm
            
            #End ExternalSource
            Me.form1 = __ctrl
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __ctrl.ID = "form1"
            
            #End ExternalSource
            Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"    <div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"    "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"        "))
            
            #End ExternalSource
            Dim __ctrl1 As Global.System.Web.UI.WebControls.TextBox
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __ctrl1 = Me.__BuildControlTextBox55
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __parser.AddParsedSubObject(__ctrl1)
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"    "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"    </div>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"    "))
            
            #End ExternalSource
            Dim __ctrl2 As Global.System.Web.UI.WebControls.Label
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __ctrl2 = Me.__BuildControlLabel1
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __parser.AddParsedSubObject(__ctrl2)
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",10)
            __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"    "))
            
            #End ExternalSource
            Return __ctrl
        End Function
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub __BuildControlTree(ByVal __ctrl As default2_aspx)
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            Me.InitializeCulture
            
            #End ExternalSource
            Dim __parser As System.Web.UI.IParserAccessor = CType(__ctrl,System.Web.UI.IParserAccessor)
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<!DOCTYPE html PUBLIC ""-//W3C//DTD XHTML 1.0 Transitional//EN"" ""http://www.w3"& _ 
                        ".org/TR/xhtml1/DTD/xhtml1-transitional.dtd"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<html xmlns=""http://www.w3.org/1"& _ 
                        "999/xhtml"">"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
            
            #End ExternalSource
            Dim __ctrl1 As Global.System.Web.UI.HtmlControls.HtmlHead
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            __ctrl1 = Me.__BuildControl__control2
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            __parser.AddParsedSubObject(__ctrl1)
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"<body>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"    "))
            
            #End ExternalSource
            Dim __ctrl2 As Global.System.Web.UI.HtmlControls.HtmlForm
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            __ctrl2 = Me.__BuildControlform1
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            __parser.AddParsedSubObject(__ctrl2)
            
            #End ExternalSource
            
            #ExternalSource("D:\wwwroot\xcszxy\wwwroot\Default2.aspx",1)
            __parser.AddParsedSubObject(New System.Web.UI.LiteralControl(""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</body>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"</html>"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)))
            
            #End ExternalSource
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub FrameworkInitialize()
            MyBase.FrameworkInitialize
            Me.__BuildControlTree(Me)
            Me.AddWrappedFileDependencies(Global.ASP.default2_aspx.__fileDependencies)
            Me.Request.ValidateInput
        End Sub
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function GetTypeHashCode() As Integer
            Return -1027893932
        End Function
        
        <System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Sub ProcessRequest(ByVal context As System.Web.HttpContext)
            MyBase.ProcessRequest(context)
        End Sub
    End Class
End Namespace