Login sysrem driller

Koden bruges i vores forum, filenb hedder forum forum_login.asp

KODEN
------------------------------
<% sectionname="Log In" %>
<!-- #include file="../../include/ny_databaseopkald.inc" -->
<!-- #include file="../../include/adovbs.inc" -->
<!-- #include file="../../include/java.inc" -->
<!-- #include file="global.asa" -->
<!-- #include file="../../include/style.css" -->
<!-- #include file="global-header.inc" -->
    <%
    if request.QueryString("cookei") = "byebye" then
        Response.Cookies("user_id").Expires = Date
        session("user_id") = "0"
        Response.Write("Du er loget ud og cookie er blevet slettet!")
    end if
    %>
    <%
    if request.QueryString("func") = "login" then
       
        if request.form("user") = "" then
            Response.Write("Du har ikke udfyldt brugernavn")
        Else
        struser = Server.URLEncode(request.Form("user"))
        End if
       
        Set rs_login = Server.CreateObject("ADODB.RecordSet")
        rs_login.open "Select * From [forum_user] WHERE username = '" & struser & "'" , Conn_sites
       
        if rs_login("password") = request.form("pass") then
                session("user_id") = rs_login("id")
       
                If request.Form("husk") <> "" then
               
                username = request.Form("user")
                password = request.Form("pass")   
                    Response.Cookies("Glogin")("brugernavn") = username
                    Response.Cookies("Glogin")("password") = password
                    Response.Cookies("Glogin")("huskmig") = "yes"
                    Response.Cookies("Glogin").Expires = now + 365
                Else
                'Nothing
                End if
               
            if session("URL1") = "" or Request.Form("husk") = "on" then
                response.Redirect("forum.asp?cookie=" & Request.Form("husk") & "")
            Else
                response.Redirect(session("URL1"))
            End if   

        Else
            Response.Write("Bruger navn eller password, var ikke rigtigt<br><br><a href='forum_login.asp'>Prøv igen</a>")
        End if
    else
   
    huskmig = Request.Cookies("Glogin")("huskmig")
    if huskmig = "yes" then
        brugernavn = Request.Cookies("Glogin")("brugernavn")
        password = Request.Cookies("Glogin")("password")
    end if
    %>
<div style="background-color: #7DBAF7; width:100%; padding:10px; font-family:arial; font-size:18px;" class="greyheader"><b>Login</b></div>
<div style="padding:12px; border: 2px solid #7DBAF7; width:100%; font-family: verdana, arial, helvetica, san-serif; font-size:12px; line-height:17px;">
<form action="forum_login.asp?func=login" method="post">
<table width="100%" cellpadding="4" cellspacing="0" border="0">
<tr><td>Brugernavn:</td><td><input type="text" name="user" size="35" <% if huskmig = "yes" then Response.Write " value=""" & brugernavn & """" %>></td></tr>
<tr><td>Password:</td><td><input type="password" name="pass" size="35" <% if huskmig = "yes" then Response.Write " value=""" & password & """" %>></td></tr>
<tr><td><input type="submit" value="login"></td>
<td>Husk Mig  (Cookie)
  <input type="checkbox" name="husk" <% if huskmig = "yes" then Response.Write " CHECKED "%>></td></tr>
</table>
</form>
</div>
    <% end if %>

</TD>
<TD style="font-size:1px;" width="10" VALIGN="TOP">&nbsp;</TD>
<!-- HØJRESPALTE HERFRA -->

<!-- HØJRESPALTE HERFRA -->
<TD bgcolor="#ffffff" width="150" VALIGN="TOP">
<!-- #include file="global-alert.inc" -->
<!-- #include file="modules/spalte_forum.inc" -->
</TD>
<!-- LUK SIDEN MED FAST FOOTER -->

<!-- LUK SIDEN MED FAST FOOTER -->

<!-- #include file="global-footer.inc" -->


fejlen

error '80020009'
Exception occurred.

/indhold/forum_login.asp, line 27

---------------------------------------

Jeg er helt blank over for hvad der kan være problemmet, er det mellemrum eller specielle karaktere. Det er lidt kritisk over for vores brugere, så hurtige svar værdsættes