Fejlmeddelelse

Hvad kan årsagen til denne fejlmeddelelse være?

Error Type:
Response object, ASP 0106 (0x80020005)
An unhandled data type was encountered.
/Projektoversigt/DelUnlockDocuments.asp

<%@ language=VBScript%>
<HTML>
<HEAD>
<META NAME=\"GENERATOR\" Content=\"Microsoft Visual Studio 6.0\">
<TITLE></TITLE>
</HEAD>
<BODY>
<%
dim objRole
dim strDelDoc
dim strUnlockDoc
dim strFunction
dim strList

set objRole=server.CreateObject(\"PRSProjectUnivers.clsPRSProjectUnivers\")

strFunction=Request.Form(\"txtFunction\")
if strFunction=\"Delete Document\" then
    strDelDoc=Request.Form(\"txtIdDocument\")
    strList = split (strDelDoc,\",\")  \'FEJLEN KOMMER VED DENNE LINIE     
\'    for i = lbound(strList) to ubound(strList)   
\'        IdDocument = strList(i)                           
%>
    <%\'=IdDocument%>   
<%           
    \'next   
    \'objRole.DeleteDocument IdDocument       
\'else if strFunction=\"Unlock Document\" then
\'    strUnlockDoc=Request.Form(\"txtIdDocument\")
\'    strList = split (strUnlockDoc,\",\")
\'    for i = lbound(strList) to ubound(strList)   
\'        IdDocument = strList(i)                   
   
\'    next   
    \'objRole.UnlockDocument IdDocument       
end if
    \'Response.Redirect \"ProjectDocumentHandling.asp\"
\'end if
    \'Response.Redirect \"ProjectDocumentHandling.asp\"
%>

<%=strFunction%>
<%=strDelDoc%>
<%\'=strUnlockDoc%>
<%=strList%>

hej med dig
</BODY>
</HTML>