imports System
imports System.Web
imports System.Web.UI
imports System.Web.UI.WebControls

public class myLoginPage
	inherits page
		protected userName as TextBox
		protected password as TextBox
		protected loginButton as Button
		protected Message as label 

	public sub loginClicked (sender as Object, e as EventArgs)
	
		If userName.text="lle1999" and password.text="lucky1"  Then
			session("userName")="lle1999" 
			session("password")="lucky1"
			response.redirect("test2.aspx")
		Else
			Message.Text="Wrong password"
		end if
	end Sub	

end class