树形图问题

aqide 2002-01-10 09:49:45
在树形图上如何连线?
...全文
78 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
Soft21 2002-01-12
  • 打赏
  • 举报
回复
大家好啊,呵呵,不错!
yihis 2002-01-10
  • 打赏
  • 举报
回复
<!--#include file="../adovbs.inc"-->
<!--#include file="../dbconn/dbconn.asp"-->
<%
function tree(officeid)
sql="select * from officedb where officeparents='"&officeid&"'"
set rs1=conn.Execute(sql)
if rs1.bof or rs1.eof then
else
while rs1.eof=false
%>
<tr><td><input type="button" value=<%=rs1("officename")%> onclick="window.open('discdisp.asp?officeid=<%=rs1("officeid")%>','discdisp','width=640,height=480,toolbar=no,menubar=no')"></td>
<td>
<table>
<%
tree(rs1("officeid"))
%>
</table>
</td></tr>
<%
rs1.movenext
wend
end if
end function
%>
<center>
<table>
<tr>
<%
tree(0)
%>
</tr>
</table>
<table>
<tr>
<td>
<input type="button" value="È«ÌåÁôÑÔ" onclick="window.open('discdisp.asp?officeid=0','discdisp','width=640,height=480,toolbar=no,menubar=no')">
   
<input type="button" value="ÎÒµÄÁôÑÔ" onclick="window.open('discdisp.asp?officeid=self','discdisp','width=640,height=480,toolbar=no,menubar=no')">
</td>
</tr>
</table>
</center>

28,391

社区成员

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

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