logout.aspx.vb

与房地产相关的各项活动

'文件名:Logout.aspx.vb
Partial Class SystemManage_Logout
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        '关闭浏览器窗口
        Me.Button1.Attributes.Add("OnClick", "window.close();")
    End Sub
    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        '确定按钮
        FormsAuthentication.SignOut()
        Session("MyUserName") = ""
    End Sub

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        '取消按钮
        Server.Transfer("~/Default.aspx")
    End Sub
End Class