5月 11, 2009

登入頁面的設定


Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load


        '判斷是否為不合法的URL連線 - 沒有以參數(Key)方式, 傳遞登入帳號
        '如:
http://~/管理專區/管理專區.aspx
        If Request.QueryString.HasKeys = False Then
            '沒有以參數(Key)方式, 傳遞登入帳號
            '自動導向CUTe WWW
            Response.Redirect("http://www")
        Else
            '以參數(Key)方式, 傳遞登入帳號
            '取得登入帳號
            Session("Manager_ID") = Request.QueryString("id").ToString()
            'Label1.Text = Session("Manager_ID")
            hf_Manager_ID.Value = Session("Manager_ID")


            '判斷是否為不合法的登入帳號連線 - 非管理者登入帳號(Key)
            '如:
http://~/管理專區/管理專區.aspx?id=XXXX
            If hf_Manager_ID.Value <> "02370" Then
                '自動導向 WWW
                Response.Redirect("http://www")
            End If
        End If


End Sub



登入該頁的pageload
需給一個HiddenField

沒有留言: