⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 check.asp

📁 网站代码
💻 ASP
字号:
 <%

'---------------------检查用户名密码-------------------------------
function Checkin(s) 
s=trim(s) 
s=replace(s," ","&amp;nbsp;") 
s=replace(s,"'","&amp;#39;") 
s=replace(s,"""","&amp;quot;") 
s=replace(s,"&lt;","&amp;lt;") 
s=replace(s,"&gt;","&amp;gt;") 
Checkin=s 
end function 

'---------------------检查初级管理员-------------------------------
function CheckAdmin1
	if Session("IsAdmin")<>true then response.redirect "Admin_Login.asp"
end function

'---------------------检查中级管理员-------------------------------
function CheckAdmin2
    if Session("IsAdmin")<>true then response.redirect "Admin_Login.asp"
	if Session("IsAdmin")<>true or (session("KEY")<>"check" and session("KEY")<>"super") then response.redirect "Admin_Default.asp?err=你的权限的够!!"
end function

'---------------------检查高级级管理员-------------------------------
function CheckAdmin3
    if Session("IsAdmin")<>true then response.redirect "Admin_Login.asp"
	if Session("IsAdmin")<>true or session("KEY")<>"super" then response.redirect "Admin_Default.asp?err=你的权限的够!!"
end function

'---------------------错误输出-------------------------------
sub error()
%>
<html>
<head>
<title>Power Wenday Sys 后台管理</title>
<link href="Img/Admin.css" rel="stylesheet" type="text/css">
<body>
<table width="60%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
      <td width="100%">
          <table border="0" cellpadding="0" cellspacing="0" width="100%">
            <tr>
              
<td width="100%" bgcolor="#FFFFFF" height="80" align="center"> <b><font color="#FF0000">Error!</font>&nbsp; 
<%=errmsg%>!&nbsp;<font color="#FF0000"> :(</font></b> 
<p><b><a href="javascript:history.go(-1)">...::: 点 此 返 回 
                :::...</a></b>
              </td>
            </tr>
          </table>
      </td>
    </tr>
  </table> 
  </body>
</html>        
<%
end sub
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -