Dom遍历XML的一个例子,结果为树状结构

2022-07-15 80酷酷网 80kuku.com

　　dom|xml|遍历

knowledge.XML文件
[复制此代码]CODE:<?xml version="1.0" encoding="gb2312"?>
<?xml:stylesheet type="text/xsl"
<%
function getimgstr(ttid,ttname,ttlvl,tttype,ttlf,ttlstr)
   dim ttstr1
   if ttlvl=0 then
         ttstr1=ttstr1 & "<a language="VBScript">
dim olditem
sub OnClickDiv(DivId,pType)
   if (document.all(DivId).style.display="none") then
      document.all(DivId).style.display=""
      if (pType="0") then
        document.all("l-"+DivId).src="http://www.pushad.com/Info/image/t-minus.gif"
        document.all("p-"+DivId).src="http://www.pushad.com/Info/image/o-fold.bmp"
      end if
      if (pType="1") then
        document.all("l-"+DivId).src="http://www.pushad.com/Info/image/l-minus.gif"
        document.all("p-"+DivId).src="http://www.pushad.com/Info/image/o-fold.bmp"
      end if
      'if (pType="3") then
      ' document.all("p-"+DivId).src="http://www.pushad.com/Info/image/o-fold.bmp"
      'end if
   else
      document.all(DivId).style.display="none"
      if (pType="0") then
        document.all("l-"+DivId).src="http://www.pushad.com/Info/image/t-plus.gif"
        document.all("p-"+DivId).src="http://www.pushad.com/Info/image/c-fold.bmp"
      end if
      if (pType="1") then
         document.all("l-"+DivId).src="http://www.pushad.com/Info/image/l-plus.gif"
         document.all("p-"+DivId).src="http://www.pushad.com/Info/image/c-fold.bmp"
      end if
      'if (pType="3") then
      ' document.all("p-"+DivId).src="http://www.pushad.com/Info/image/c-fold.bmp"
      'end if
    end if
end sub
</script>
<font name="宋体" size="2">
<nobr><%=xmlstr%></nobr></font>
</body>