树行问题？

xyp730000 2003-08-21 11:11:06
各位大侠。为什么我这个没有子层数据。只有第一层数据

<script>
function expand(id){
window.status=eval("s"+id).innerText;
getLight(id);
if(eval("s"+id).href!='')document.frames['nodehref'].location.href=eval("s"+id).href
switch(eval("dir"+id).innerText){//改变"+","-"
case "-":
eval("dir"+id).innerText="+";eval("dir"+id).className='dirclose';document.getElementById("load_"+id).style.display='none';break;
case "+":
eval("dir"+id).innerText="-";eval("dir"+id).className='diropen';document.getElementById("load_"+id).style.display='';break;
default:eval("dir"+id).innerText=".";eval("dir"+id).className='dirNode';
}
if(eval("dir"+id).innerText==".")return;
if(eval("dir"+id).innerText=="+"){if(document.getElementById("t"+id)){eval("t"+id).removeNode(true);return;}}
document.frames['hifm'].location.href="subtree.asp?id="+id
}

function getLight(id){//高亮度显示当前结点
var s=document.getElementsByTagName("SPAN")
var sn=document.getElementById("s"+id)
for(i=0;i<s.length;i++)if(s[i].className=='node')s[i].style.cssText="color:#000000;background-color:#f2f2f2"
sn.style.cssText="color:#000000;background-color:#ffffff;border:1 solid #999999"
}
</script>
<body topmargin="0" leftmargin="0" scroll="no">
<% dim conn,rs
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.mappath("Collection.mdb") & ";Persist Security Info=False"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "select *,(select count(*) from indexTable where Parent = theID) as children from indexTable where theID=Parent",conn,1,3
%>
<div align="center">
<center>
<table border="0" width="779" cellspacing="0" cellpadding="0" height=100% bgcolor="#F2F2F2">
<tr>
<td width="260" style="border-right:5 solid #6699cc" valign="top" align="left">
<div id=treedir style="overflow:auto;width:100%;height:100%">
<table border='0' cellspacing='0' cellpadding='0' style='position:relative;left:18;top:20' onselectstart="return false">
<%
do while not rs.eof
if rs("children")<=1 then
s="."
cls="dirNode"
else
s="+"
cls="dirclose"
end if
%>
<tr><td id='node<%=rs("theID")%>' class='td_node' valign=top><span class='<%=cls%>' id='dir<%=rs("theID")%>' onclick='expand(<%=rs("theID")%>)'><%=s%></span><span class='node' id='s<%=rs("theID")%>' onclick='expand(<%=rs("theID")%>)' title='<%=rs("theName")%>' href='<%=rs("theName")%>'><%=rs("theName")%></span></td></tr>
<% if rs("children")>1 then%>
<tr id="load_<%=rs("theID")%>" style="display:none"><td class='td_node'><table border='0' cellspacing='0' cellpadding='0' style='position:relative;left:18;top:0'><tr><td class='td_node'><span class='dirNode'>.</span><span class='load'>Loading...</span></td></tr></table></td></tr>
<%end if%>
<% rs.movenext
loop
%>
</table>
</div>
</td>
<td valign="top" align="left">
<iframe name=nodehref style="border:1 solid #3366cc;width:100%;height:100%;overflow:auto" src="about:blank" frameborder=0 ></iframe>
</td>
</tr>
</table>
</center>
</div>
<%
set rs=nothing
set conn=nothing
%>
<iframe id='hifm' width=0 height=0></iframe>


</body>
...全文
36 13 打赏 收藏 转发到动态 举报
写回复
用AI写文章
13 条回复
切换为时间正序
请发表友善的回复…
发表回复
xyp730000 2003-08-22
  • 打赏
  • 举报
 回复
up
flygoocn 2003-08-21
  • 打赏
  • 举报
 回复
看你的代码好晕
xyp730000 2003-08-21
  • 打赏
  • 举报
 回复
up
fason 2003-08-21
  • 打赏
  • 举报
 回复
检查subtree.asp是否有错误,导致数据无法返回

http://fason.nease.net/
Brookes 2003-08-21
  • 打赏
  • 举报
 回复
太多了，晕~~~~
xyp730000 2003-08-21
  • 打赏
  • 举报
 回复
up
xyp730000 2003-08-21
  • 打赏
  • 举报
 回复
没人吗
分不够可以加嘛
我急用啊
xyp730000 2003-08-21
  • 打赏
  • 举报
 回复
不行啊
pp4u 2003-08-21
  • 打赏
  • 举报
 回复
把sql语句改为"select *,(select count(*) from indexTable where Parent = T.theID) as children from indexTable T where Parent=0 order by Parent"
xyp730000 2003-08-21
  • 打赏
  • 举报
 回复
谁能给我改一下。
数据库：Collection.mdb->indexTable－>Parent；theID
我的email:xyp730000@sina.com
xyp730000 2003-08-21
  • 打赏
  • 举报
 回复
xyp730000@sina.com

