BVB Source Codes

Jie Yang v0.6.3 article system Show admin_left.asp Source code

Return Download Jie Yang v0.6.3 article system: download admin_left.asp Source code - Download Jie Yang v0.6.3 article system Source code - Type:.asp
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
  2. <!--#include file="../conn/conn.asp"-->
  3. <!--#include file="admin_check.asp"-->
  4. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  5. <html xmlns="http://www.w3.org/1999/xhtml">
  6. <head>
  7. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
  8. <title></title>
  9. <style type="text/css">
  10. <!--
  11. body,ul,li,html,div,span{ margin:0; padding:0;}
  12. img{ border:0px;}
  13. body{ font-size:12px; line-height:150%; background-color:#E7F5FE;}
  14. #left_menu{ width:190px; background:url(Img/left_bg.gif) repeat-y; height:1000px; padding-top:10px;}
  15. #left_menu ul li{}
  16. #left_menu ul li a img{ padding-top:2px;}
  17. #left_menu ul li a{ display:block; height:24px; line-height:24px; padding-top:-4px; padding-left:30px; text-decoration:none; color:#000000; padding-top:1px;}
  18. #left_menu ul li a:hover{ background:url(Img/left_libg.gif) no-repeat;}
  19. .links{ background:url(Img/left_libgs.gif) no-repeat;}
  20. <!-- IE下消除点击图片文字后出现的虚线框代码 -->
  21. a{blr:expression(this.onFocus=this.blur())}
  22. -->
  23. </style>
  24. </head>
  25. <!-- Firefox下消除点击图片文字后出现的虚线框代码 -->
  26. <script>
  27. window.onload=function(){ for(var i=0; i<document.links.length; i++) document.links[i].onfocus=function(){this.blur()}}
  28. </script>
  29. <script language="javascript">
  30. function ShowLinks(ids,Options,num)
  31. {
  32. for(var i=1;i<num;i++)
  33. {
  34.         if(document.getElementById("nav"+Options+i))
  35.         {document.getElementById("nav"+Options+i).className="";}
  36. }
  37. document.getElementById("nav"+ids).className="links";
  38. }
  39. </script>
  40. <%
  41. dim act
  42. act=request.QueryString("act")
  43. %>
  44. <body>
  45. <div id="left_menu">
  46.         <ul>
  47. <%
  48. select case act
  49. case "websys"
  50. %>
  51.                 <%If JYAdminLevel(101) Then%><li><a href="Websys/admin_siteconfig.asp" target="main" class="links" id="nav11" onclick="ShowLinks(11,1,7)">·网站信息设置</a></li><%End If%>
  52.                 <%If JYAdminLevel(104) Then%><li><a href="WebAds/list.asp" target="main" id="nav12" onclick="ShowLinks(12,1,7)">·网站广告管理</a></li><%End If%>
  53.                 <%If JYAdminLevel(105) Then%><li><a href="Link/admin_links.asp" target="main" id="nav13" onclick="ShowLinks(13,1,7)">·友情链接管理</a></li><%End If%>
  54.                 <%If JYAdminLevel(106) Then%><li><a href="GuestBook/admin_index.asp" target="main" id="nav14" onclick="ShowLinks(14,1,7)">·网站留言管理</a></li><%End If%>
  55.                 <%If JYAdminLevel(107) Then%><li><a href="Comment/admin_index.asp" target="main" id="nav15" onclick="ShowLinks(15,1,7)">·网站评论管理</a></li><%End If%>
  56.                 <%If JYAdminLevel(108) Then%><li><a href="Article/admin_keywords.asp" target="main" id="nav16" onclick="ShowLinks(16,1,7)">·关键词管理</a></li><%End If%>
  57.                
  58. <%
  59. case "user"
  60. %>
  61.                 <%If JYAdminLevel(203) Then%><li><a href="user/admin_admin.asp" target="main" id="nav21" onclick="ShowLinks(21,2,2)" class="links">·管理员管理</a></li><%End If%>                
  62.  
  63. <%
  64. case "channel"
  65. navnum=3
  66. sql="select C_id,C_name from Article_Channel where C_ModuleType=10 order by C_order asc"
  67. set rs=Server.CreateObject("ADODB.RecordSet")
  68. rs.open sql,conn,1,1
  69. if not rs.eof then
  70. navnum=navnum+rs.recordcount
  71. end if
  72. closers(rs)
  73. %>
  74.                 <%If JYAdminLevel(300) Then%><li><a href="Channel/Admin_channel.asp" target="main" class="links" id="nav31" onclick="ShowLinks(31,3,<%=navnum%>)">·系统频道设置</a></li><%End If%>
  75.                 <%     
  76.                 sql="select * from Article_Channel where C_ModuleType=10 and C_type=1 order by C_order asc"
  77.                 set rs=Server.CreateObject("ADODB.RecordSet")
  78.                 rs.open sql,conn,1,1
  79.                 if not rs.eof then     
  80.                 for i=1 to rs.recordcount
  81.                 %>
  82.                 <%If JYAdminLevel(30&rs("C_id")) Then%><li><a href="Article/admin_info.asp?cid=<%=rs("C_id")%>" target="main" id="nav3<%=i+2%>" onclick="ShowLinks(3<%=i+2%>,3,<%=navnum%>)">·<%=rs("C_name")%>管理</a></li><%End If%>
  83.                 <%
  84.                 rs.movenext
  85.                 next
  86.                 end if
  87.                 closers(rs)
  88.                 %>
  89.                 <%If JYAdminLevel(302) Then%><li><a href="Common/Admin_common.asp" target="main" id="nav32" onclick="ShowLinks(32,3,<%=navnum%>)">·通用页面管理</a></li><%End If%>
  90.                
  91. <%
  92. case "template"
  93. %>
  94.                
  95.                 <%If JYAdminLevel(401) Then%><li><a href="Template/Admin_TemplateProject.asp" target="main" class="links" id="nav41" onclick="ShowLinks(41,4,5)">·模板方案管理</a></li><%End If%>
  96.                 <%If JYAdminLevel(402) Then%><li><a href="Template/Admin_Template.asp" target="main" id="nav42" onclick="ShowLinks(42,4,5)">·网站模板管理</a></li><%End If%>
  97.                 <%If JYAdminLevel(403) Then%><li><a href="Template/Admin_Skin.asp" target="main" id="nav43" onclick="ShowLinks(43,4,5)">·风格样式管理</a></li><%End If%>
  98.                 <%If JYAdminLevel(404) Then%><li><a href="Label/Admin_Label.asp" target="main" id="nav44" onclick="ShowLinks(44,4,5)">·通用标签管理</a></li><%End If%>
  99.                
  100. <%
  101. case "data"
  102. %>
  103.                
  104.                 <%If JYAdminLevel(501) Then%><li><a href="Websys/Admin_DataBase.asp?Action=BackUp" target="main" class="links" id="nav51" onclick="ShowLinks(51,5,6)">·备份数据库</a></li><%End If%>
  105.                 <%If JYAdminLevel(502) Then%><li><a href="Websys/Admin_DataBase.asp?Action=Resume" target="main" id="nav52" onclick="ShowLinks(52,5,6)">·恢复数据库</a></li><%End If%>
  106.                 <%If JYAdminLevel(503) Then%><li><a href="Websys/Admin_DataBase.asp?Action=Compress" target="main" id="nav53" onclick="ShowLinks(53,5,6)">·压缩数据库</a></li><%End If%>
  107.                 <%If JYAdminLevel(504) Then%><li><a href="Websys/admin_sql.asp" target="main" id="nav54" onclick="ShowLinks(54,5,6)">·执行sql语句</a></li><%End If%>
  108.                 <%If JYAdminLevel(505) Then%><li><a href="Websys/admin_space.asp" target="main" id="nav55" onclick="ShowLinks(55,5,6)">·系统空间占用</a></li><%End If%>
  109.                
  110. <%
  111. case "file"
  112. %>
  113.                
  114.                 <%If JYAdminLevel(601) Then%><li><a href="Websys/Admin_CreateHtml.asp" class="links" target="main" id="nav61" onclick="ShowLinks(61,6,4)">·html文件生成</a></li><%End If%>
  115.                 <%If JYAdminLevel(602) Then%><li><a href="Websys/Admin_Files.asp" id="nav62" target="main" onclick="ShowLinks(62,6,4)">·html文件管理</a></li><%End If%>
  116.                 <%If JYAdminLevel(603) Then%><li><a href="UpfileImg/index.asp" id="nav63" target="main" onclick="ShowLinks(63,6,4)">·上传文件管理</a></li><%End If%>
  117.                
  118. <%
  119. case "plus"
  120. %>
  121.                
  122.                 <%If JYAdminLevel(701) Then%><li><a href="Gather/Admin_ItemStart.asp" class="links" target="main" id="nav71" onclick="ShowLinks(71,7,4)">·文章采集管理</a></li><%End If%>
  123.                 <%If JYAdminLevel(702) Then%><li><a href="Websys/admin_xml.asp" target="main" id="nav72" onclick="ShowLinks(72,7,4)">·生成sitemaps</a></li><%End If%>
  124.                 <%If JYAdminLevel(703) Then%><li><a href="Websys/admin_js.asp" target="main" id="nav73" onclick="ShowLinks(73,7,4)">·外部调用设置</a></li><%End If%>            
  125. <%
  126. case "system"
  127. %>
  128.                
  129.                 <%If JYAdminLevel(801) Then%><li><a href="Websys/admin_cache.asp" target="main" class="links" id="nav81" onclick="ShowLinks(81,8,5)">·清除系统缓存</a></li><%End If%>
  130.                 <%If JYAdminLevel(802) Then%><li><a href="Websys/admin_weblog.asp" target="main" id="nav82" onclick="ShowLinks(82,8,5)">·前台日志管理</a></li><%End If%>
  131.                 <%If JYAdminLevel(803) Then%><li><a href="Websys/admin_log.asp" target="main" id="nav83" onclick="ShowLinks(83,8,5)">·后台日志管理</a></li><%End If%>
  132.                 <%If JYAdminLevel(804) Then%><li><a href="Websys/admin_delmdb.asp" target="main" id="nav84" onclick="ShowLinks(84,8,5)">·网站初始化</a></li><%End If%>
  133. <%
  134. case else
  135. %>
  136.                 <%If JYAdminLevel(101) Then%><li><a href="Websys/admin_siteconfig.asp" target="main" class="links" id="nav991" onclick="ShowLinks(991,99,4)">·网站信息设置</a></li><%End If%>
  137.                 <%If JYAdminLevel(300) Then%><li><a href="Channel/admin_channel.asp" target="main" id="nav992" onclick="ShowLinks(992,99,4)">·系统频道设置</a></li><%End If%>
  138.                 <%If JYAdminLevel(404) Then%><li><a href="Label/admin_label.asp" target="main" id="nav993" onclick="ShowLinks(993,99,4)">·通用标签管理</a></li><%End If%>
  139. <%
  140. end select
  141. %>
  142.         </ul>
  143. </div>
  144. </body>
  145. </html>
  146.  
downloadadmin_left.asp Source code - Download Jie Yang v0.6.3 article system Source code
Related Source Codes/Software:
Jilin classification information release system v5.0 trial version - A ready-made classifieds site publishing system, h... 2016-09-21
Linyi CMS v6.5 market classification information - A. supply and demand information function: informa... 2016-09-21
Tesco discount net SQL version - And presentations, faster. 2016-09-21
- electronic enterprise website management system In a fully functional version - Super suitable for enterprise agents build a corpo... 2016-09-21
Rio mesh network hard disk system v3.0 - System functions: 1, increase the progress of Asp... 2016-09-21
Classified information network business in suzhou - Overall module: classification of supply and deman... 2016-09-21
NPOINT virtual host v1.7.0 formal version management system - The system main function is introduced 2016-09-21
IDC sales web site - Beautiful IDC sales web site source code 2016-09-21
Oo 126 CMS movie site system - This procedure ASP + ACC/ASP + SQL, using new kern... 2016-09-21
Pcook CMS bubble guest v3.0 SDCMS version - Developed by Asp+Access, and meet the needs of sma... 2016-09-21
CRYENGINE - CRYENGINE is a powerful real-time game development... 2017-06-11
postal - 2017-06-11
reactide - Reactide is the first dedicated IDE for React web ... 2017-06-11
rkt - rkt is a pod-native container engine for Linux. It... 2017-06-11
uWebSockets - Tiny WebSockets https://for... 2017-06-11
realworld - TodoMVC for the RealWorld - Exemplary fullstack Me... 2017-06-11
goreplay - GoReplay is an open-source tool for capturing and ... 2017-06-10
pyenv - Simple Python version management 2017-06-10
redux-saga - An alternative side effect model for Redux apps ... 2017-06-10
angular-starter - 2017-06-10

 Back to top