Fejl i \"Expandable \" overskrift .................

Er der nogen der kan finde fejlen i denne kode :
Jeg får fejl i Linie 31 ved loadning af siden, men ellers virker det fint... :

<%@LANGUAGE=\"VBSCRIPT\"%>
<!--#include file=\"../Connections/slqProdukter.asp\" -->
<%
set rsProdukter = Server.CreateObject(\"ADODB.Recordset\")
rsProdukter.ActiveConnection = MM_slqProdukter_STRING
rsProdukter.Source = \"SELECT * FROM Produkter\"
rsProdukter.CursorType = 0
rsProdukter.CursorLocation = 2
rsProdukter.LockType = 3
rs8Produkter.Open()
rsProdukter_numRows = 0
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<style type=\"text/css\">
.exheading {font-weight: bold; cursor: hand}
.exindent {padding-left: 10px}
</style>
<script language=\"JavaScript\">
//begin IE 4+ And NS6 dHTML Outlines
function hideshow(which)
{
if (!document.getElementById|document.all)
    {
    return
    }
else
    {
    if (document.getElementById)
        {
        oWhich = eval (\"document.getElementById(\'\" + which + \"\')\")
        }
    else
        {
        oWhich = eval (\"document.all.\" + which)
        }
    }

    window.focus()

    if (oWhich.style.display==\"none\")
        {
        oWhich.style.display=\"\"
        }
    else
        {
        oWhich.style.display=\"none\"
        }
}
//end IE 4+ And NS6 dHTML Outlines
function initoutlineExpandible()
{
hideshow(\'outlineChildtest\')
hideshow(\'outlineChildtest2\')
hideshow(\'outlineChildtest3\')
}

</script>
</head>
<body bgcolor=\"#FFFFFF\" text=\"#000000\" onLoad=\"initoutlineExpandible()\">
<div id=\"outlineParenttest<%=(rsProdukter.Fields.Item(\"VareNummer\").Value)%>\" onClick=\"java script:hideshow(\'outlineChildtest<%=(rsProdukter.Fields.Item(\"VareNummer\").Value)%>\')\" class=\"exheading\"><%=(rsProdukter.Fields.Item(\"VareNavn\").Value)%></div>
<div id=\"outlineChildtest<%=(rsProdukter.Fields.Item(\"VareNummer\").Value)%>\" style=\"cursor:auto\" class=\"exindent\"><b>Replace the
  content of this div with the content which you wish to have within the outline.</b></div>
<div id=\"outlineParenttest2\" onClick=\"java script:hideshow(\'outlineChildtest2\')\" class=\"exheading\">test2</div>
<div id=\"outlineChildtest2\" style=\"cursor:auto\" class=\"exindent\"><b>Replace the
  content of this div with the content which you wish to have within the outline.</b></div>
<div id=\"outlineParenttest3\" onClick=\"java script:hideshow(\'outlineChildtest3\')\" class=\"exheading\">test3</div>
<div id=\"outlineChildtest3\" style=\"cursor:auto\" class=\"exindent\"><b>Replace the
  content of this div with the content which you wish to have within the outline.</b></div>
</body>
</html>
<%
rsProdukter.Close()
%>