<!-- end content / left -->
|
<!--#include virtual="/inc/menu.gds"-->
|
<div id="left">
|
<div id="menu">
|
<%if isDepartment("08")=1 then%>
|
<h6 id="h-menu-1"<%if h_menu1="1" then Response.Write " class=""selected"""%>><a href="#1"><span>系统管理</span></a></h6>
|
<ul id="menu-1" class="<%if h_menu1="1" then%>opened<%else%>closed<%end if%>">
|
<li class="collapsible last">
|
<%If isDepartment("0801")="1" Then%>
|
<a href="###" class="plus">模板设定</a>
|
<ul class="expanded">
|
<%
|
sql="select ModuleID,ModuleName from OA_Module where ModuleLevel=1 order by id"
|
rs.open sql,objConn,1,1
|
do while not rs.Eof
|
A_ModuleID=rs("ModuleID")
|
A_ModuleName=rs("ModuleName")
|
%>
|
<li><a href="Admin_Module.gds?ModuleID=<%=A_ModuleID%>&ModuleLevel=1&h_menu1_1=1"><%=A_ModuleName%></a></li>
|
<%rs.movenext
|
loop
|
rs.close()%>
|
</ul>
|
<%End If%>
|
<%If isDepartment("080301")="1" Then%><li><a href="SMS_List.gds">短信发送记录</a></li><%End If%>
|
<%If isDepartment("080303")="1" Then%><li><a href="#">操作记录</a></li><%End If%>
|
</li>
|
</ul>
|
<%end if%>
|
</div>
|
</div>
|
<!-- end content / left -->
|
