login.aspx.vb

来自「用flash做的网页上传工具」· VB 代码 · 共 11 行

Partial Class Login
    Inherits System.Web.UI.Page

	Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLogin.Click
		If FormsAuthentication.Authenticate(Me.txtUserName.Text, Me.txtPassword.Text) Then
			FormsAuthentication.RedirectFromLoginPage(Me.txtUserName.Text, True)
		End If
	End Sub
End Class