login

Function sqlreplace(streng)
            sqlreplace = Replace(streng,"'","''")
        End Function
       
        Function login(username,password)
            Set tjek = Conn.Execute("SELECT * FROM users WHERE brugernavn = '"& username &"' AND password = '"& password &"'")
            If tjek.EOF Then
                Response.Write "<font color='#ff000000'><b>Bruger ikke fundet</b></strong><p>"
            Else
                Session("brugerID") = tjek("userID")
            End If
        End Function

//>Rune

og hvordan får jeg det på mine sider så de går videre fra log in til fx chatten?

Function sqlreplace(streng)
            sqlreplace = Replace(streng,"'","''")
        End Function
       
        Function login(username,password)
            Set tjek = Conn.Execute("SELECT * FROM users WHERE brugernavn = '"& username &"' AND password = '"& password &"'")
            If tjek.EOF Then
                Response.Write "<font color='#ff000000'><b>Bruger ikke fundet</b></strong><p>"
            Else
                Session("brugerID") = tjek("userID")
                Response.Redirect("Chat.asp")
            End If
        End Function

//>Rune

Det kan jeg bare ikke få til at virke

lukket