problem med ban systems script, 500 Server error

Hej,
Jeg har siddet og skrevet følgende script, det virker fint nok HVIS man er banlyst, hvis ikke modtager jeg bare en "HTTP 500 - Internal server error" nogen der ved hvordan det kan være?

<%
  userIP = (Request.ServerVariables("remote_addr")) 

  Set Conn = Server.CreateObject("ADODB.Connection")
  DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
  DSN = DSN & "DBQ=" & Server.MapPath ("../db/db.mdb")
  Conn.Open DSN
  strSQL = "SELECT * FROM ban WHERE banIP = '" & userIP & "'"
  Set rs = Conn.Execute(strSQL)

  if Not rs.EOF or rs.BOF then
    response.redirect "banned.asp?begrundelse=blablabla"
  end if
%>