回 帖 发 新 帖 刷新版面

主题:动态的二级伸缩式的菜单,asp编写

那位高人指教
一下
弄了一下下午弄不出来

回复列表 (共2个回复)

沙发

没有看懂你的意思
能不能给个地址看看?

板凳


<table width="158" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td> </td>
  </tr>
</table>
<TABLE align=center cellPadding=0 cellSpacing=0 width=158>
  <TBODY>
<%
dim j
dim tmpadmin_menu
dim admin_menuname
dim admin_menurl
for i=0 to ubound(admin_menu,1)
if isempty(admin_menu(i,0)) then exit for
%>
    <TR > 
      <TD  background=Images/admin_left_<%=i+1%>.gif height=25  style="cursor:hand" class=admin_menu_title  id=admin_menuTitle1 onclick="showsubadmin_menu(<%=i%>)"> 
        <strong><font color="#6699CC">&nbsp;<%=admin_menu(i,0)%></font></strong> 
      </TD>
    </TR>
    <TR > 
      <TD id='subadmin_menu<%=i%>'> <DIV class=sec_menu style="WIDTH: 158px"> 
          <table cellpadding=0 cellspacing=0 align=center width=135>
<%
  for j=1 to ubound(admin_menu,2)
  if isempty(admin_menu(i,j)) then exit for
          Response.write "<tr>"
          Response.write "<td height=20>·"&admin_menu(i,j)&"</td>"
          Response.write " </tr>"
 next
%>
          </table>
        </DIV>
        <DIV style="WIDTH: 158px"> 
          <TABLE align=center cellPadding=0 cellSpacing=0 width=135>
            <TBODY>
              <TR > 
                <TD height=15></TD>
              </TR>
            </TBODY>
          </TABLE>
        </DIV></TD>
    </TR>
    <%next%>
  </TBODY>
</TABLE>
<table width="158" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td> </td>
  </tr>
</table>
<TABLE align=center cellPadding=0 cellSpacing=0 width=158>
  <TBODY>
    <TR> 
      <TD background=Images/admin_left_9.gif class=menu_title 
          height=25 id=menuTitle1 onmouseout="this.className='menu_title';"  style="cursor:help" 
          onmouseover="this.className='menu_title2';"><strong><font color="#6699CC">&nbsp;版权信息 
        </font></strong></TD>
    </TR>
    <TR> 
      <TD> <DIV class=sec_menu style="WIDTH: 158px"> 
          <TABLE align=center cellPadding=0 cellSpacing=0 width=135>
            <TBODY>
              <TR> 
                <TD height=20><p><BR>
                    <br>     
                    <br>             
                        
                  </p></TD>
              </TR>
            </TBODY>
          </TABLE>
        </DIV></TD>
    </TR>
  </TBODY>
</TABLE>
<table width="158" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="5"></td>
  </tr>
</table>
这是其中的一段代码
实现的功能就像windows系统 各窗口左侧形成的(系统任务)(其它位置)的那种功能。我想改成自己的可就是改不对

我来回复

您尚未登录,请登录后再回复。点此登录或注册