生成像资源管理器一样的树形目录.doc

生成像资源管理器一样的树形目录树形目录显示程序 问题描述： 在我们项目中常常会出现自关联的数据表，如果我们从整体看去，整个表就呈现为一个树形数据结构（对于复杂的情况，它可能变成一个图）。当我们对这个表进行显示，编辑时，如果不采用好的表现形式，会显得很笨拙，为此，我们开发这样的树形结构的程序。在上一版本中，我们使用的是递归算法来实现，在我们对这个算法评测时发现，对于拥有成千上万条记录的数据库就不再能胜任了，所以在新的算法版本中，我们使用了XML技术，动态的发现数据，以解决一次从服务器下在大量数据的尴尬，同时也遍免了如果表数据结构呈现为图时就会进入死循环的错误。 实际思路： 1、 初始显示时只显示根与二级节点，根与二级节点同在一层次 2、 点击一节点，如果它的子节点区域对象不存在，则建立对象，同时下载数据更新数据，显示所有子节点。 3、 每个节点在建立后都就有相同的功能，如检查子节点是否存在，显示隐藏子节点等等 4、 DHTML+XML+ASP+CSS同时使用 技术难点： 1、 使用xmlhttp接口时乱码问题： 因为在asp输出页面中，缺省的编码方案并不是中文的，那么在客户端页面的xmlhttp中解释时，就会以缺省的方案解析，所以就会出现乱码。为此，我们在Server端的asp页面中，加入如下代码定义编码方案： Response.CharSet=GB2312 Response.ContentType=text/html 2、 如何在界面上保持上一版本的风格（类资源管理器形式）： 在上一版本中，所有的页面内容都是一气呵成的，在控制上采用递归等思想，所有时的界面相对友好，当时本版中的机制发生了变化，内容是有多次合成的 关键问题，img ,span 对象的id 如何确定 经过求证，在界面上，本版本的界面难以与第一界面相同，所以只能保留一部分，但是总体来说，新界面同样也能满足需要 因为在这里不好使用附件，所以只能贴源码了： -xtree.html- 树形菜单演示程序 createChildNode(root,0); -xtree.asp- % Response.CharSet=GB2312 Response.ContentType=text/html Server code start dim parId,nodeLayer parid=Request.QueryString(parId) nodeLayer=cint(Request.QueryString(nodeLayer) if(parid=) then Response.Write(root id cant is null) Response.End() end if if(nodeLayer % strconn=at strsql=select * from tree where par=&parid& SQL 语句书写要求：在记录集的前面三个字段必须依次为：row_id（惟一的主键）、name（菜单条显示的内容）、par_id（父节点row_id),其它根据需要输出与显示 set conn=server.createobject(ADODB.connection) conn.open strconn set rs=server.createobject(ADODB.Recordset) rs.open strsql,conn,3,3 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 jnodeLayer Response.Write() j=j+1 wend Response.Write() Response.Write() Response.Write(&Trim(name)&) 项目内容 Response.Write() 子节点内容区域 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) 显示，隐藏区域，达到菜单显示的目的 objid:=区域对象ID的parid部分 var temp; eval(temp=oSpan+objid+.style.display); if(temp=block) eval(oSpan+objid+.style.display=none); eval(objNode+objid+.src=open.bmp); else eval(oSpan+objid+.style.display=block); eval(objNode+objid+.src=Editor/UploadFile/200511764616772.bmp); /end function function createChildNode(childNodeId,nodeLayer) 如果子节点内容为空，则初始化，并更新数据 childNodeId:=子节点对象Id的parid部分 var temp; eval(temp=oSpan+childNodeId+.innerHTML); if(temp=) eval(oSpan+childNodeId+.innerHTML=LOADING.); temp=new String(getChildTree(childNodeId,nodeLayer); if(temp.length!=0) eval(oSpan+childNodeId+.innerHTML=temp); eval(objNode+childNodeId+.src=Editor/UploadFile/200511764616772.bmp);/变为减号 else /如果temp内容为空，说明未找到子树，则该节点为叶节点，更改相关属性 eval(objNode+childNodeId+.src=Editor/UploadFile/200