admin_left.asp

3000首FLASH源程序

<!--#include file="function.asp"-->
<%checkadmin%>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
  <tr>
    <td>
<%if Session("IsAdmin")=True then
 response.write "<img src=images/admin_home.gif border=0>　<a href=admin_home.asp>管理首页</a><br><br>"&_
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_picadd.asp>添加动画</a><br>"
if session("flag")>1 then 
 response.write "&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_picmana.asp>管理动画</a><br><br>"
end if
 response.write "&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_passwordmana.asp>密码管理</a><br>"
if session("flag")>1 then
 response.write "&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_authoradd.asp>添加作者</a><br>"&_
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_authormana.asp>作者管理</a><br>"&_
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_AnnounceMana.asp?typeid=1>相关新闻管理</a><br>"&_
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_AnnounceMana.asp?typeid=2>知识介绍管理</a><br>"&_
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_AnnounceMana.asp?typeid=3>站内公告管理</a><br>"&_
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_ResearchMana.asp>调查管理</a><br>"
end if
if session("flag")>2 then
 response.write "&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_classmana.asp>栏目管理</a><br>"&_		
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_js.asp>生成JS代码</a><br>"&_
		"&nbsp;<img src=images/admin_class.gif border=0>　<a href=admin_adminmana.asp>管理员管理</a><br><br>"
end if
 response.write "<img src=images/admin_logout.gif border=0>　<a href=admin_logout.asp>退出管理员状态</a>"
end if
%>
    </td>
  </tr>
</table>