0

default.aspx に次のコードがあります

Label1.Text = Session("valueName").ToString()

そして、私のlogin.aspxの次のコード

Dim strCon As String = ConfigurationManager.ConnectionStrings("Goed").ConnectionString

    'Create Connection String And SQL Statement
    Dim strSelect As String = "SELECT COUNT(*) FROM tbl_LogIn WHERE Gebruiker = @Gebruiker AND Wachtwoord = @Wachtwoord"

    Dim con As New SqlConnection(strCon)
    Dim cmd As New SqlCommand()
    cmd.Connection = con
    cmd.CommandType = CommandType.Text
    cmd.CommandText = strSelect

    Dim Gebruiker As New SqlParameter("@Gebruiker", _
                                      SqlDbType.VarChar)
    Gebruiker.Value = TxtUs.Text.Trim().ToString()
    cmd.Parameters.Add(Gebruiker)

    Dim Wachtwoord As New SqlParameter("@Wachtwoord", _
                                       SqlDbType.VarChar)
    Wachtwoord.Value = TxtPw.Text.Trim().ToString()
    cmd.Parameters.Add(Wachtwoord)


    con.Open()

    Dim result As Integer = DirectCast(cmd.ExecuteScalar(), Int32)
    con.Close()

    If result >= 1 Then
        Response.Redirect("default.aspx")

        Session("valueName") = TxtUs.Text.ToString()


    Else
        lblMsg.Text = "Gebruikers naam en of wachtwoord kloppen niet"
    End If

End Sub

しかし、それは役に立たないようです。エラーなどは発生しませんが、何か考えはありますか?

4

2 に答える 2

2

Redirectメソッドは実行を終了するため、リダイレクトする前にセッション変数を設定する必要があります。

Session("valueName") = TxtUs.Text.ToString()
Response.Redirect("default.aspx")
于 2013-04-29T07:16:07.073 に答える
0

セッションを設定する前にリダイレクトしています。最初にセッションを設定してから、ページをリダイレクトする必要があります。

または

結果変数は 1 ではないか、1 より大きくありません。それも確認する必要があります

于 2013-04-29T07:19:07.353 に答える