admin_check.asp

来自「CityCN V2.1 是自主开发的基于ASP+Access的新型资讯信息系统。」· ASP 代码 · 共 19 行

<%
'+++++++++++++++++++++++++++++++++++++ 
'◆模块名称： 管理员级别检查  
'◆传入参数： grade (管理员级别), adminname (管理员名称) i(是否拥有该页权限) 
'+++++++++++++++++++++++++++++++++++++ 
sub manager(grade,adminname,i)
  if grade<>"" and i<>"" and adminname<>"" then
    if grade<i then
      response.write"<center><br><br><br>提示信息：<font color=red>此项操作只有超级管理员才能完成！</font>"
      response.redirect "admin_index.asp"
      response.end
    end if
  else
    response.write"<center><br><br><br>提示信息：<font color=red>请确认您的管理员身份！<br>管理员名："&adminname&"<br>您的级别："&grade&"<br>该页权限："&i&"级<br>"
    response.redirect "admin_login.asp"
    response.end
  end if
end sub
%>