正在阅读：ASP做象资源管理器的树形目录ASP做象资源管理器的树形目录

　　i=0
　　dim row_id
　　row_id=""
　　while not rs.EOF
　　row_id=rs.Fields("row_id").Value
　　name=rs.Fields("name").Value
　　j=0

　　while j<nodeLayer
　　Response.Write("<img src='blank.bmp'>")
　　j=j+1
　　wend
　　Response.Write("<img id='objNode"&row_id&"' style='cursor:hand' src='open.bmp' onclick=javascript:createChildNode('"&row_id&"',"&nodeLayer+1&") border=0 align='absmiddle'>")
　　Response.Write("<img src='blank.bmp' border=0 align='absmiddle'>")
　　Response.Write("<a class=item href='view.asp?id="&row_id&"' target='mainFrame'>"&Trim(name)&"</a></br>") '项目内容
　　Response.Write("<span id='oSpan"&row_id&"' ></span>") '子节点内容区域
　　i=i+1
　　rs.MoveNext
　　wend
　　'''''''''''''''''''''''''''''''''''''''''Server Code END ''''''''''''''''''''''''''''''''''
　　%>

　　---------xtree.js-------------

　　function getChildTree(parId,nodeLayer)
　　parId:=父节点id,nodeLayer:=子节点所属层次
　　{
　　var xmlhttp = new ActiveXObject ("Microsoft.XMLHTTP");
　　xmlhttp.Open("get", "xtree.asp?parId="+parId+"&nodeLayer="+nodeLayer, false);
　　xmlhttp.Send("Author:taojianbo;Version:2.0");
　　return xmlhttp.responseText;
　　}

　　function showHide(objid)

　　{
　　var temp;
　　eval("temp=oSpan"+objid+".style.display");
　　if(temp=="block")
　　{