Fejl Hvor ?

Her er program koden:

<%
    strConn = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("adgangskontrol.mdb")

    Set objRS = Server.CreateObject("ADODB.RecordSet")
   

    strQ = "SELECT * FROM Adgangskoder WHERE (Password='" & Request.Form("pw") & "')" & _
            " AND (Username = '" & Request.Form("login") & "');"
    IF Username = "erikdenrøde" THEN
    response.redirect(href="http://www.side.dk")
    ELSE IF Username = "bush" THEN
    response.redirect(href="http://www.whitehouse.gov")
    END IF
        objRS.Open strQ, strConn
   
    If objRS.EOF Then
   
    Response.Redirect("login.asp?valg=fejl")


Else   

    Session("Adgang") = "Godkendt"

    Response.Cookies("oplysninger")("Username")=objRS("Username")
    Response.Cookies("oplysninger")("Password")=objRS("Password")
    Response.Cookies("oplysninger")("RealName")=objRS("RealName")

    Response.Redirect("godkendt.asp")
    End If

    objRS.Close
    Set objRS = Nothing
%>

Det den skal er at først tjekke om login og pass er korrekt hvis det er saa skal en bruger sendes hen til sin helt egen side og hvis det er forkert skal personen sendes tilbage med en fejlmed. men den kommer bare men en fejl i en og eller anden linie men jeg kan ik se at de r noget galt......

ja jeg er n00b og hvad saa ; )