在Web界面下如何生成像資源管理器一樣的樹形目錄（版本2.0）

2019-11-18 20:21:12

字體：大中小

來源：轉載

供稿：網友

在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-------------------------------------------------------------------

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<SCRIPT LANGUAGE=Javascript src="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='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)
//顯示，隱藏區域，達到菜單顯示的目的
//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='<div align=right>LOADING...</div><br>'");
  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);
}
}

上一篇：使用ASP建設私人搜索引擎

下一篇：嵌入式Web視頻點播系統實現方法