下面是：
<% dim conn,rs,s,cls,href
dim nodeid
nodeid=request.querystring("id")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.mappath("Collection.mdb") & ";Persist Security Info=False"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "select *,(select count(*) from indexTable where Parent = theID) as children from indexTable T where Parent="&nodeid&" and id<>"&CInt(nodeid),conn,1,3
dim node_html
node_html="<table id='t"&nodeid&"' border='0' style='position:relative;left:18' cellspacing='0' cellpadding='0'>"
do while not rs.eof
if rs("theID")<>rs("Parent") then
if rs("children")=0 then
s="."
cls="dirNode"
else
s="+"
cls="dirclose"
end if
end if
node_html=node_html&"<tr><td id='node"&rs("theID")&"' class='td_node'><span class='"&cls&"' id='dir"&rs("theID")&"' onclick='expand("&rs("theID")&")'>"&s&"</span><span class='node' id='s"&rs("theID")&"' onclick='expand("&rs("theID")&")' title='"&rs("theName")&"' href='"&rs("theName")&"'>"&rs("theName")&"</span></td></tr>"
if rs("children")>0 then
node_html=node_html&"<tr id='load_"&rs("theID")&"' style='display:none'><td class='td_node'><table border='0' cellspacing='0' cellpadding='0' style='position:relative;left:18;top:0'><tr><td class='td_node'><span class='dirNode'>.</span><span class='load'>Loading...</span></td></tr></table></td></tr>"
end if
rs.movenext
loop
node_html=node_html&"</table>"
set rs=nothing
set rs = Server.CreateObject("ADODB.Recordset")
rs.open "select link from indexTable where theID="&nodeid,conn,1,3
%>
<script>
if(parent.document.getElementById("load_"+"<%=nodeid%>")){
parent.document.getElementById("load_"+"<%=nodeid%>").style.display="none"
parent.document.getElementById("node"+<%=nodeid%>).innerHTML+="<%=node_html%>"
}
</script>
<% set rs=nothing
set conn=nothing
%>
pp4u 2003-08-21
  • 打赏
  • 举报
 回复
给个地址，两个页面都给你发过去。。。
pp4u 2003-08-21
  • 打赏
  • 举报
 回复
哈，你只有deeptree.asp没有subtree.asp当然不行了。。。
【动态规划秘籍】背包问题和树形DP详解
背包问题详解（算法精讲+刷题实战6） 1）01背包 2）01背包一维数组优化 3）完全背包 4) 多重背包 5) 分组背包 6) 混合背包 树形DP详解（算法精讲+刷题实战5） 1）没有上司的舞会 2）工人请愿书 3）完美服务 4）背包...
面试题：InnoDB中一棵B+树能存多少行数据？
原文地址 一、InnoDB一棵B+树可以存放多少行数据？ InnoDB一棵B+树可以存放多少行数据？这个问题的简单回答是：约2千万。为什么是这么多呢？因为这是可以算出来的，要搞清楚这个问题，我们先从InnoDB索引数据结构、数据组织方式说起。 我们都知道计算机在存储数据的时候，有最小存储单元，这就好比我们今天进行现金的流通最小单位是一毛。在计算机中磁盘存储数据最小单元是扇区，一个扇区的大小是512...
后端面试之MySQL-InnoDB一颗B+树可以存放多少行数据？
首发于微信公众号：【码农在新加坡】，欢迎关注。 背景 MySQL的InnoDB引擎一棵B+树可以存放多少行数据？这是一个很有趣的面试题。 也许你会猜1千万，2千万，或者上亿条数据？ 当你看完这篇文章，你就心中有数了。 最重要的是，这篇文章能让你更深入的理解InnoDB的B+树索引的方方面面。 看完这篇文章，你可以同时回答以下几个关于InnoDB B+树的面试题： MySQL InnoDB一颗B+树能存多少数据？ MySQL InnoDB的B+树每个非叶子结点能有多少分支？ MySQL InnoDB为什么使
InnoDB一棵B+树只能存放两千万行数据？？
今天看到一篇公众号，提了个直击灵魂的问题：InnoDB一棵B+树可以存放多少行数据？ 看到他直接给的答案，突然一脸懵逼。约2千万？？？ 那那些超过2千万的表是怎么存储的？ 我们知道InnoDB是以B+树索引的方式存储的。所以如果B+树只能存放2千万左右的数据，那么一张表也只能存放两千万的数据。显然这是错误的。那么作者是如何得出的这个错误的结论？ 作者说B+树的深度是2~3层，所以假设B+树有三层...
【MySql】InnoDB一棵B+树可以存放多少行数据？
有一道MySQL的面试题，为什么MySQL的索引要使用B+树而不是其它树形结构?比如B树？现在这个问题的复杂版本可以参考本文；他的简单版本回答是：因为B树不管叶子节点还是非叶子节点，都会保存数据，这样导致在非叶子节点中能保存的指针数量变少（有些资料也称为扇出），指针少的情况下要保存大量数据，只能增加树的高度，导致IO操作变多，查询性能变低；本文从一个问题出发，逐步介绍了InnoDB索引组织表的原理、查询方式，并结合已有知识，回答该问题，结合实践来证明。
ASP

28,391

社区成员

357,060

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章