Uspeciferet FEJL!

Hej Hvad er der galt her???

Det er en søgemaskine der kigger i Access!
Jeg får en uspeciferet fejl!!!



<% Response.Buffer = True %>
<%
\' Henter værdien fra soeg.htm
strKeyword = Trim(Request.Form(\"Keyword\"))

If Len(strKeyword) = 0 Then
    \' Hvis der ikke er skrevet i feltet
    Response.Clear
    Response.Redirect(\"frontpage.asp\")
Else
    \' Hvis der er skrevet i feltet
    strKeyword = Replace(strKeyword,\"\'\",\"\'\'\")
End If

\' Opbygger en dynamisk SQL streng
strSQL = \"SELECT id, Navn, URL, Soegeord, Beskrivelse FROM soeg WHERE\"
strSQL = strSQL & \" (Navn LIKE \'%\" & strKeyword & \"%\')\"
strSQL = strSQL & \" OR (Soegeord LIKE \'%\" & strKeyword & \"%\')\"
strSQL = strSQL & \" OR (Beskrivelse LIKE \'%\" & strKeyword & \"%\')\"

\' Skaber DSNLess forbindelse til DBen
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"../db/visitme_soeg.mdb\")
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open strDSN

\' Skaber et recordset udfra SQL strengen
Set rs = myConn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
    \' Hvis der er fundet poster på søgningen
    Response.Write \"<table border=0>\"
    Response.Write \"<tr><td><B>Navn</B></td><td><B>Beskrivelse</B></td></tr>\"
    Do While Not rs.EOF
        Response.Write \"<tr><td> <A HREF=\'\" & rs(\"URL\") & \"\'> \" & rs(\"Navn\") & \"</A> </td>\"
        Response.Write \"<td> \" & rs(\"Beskrivelse\") & \" </td></TR>\"
        rs.MoveNext
    Loop
    Response.Write \"</table>\"
Else
    \' Hvis der ikke er fundet poster på søgningen
    Response.Write \"<p>Der blev desværre ikke fundet noget på din søgning!</p><A HREF=\"\"frontpage.asp\"\">Søg igen</A>\"
End If

\' Rydder op efter os
myConn.Close
Set myConn = Nothing
%>