Переменные сеанса ASP.net контроль входа в систему aspnetdb

Question

Привет люди, я пытаюсь нести переменную сеанса для моего контроля входа в систему, который я использую, чтобы передать, чтобы перейти на другую страницу и отобразить их детали. Я использую aspNetDB. Моему имени пользователя было присвоено целое число, так как оно связано с другой таблицей базы данных, отображающей информацию о пользователях ниже, это мой код:

    Protected Sub Login1_LoggingIn(sender As Object, e As System.Web.UI.WebControls.LoginCancelEventArgs) Handles Login1.LoggingIn

            Session("StaffNo") = Login1.UserName()

        End Sub

Затем код отправляется на мою другую страницу, чтобы отобразить их данные при загрузке в сетку данных, но, похоже, сеанс не переносит:

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        Try
            Dim Staff As String = CType(Session.Item("StaffNo"), String)
            Dim conn As SqlConnection
            Dim cmd As SqlCommand

            Dim cmdstring As String = "SELECT * FROM [User] WHERE studentnum = @StaffNo"
            conn = New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Database.mdf;Integrated Security=True;User Instance=True")
            cmd = New SqlCommand(cmdstring, conn)

            cmd.Parameters.Add("@StaffNo", SqlDbType.Char).Value = Staff
            conn.Open()

            Dim myReader As SqlDataReader

            myReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)


            GridView1.DataSource = myReader
            GridView1.DataBind()

            conn.Close()
        Catch ex As Exception
            Response.Write("An error has occurred")
        End Try

    End Sub

Answer 1

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
    Try  
Dim cmdstring As String = "SELECT * FROM [User] WHERE studentnum = '"& Session("StaffNo").ToString & "' "

End Sub