Main_Navi.asp
上传用户:jisenq
上传日期:2014-06-29
资源大小:7216k
文件大小:7k
源码类别:

数据库编程

开发平台:

ASP/ASPX

  1. <table width="98%" border="0" cellspacing="0" cellpadding="0">
  2.   <tr>
  3.     <td height="2"></td>
  4.   </tr>
  5. </table>
  6. <table width="95%" border="0" align="center" cellpadding="2" cellspacing="1" class="leftframetable">
  7.   <tr classid="VoteManage"> 
  8.     <td width="2%" height="21"><img src="../Images/Folder/main_sys.gif" width="15" height="17"></td>
  9.     <td width="98%"><table width="120" border="0" cellspacing="0" cellpadding="0">
  10.         <tr> 
  11.           <td width="47"  class="titledaohang" id=item$pval[CatID]) style="CURSOR: hand"  onmouseup="opencat(Menuid_main,Menuid_sub);"  language=javascript><font style="font-size:12px">主系统</font></td>
  12.           <td width="73"  class="titledaohang" id=item$pval[CatID]) style="CURSOR: hand"  onmouseup="opencat(Menuid_sub,Menuid_main);"  language=javascript> 
  13.             <div align="left"><font style="font-size:12px">子系统</font></div></td>
  14.         </tr>
  15.       </table></td>
  16.   </tr>
  17. </table>
  18. <table width="95%" border="0" align="center" cellpadding="2" cellspacing="1" class="leftframetable" Id="Menuid_main" style="display:none">
  19.   <tr> 
  20.     <td width="3%"><div align="right"><img src="../Images/Folder/sub_sys.gif" width="15" height="17"></div></td>
  21.     <td width="97%" class="titledaohang"><strong>主系统导航</strong></td>
  22.   </tr>
  23.   <tr> 
  24.     <td colspan="2"><table width="95"  border="0" align="left" cellpadding="2" cellspacing="0">
  25. <%if MF_Check_Pop_TF("MF_Templet") then %>
  26.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;"> 
  27.           <td valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  28.           <td><a href="../Templets_List.asp" target="ContentFrame" class="lefttop">模板管理</a></td>
  29.         </tr>
  30. <%
  31. end if
  32. if MF_Check_Pop_TF("MF_Style") then 
  33. %>
  34.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;">
  35.           <td valign="top"><div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  36.           <td><a href="../All_Label_style.asp" target="ContentFrame">样式管理</a></td>
  37.         </tr>
  38.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;">
  39.           <td valign="top"><div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  40.           <td><a href="../All_Label_Stock.asp" target="ContentFrame">标签库管理</a></td>
  41.         </tr>
  42. <%
  43. end if
  44. if MF_Check_Pop_TF("MF_Public") then 
  45. %>
  46.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;"> 
  47.           <td valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  48.           <td><a href="../Sys_Public.asp" target="ContentFrame">发布管理</a></td>
  49.         </tr>
  50. <%
  51. end if
  52. if MF_Check_Pop_TF("MF_SysSet") then 
  53. %>
  54.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="RecyleManage"> 
  55.           <td width="22%" valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  56.           <td width="78%"><a href="../SysParaSet.asp" target="ContentFrame" class="lefttop">参数设置</a></td>
  57.         </tr>
  58. <%
  59. end if
  60. if MF_Check_Pop_TF("MF_Const") then 
  61. %>
  62.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="AdsManage" style="display:;"> 
  63.           <td valign="top"><div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  64.           <td><a href="../SysConstSet.asp" target="ContentFrame">配置文件</a></td>
  65.         </tr>
  66. <%
  67. end if
  68. if MF_Check_Pop_TF("MF_SubSite") then 
  69. %>
  70.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="AdsManage" style="display:;"> 
  71.           <td valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  72.           <td><a href="../SubSysSet_List.asp" target="ContentFrame" class="lefttop">子系统维护</a></td>
  73.         </tr>
  74. <%
  75. end if
  76. %>
  77.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;"> 
  78.           <td valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  79.           <td><a href="../SysAdmin_list.asp" target="ContentFrame" class="lefttop">管理员管理</a></td>
  80.         </tr>
  81. <%
  82. if MF_Check_Pop_TF("MF_DataFix") then 
  83. %>
  84.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;"> 
  85.           <td valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  86.           <td><a href="../DataManage.asp" target="ContentFrame">数据库维护</a></td>
  87.         </tr>
  88. <%
  89. end if
  90. if MF_Check_Pop_TF("MF_Log") then 
  91. %>
  92.         <tr classid="VoteManage" style="display:;"> 
  93.           <td valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  94.           <td><a href="../Sys_Oper_Log.asp" target="ContentFrame">日志管理</a></td>
  95.         </tr>
  96. <%
  97. end if
  98. if MF_Check_Pop_TF("MF_Define") then 
  99. %>
  100.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;"> 
  101.           <td height="20" valign="top"> <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  102.           <td><a href="../DefineTable_Manage.asp" target="ContentFrame" class="lefttop">自定义字段</a></td>
  103.         </tr>
  104. <%end if%>
  105.       </table></td>
  106.   </tr>
  107. </table>
  108. <table width="95%" border="0" align="center" cellpadding="2" cellspacing="1" class="leftframetable" Id="Menuid_sub" style="display:none">
  109.   <tr> 
  110.     <td width="3%"><div align="right"><img src="../Images/Folder/sub_sys.gif" width="15" height="17"></div></td>
  111.     <td width="97%" class="titledaohang"><strong>子系统导航</strong></td>
  112.   </tr>
  113.   <tr> 
  114.     <td colspan="2"> <table width="95" border="0" align="left" cellpadding="2" cellspacing="0">
  115.         <%
  116.   '得到子类列表
  117.     Dim obj_sub_rs
  118. Set obj_sub_rs=server.CreateObject(G_FS_RS)
  119. obj_sub_rs.open "select Sub_Sys_Name,Sub_Sys_Path,Sub_Sys_Index,Sub_Sys_Installed From [FS_MF_Sub_Sys] where Sub_Sys_Installed=1 order by id asc",Conn,1,1
  120. do while Not obj_sub_rs.eof 
  121.   %>
  122.         <tr allparentid="OrdinaryMan" parentid="OrdinaryMan" classid="VoteManage" style="display:;"> 
  123.           <td width="22%" height="21" valign="top">
  124. <div align="center"><img src="../Images/Folder/folderclosed.gif"></div></td>
  125.           <td width="78%"><a href="../<% = obj_sub_rs("Sub_Sys_Path")%>/<% = obj_sub_rs("Sub_Sys_Index")%>" class="lefttop"> 
  126.             <% = obj_sub_rs("Sub_Sys_Name")%>
  127.             </a></td>
  128.         </tr>
  129.         <%
  130.    obj_sub_rs.movenext
  131.    Loop
  132.    obj_sub_rs.close:set obj_sub_rs = nothing
  133.    %>
  134.       </table></td>
  135.   </tr>
  136. </table>
  137. <script language="JavaScript" type="text/JavaScript">
  138. function opencat(cat,hidden)
  139. {
  140.   if(cat.style.display=="none")
  141.   {
  142.  cat.style.display="";
  143.  hidden.style.display="none";
  144.   }
  145.   else
  146.   {
  147.  cat.style.display="none"; 
  148.   }
  149. }
  150. </script>