在Web界面下如何生成像资源管理器一样的树形目录（版本2.0） -pc6资讯

您的位置：首页 → 网页设计 → ASP实例 → 在Web界面下如何生成像资源管理器一样的树形目录（版本2.0）

在Web界面下如何生成像资源管理器一样的树形目录（版本2.0） 时间：2004/11/7 3:00:00来源：本站整理作者：蓝点我要评论(0)

在Web界面下如何生成像资源管理器一样的树形目录（版本2.0）    eeff（原作）



关键字     数形目录 XML ASP Web Javascript



树形目录显示程序

问题描述：

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

树形菜单演示程序

-------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
   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='close.bmp'");

}

}//end function

function createChildNode(childNodeId,nodeLayer)

//如果子节点内容为空，则初始化，并更新数据

//childNodeId:=子节点对象Id的parid部分

{

var temp;

eval("temp=oSpan"+childNodeId+".innerHTML");

if(temp=="")

{

  eval("oSpan"+childNodeId+".innerHTML='

'");

  temp=new String(getChildTree(childNodeId,nodeLayer));

  if(temp.length!=0)

  {

   eval("oSpan"+childNodeId+".innerHTML=temp");

   eval("objNode"+childNodeId+".src='close.bmp'");//变为减号

  }

  else

  {//如果temp内容为空，说明未找到子树，则该节点为叶节点，更改相关属性

   eval("objNode"+childNodeId+".src='leaf.bmp'");//更改图标

   eval("objNode"+childNodeId+".onclick=''"); //取消click事件

   eval("oSpan"+childNodeId+".innerHTML=temp");//内容为空

  }

}

else

{ showHide(childNodeId);

}

}

文章评论

查看所有0条评论>>

热门文章 没有查询到任何记录。