${res:Templates.Project.WebPage.Name}VBASP.NETVB.Project.WebProject${res:Templates.Project.WebPage.Description}v2.0Library{349c5851-65df-11da-9384-00065b846f21};{fae04ec0-301f-11d3-bf4b-00c04f79efbc}bin\bin\
''' Description of Default.
'''
Public Class [Default]
Inherits Page
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "Data"
Protected _Button_Ok As HtmlInputButton
Protected _Input_Name As HtmlInputText
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "Page Init & Exit (Open/Close DB connections here...)"
Protected Sub PageInit(sender As Object, e As EventArgs)
End Sub
'----------------------------------------------------------------------
Protected Sub PageExit(sender As Object, e As EventArgs)
End Sub
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "Page Load"
Private Sub Page_Load(sender As Object, e As EventArgs)
Response.Write("Hello #Develop ")
'------------------------------------------------------------------
If IsPostBack Then
End If
'------------------------------------------------------------------
End Sub
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "Click_Button_OK"
'----------------------------------------------------------------------
Protected Sub Click_Button_Ok(sender As Object, e As EventArgs)
Response.Write(_Button_Ok.Value & " was cklicked! ")
End Sub
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "Changed_Input_Name"
'----------------------------------------------------------------------
Protected Sub Changed_Input_Name(sender As Object, e As EventArgs)
Response.Write(_Input_Name.Value & " has changed! ")
End Sub
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "More..."
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "Initialize Component"
Protected Overrides Sub OnInit(e As EventArgs)
InitializeComponent()
MyBase.OnInit(e)
End Sub
'----------------------------------------------------------------------
Private Sub InitializeComponent()
AddHandler Me.Load, New System.EventHandler(AddressOf Page_Load)
AddHandler Me.Init, New System.EventHandler(AddressOf PageInit)
AddHandler Me.Unload, New System.EventHandler(AddressOf PageExit)
AddHandler _Button_Ok.ServerClick, New EventHandler(AddressOf Click_Button_Ok)
AddHandler _Input_Name.ServerChange, New EventHandler(AddressOf Changed_Input_Name)
End Sub
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
End Class
]]>
]]>
''' Summary description for Global.
'''
Public Class [Global]
Inherits HttpApplication
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
#Region "global"
'''
''' Required designer variable.
'''
'Private components As System.ComponentModel.IContainer = Nothing
Public Sub New()
InitializeComponent()
End Sub
#End Region
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Protected Sub Application_Start(sender As Object, e As EventArgs)
End Sub
Protected Sub Session_Start(sender As Object, e As EventArgs)
End Sub
Protected Sub Application_BeginRequest(sender As Object, e As EventArgs)
End Sub
Protected Sub Application_EndRequest(sender As Object, e As EventArgs)
End Sub
Protected Sub Application_AuthenticateRequest(sender As Object, e As EventArgs)
End Sub
Protected Sub Application_Error(sender As Object, e As EventArgs)
End Sub
Protected Sub Session_End(sender As Object, e As EventArgs)
End Sub
Protected Sub Application_End(sender As Object, e As EventArgs)
End Sub
#Region "Web Form Designer generated code"
'''
''' Required method for Designer support - do not modify
''' the contents of this method with the code editor.
'''
Private Sub InitializeComponent()
End Sub
#End Region
End Class
]]>${ProjectName}
]]>
]]>