Fejl i databasen eller hvad?

jeg ved ikke hvad der er galt med denne side... er der nogen der kan hjælpe?

se det på www.forstkandidat.info

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/skov_conn.asp" -->
<%
if Len(Request.QueryString("id")) = 0 then
strID = 20
else
strID = Request.QueryString("id")
end if
%>
<%
set rsDok = Server.CreateObject("ADODB.Recordset")
rsDok.ActiveConnection = MM_skov_conn_STRING
rsDok.Source = "SELECT tblDok.*, tblDokType.*, tblBaggrund.*, tblDiv.*  FROM tblDok, tblDokType, tblBaggrund, tblBillede, tblDiv  WHERE DokID =" & CInt(strID) & " AND tblDok.DokBaggrund = tblBaggrund.BaggrundID AND tblDok.DokType = tblDokType.DokTypeID"
rsDok.CursorType = 0
rsDok.CursorLocation = 2
rsDok.LockType = 3
rsDok.Open()
rsDok_numRows = 0

SESSION.LCID = 1030

IF rsDok("DokType") = 1 THEN
Response.Redirect "open1.asp?id=" & strID
ELSEIF rsDok("DokType") = 2 THEN
Response.Redirect "open2.asp?id=" & strID
ELSEIF rsDok("DokType") = 3 THEN
Response.Redirect "open3.asp?id=" & strID
ELSEIF rsDok("DokType") = 4 THEN
Response.Redirect "open4.asp?id=" & strID
ELSEIF rsDok("DokType") = 5 THEN
Response.Redirect "open5.asp?id=" & strID
ELSEIF rsDok("DokType") = 6 THEN
Response.Redirect "open6.asp?id=" & strID
ELSEIF rsDok("DokType") = 7 THEN
Response.Redirect "open7.asp?id=" & strID
ELSEIF rsDok("DokType") = 8 THEN
Response.Redirect "open8.asp?id=" & strID
ELSEIF rsDok("DokType") = 9 THEN
Response.Redirect "open9.asp?id=" & strID
ELSEIF rsDok("DokType") = 10 THEN
Response.Redirect "open10.asp?id=" & strID
ELSE
Response.Write "ingen side tilknyttet dette menupunkt..."
END IF

rsDok.Close()
%>


Følgende fejlmeddelese fremkommer:
i denne linje 'IF rsDok("DokType") = 1 THEN'



error '80020009'
Exception occurred.

/open.asp, line 24


/haase