asp树型菜单函数(原创)

原创 2004年10月12日 14:08:00
<%function ShowTreeMenu(rs001,layer)
if not rs001.eof then
 %>
  <script language="javascript">
   <!--
   function display1(Q_subtree,Q_img){
    
     if (Q_subtree.style.display=="none"){
       Q_subtree.style.display="";    
     Q_img.src="tree_collapse.gif";
    }
     else
      {
       Q_subtree.style.display="none";     
       Q_img.src="tree_expand.gif";
     }
   }
   -->
  </script>
 <table border="0" cellspacing="0" cellpadding="0">
 <%
 i=1
 while not rs001.eof
 sql="select * from menu where parent_id="&rs001("id")
 set result_sub=result(sql)
  if not result_sub.eof then
  img="img"&layer&"_"&i
  subtree="subtree"&layer&"_"&i
  %>
    <tr>
   <td width="12"><IMG src="tree_collapse.gif" border="no" name="<%=img%>" onclick="javascript:display1(document.all.<%=subtree%>,document.all.<%=img%>);" ></td>
   <td><%=rs001("nam")%></td>
    </tr>
    <tr  id="<%=subtree%>">
   <td>&nbsp;</td>
   <td>
  <%
  layer=layer+1
  ShowTreeMenu result_sub,layer
  layer=layer-1
  else
   if rs001("url")<>"" then
   %>
     <tr>
    <td width="12"><IMG src="tree_collapse.gif" border="no"></td>
    <td><%=rs001("nam")%></td>
     </tr>
   <%
   else
   %>
     <tr>
    <td width="12"><IMG src="tree_collapse.gif" border="no"></td>
    <td><%=rs001("nam")%></td>
     </tr>
   <%
   end if
  end if
 rs001.movenext
 i=i+1
 wend
%>
</table>
<%
end if
end function
%>

asp简单的树形菜单,能从数据库读取类别

这种做法是把所有的数据都装载到数据集中,之后利用样式显示/隐藏来显示。没有什么效率可言,只是实现了树形菜单的这种效果 。我的数据库的类别是分3个表来保存的。 %@LANGUAGE="VBSCRIPT"...
  • zdyguilong
  • zdyguilong
  • 2007年05月31日 16:26
  • 1716

ASP中实现树状菜单

在中加 定义菜单的函数function Tree()  //树状菜单对象{  this.start=function()  //菜单开始,bTop表示是否为最外层。  {    document.wr...
  • guanzg
  • guanzg
  • 2006年05月17日 15:52
  • 7731

无限分类树型菜单演示(asp)

看到论坛里有人发了一个树型菜单,需者甚众,看了一下演示,似乎不难实现,趁着周六没事,便也写了一个出来理论上支持无限级分类,发上来与大家分享!!--------------------------   ...
  • tomtown530
  • tomtown530
  • 2005年12月26日 23:46
  • 1912

数据库设计(一)树型关系的数据表

树型关系的数据,例如常见的类别表,即一个大类,下面有若干个子类,某些子类又有子类这样的情况。当类别不确定,用户希望可以在任意类别下添加新的子类,或者删除某个类别和其下的所有子类,而且预计以后其数量会逐...
  • qq_38537286
  • qq_38537286
  • 2017年12月04日 15:14
  • 53

asp实现树型目录

asp实现树型目录重要思想:递归思想数据表: id name pid ...
  • apple666999
  • apple666999
  • 2007年05月21日 10:30
  • 441

Android多级树形菜单的实现

在Android里要实现树形菜单,都是用ExpandableList(也有高手自己继承ListView或者LinearLayout来做),但是ExpandableList一般只能实现2级树形菜单......
  • u011715213
  • u011715213
  • 2014年11月18日 10:27
  • 1077

树型导般菜单(js版)

New Document *{font-size:12px;}var Request = {QueryString: new ThunderBirdRequestQueryString(),Cook...
  • shqlsl
  • shqlsl
  • 2005年02月10日 16:37
  • 1235

JSP与树型菜单

JSP与树型菜单 ...
  • yihuei123
  • yihuei123
  • 2007年09月17日 10:36
  • 801

树型菜单

a.htmhttp://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">http://www.w3.org/1999/xhtml"> 员工档案管理 ...
  • yihuei123
  • yihuei123
  • 2007年06月04日 17:21
  • 1788

非常简洁的仿js树形菜单

非常简洁的仿js树形菜单
  • sinat_31016743
  • sinat_31016743
  • 2016年01月12日 22:15
  • 6288
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:asp树型菜单函数(原创)
举报原因:
原因补充:

(最多只允许输入30个字)