至顶网›软件频道 ›应用软件›在Web界面下如何生成像资源管理器一样的树形目录

在Web界面下如何生成像资源管理器一样的树形目录

扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条

在上一版本中，我们使用的是递归算法来实现，在我们对这个算法评测时发现，对于拥有成千上万条记录的数据库就不再能胜任了，所以在新的算法版本中，我们使用了XML技术，动态的发现数据，以解决一次从服务器下在大量数据的尴尬

作者：来源：中国软件网 2008年6月21日

树形目录显示程序
问题描述：
在我们项目中常常会出现自关联的数据表，如果我们从整体看去，整个表就呈现为一个树形数据结构（对于复杂的情况，它可能变成一个图）。当我们对这个表进行显示，编辑时，如果不采用好的表现形式，会显得很笨拙，为此，我们开发这样的树形结构的程序。在上一版本中，我们使用的是递归算法来实现，在我们对这个算法评测时发现，对于拥有成千上万条记录的数据库就不再能胜任了，所以在新的算法版本中，我们使用了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-------------------------------------------------------------------

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<SCRIPT LANGUAGE=javascript src=http://www.ddvip.com/web/xml/index2/"xtree.js">
</SCRIPT>
<style type="text/css">

</style>
</HEAD>
<BODY leftMargin=0 rightMargin=0 topMargin=0 border=0>
<bold>树形菜单演示程序</bold><br>
<table border=0>
<tr><td nowrap>
<span id=''oSpanroot'' border=0></span><SCRIPT LANGUAGE=javascript>createChildNode("root",0);</SCRIPT></td></tr>
</table>
</BODY>
</HTML>

-------xtree.asp---------------------------------------------------------------

<%@ Language=VBScript %>
<%
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 can''t is null")
Response.End()
end if
if(nodeLayer<0) then
nodeLayer=0

end if
%>
<%
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 j<nodeLayer
Response.Write("<img src=http://www.ddvip.com/web/xml/index2/''blank.bmp''>")
j=j+1
wend
Response.Write("<img id=''objNode"&row_id&"'' style=''cursor:hand'' src=http://www.ddvip.com/web/xml/index2/''open.bmp'' onclick=javascript:createChildNode(''"&row_id&"'',"&nodeLayer+1&") border=0 align=''absmiddle''>")
Response.Write("<img src=http://www.ddvip.com/web/xml/index2/''blank.bmp'' border=0 align=''absmiddle''>")
Response.Write("<a class=item href=http://www.ddvip.com/web/xml/index2/''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;
}

VIP专区

VIP用户

普通用户

邮件订阅

如果您非常迫切的想了解IT领域最新产品与技术信息，那么订阅至顶网技术邮件将是您的最佳途径之一。

重磅专题

往期文章

在Web界面下如何生成像资源管理器一样的树形目录

业界热点: