Partial Class Shop02
    Inherits System.Web.UI.Page

    Protected Sub Button1_Click(sender As Object, e As System.EventArgs)
        If Session("account") = "" Then
            Response.Redirect("ShopLogin.aspx")
        Else
            Response.Redirect("Shop03.aspx")
        End If
    End Sub

    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        Session("PNO") = Request.QueryString("PNO")
        'Response.Write(Session("PNO"))
    End Sub

End Class