/********名称与超链接********/
doc.write("<td valign=middle align=left nowrap>")
doc.write("<a href='" FileName "?ID=" foldersNode[1] "&Name=" foldersNode[2] "' target=folderFrame><font size=2 face='宋体'>" foldersNode[2] "</font></a>")
}
doc.write("</table>")
///////////////////////////////////////////////////////
if (foldersNode.length > 3 && foldersNode[0]) //有孩子且打开则递归显示节点
{
level=level 1
for (i=3; i<foldersNode.length;i )
if (i==foldersNode.length-1)
redrawNode(foldersNode[i], doc, level, 1, leftSide)
else
redrawNode(foldersNode[i], doc, level, 0, leftSide)
}
}
//当用户点击分层的 /-号时响应,被openBranch调用
function clickOnFolderRec(foldersNode, folderName)
{
var i=0
if (foldersNode[2] == folderName)
{
if (foldersNode[0])//若为打开状态时,则将其关闭
foldersNode[0] = 0
else
foldersNode[0] = 1
}
else
{
for (i=3; i< foldersNode.length; i )
clickOnFolderRec(foldersNode[i], folderName)
}
}
//打开或关闭结点(当用户点击分层的 /-号时响应)
function openBranch(branchName)
{
clickOnFolderRec(foldersTree, branchName)
timeOutId = setTimeout("redrawTree()",100)
}
//显示树图
function redrawTree()
{
var doc = top.treeFrame.window.document
//记录当前滚动条位置
posX = doc.body.scrollLeft
posY = doc.body.scrollTop
doc.open()
doc.write("<body link='#0000ff' vlink='#0000ff' alink='##ff0000' bgcolor='white'>")
redrawNode(foldersTree, doc, 0, 1, "")
doc.close()
doc.body.scrollLeft = posX
doc.body.scrollTop = posY
}
//网页载入时响应的函数
function initializeTree()
{
generateTree()
redrawTree()
}
/*********************** 相关函数 END *************************/
</Script>
</HEAD>
<FRAMESET cols="220,*" onLoad="initializeTree()" framespacing="1">
<FRAME src="Pleft.htm" name="treeFrame" target="_self" scrolling="auto">
<FRAME SRC="PRight.htm" name="folderFrame" scrolling="auto">
</FRAMESET>
</HTML>
<%
'以上程序在WIN2000Server IIS5.0 SQLServer2000下测试通过。
'=========================================================
'======= 作者:夏春涛 E-Mail:Bluesky_521@yeah.net ======
'=========================================================
%>
<!--
PLeft.htm文件的内容:
<html>
<body>
<p align=center><font size=2>正在生成树图,请稍候...</font>
</body>
</html>
PRight.htm文件的内容:
<html>
<body>
<p align=center><font size=2>欢迎访问!</font>
</body>
</html>
Content.asp文件根据你的需要自己编写。
程序执行的效果,与Windows的资源管理器几乎一样。
closedfolder.gif是一个22*22的小图,其余的图片是16*22的小图;
这些图片可以通过在资源管理器中抓图获得。
-->
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!



