⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 admin_menu_type.asp

📁 打开目录ads文件夹 找到top_ads.js文件 用记事本打开后就可以看到: -------------------------------------- var head_ads_tx
💻 ASP
字号:
<%
sub menu_type()
  dim m_sort,m_type,n_sort,n_type,tmpstyle
  i=0
  n_sort=-1
  sql="select m_id,m_sort,m_name,m_url,m_open from admin_menu where m_hidden=1 order by m_sort,m_order"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
    tmpstyle=""
    m_sort=rs("m_sort")
    if cint(n_sort)=cint(m_sort) then
      response.write vbcrlf&"    <tr><td>"&img_admin("s_arrow","")&"&nbsp;<a href='"&rs("m_url")&"'>"&rs("m_name")&"</a></td></tr>"
    else
      if i>0 then
%>
    <tr><td height=3></td></tr>
    </table>
  </td></tr>
  <tr>
  <td class=m_end width=4><img height=2 width=4 src="images/admin/menu_endleft.gif"></td>
  <td width=* background="images/admin/menu_endbg.gif"></td>
  <td class=m_end width=4><img height=2 width=4 src="images/admin/menu_endright.gif"></td>
  </tr>
  </table>
<%
       response.write ukong
      end if
      if rs("m_open")=false then tmpstyle=" style=""display:none;"""
%>
  <table cellspacing=0 cellpadding=0 class=m_table>
  <tr>
  <td class=m_td width=4><img height=25 width=4 src="images/admin/menu_topleft.gif"></td>
  <td class=m_td width=* background="images/admin/menu_topbg.gif" align=center onclick="javascript:left_menu('left_<%response.write m_sort%>');">≡ <%response.write rs("m_name")%> ≡</td>
  <td class=m_td width=4><img height=25 width=4 src="images/admin/menu_topright.gif"></td>
  </tr>
  <tr id=left_<%response.write m_sort%> <%response.write tmpstyle%>><td class=m_tr colspan=3 background="images/admin/menu_bg.gif" align=center>
    <table cellspacing=1 cellpadding=2 class=m_table2>
    <tr><td height=3></td></tr>
<%
      n_sort=m_sort
    end if
    rs.movenext
    i=i+1
  loop
  rs.close
  if i>0 then
%>
    <tr><td height=3></td></tr>
    </table>
  </td></tr>
  <tr>
  <td class=m_end width=4><img height=2 width=4 src="images/admin/menu_endleft.gif"></td>
  <td width=* background="images/admin/menu_endbg.gif"></td>
  <td class=m_end width=4><img height=2 width=4 src="images/admin/menu_endright.gif"></td>
  </tr>
  </table>
<%
    response.write ukong
  end if
%>
<script language=javascript>
<!--
function left_menu(meval)
{
  var left_n=eval(meval);
  if (left_n.style.display=="none")
  { eval(meval+".style.display='';"); }
  else
  { eval(meval+".style.display='none';"); }
}
-->
</script>
<%
end sub
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -