Intern serverfejl?

Kan ikke finde den... får intern serverfejl, når jeg trykker ok - og den kalder nytindlag.asp?login=ja - nogen der har en ide?

<%
dim login
login = Request.Querystring("login")

if login = "ja" then
%>
<!-- Session -->
<%
    dim bruger, password
    bruger = request.form("brugernavn")
    password = request.form("adgangskode")
   
    strSQL1 = "SELECT * FROM forummedlemmer WHERE (brugernavn = '" & bruger & "')"
    Set rs = Conn.Execute(strSQL1)
    if rs.eof then
    response.write "Du er ikke oprettet som bruger!"

    else
    Do
    passwordcheck = rs("password")
    brugercheck = rs("brugernavn")

    end if


   
    if password = passwordcheck AND bruger = brugercheck then
        session.contents("login") = 1
        session.contents("logintidspunkt") = now
        response.redirect "skrivindlag.asp"
    else
        session.contents("login") = 0
        response.redirect "skrivindlag.asp"
    end if
%>
<%
elseif login = "nej" then
%>
<!-- Fejl -->
Du er ikke oprettet som bruger - eller dine login dataer var forkerte.
<%
else login = ""
end if
%>