📄 checkadmin.asp

📁 我的小网站个人利用业余时间设计的

💻 ASP

字号:

<!--#include file="conn.asp"-->
<%
//验证用户
dim user,pwd,usertype,sql,rs
user = replace(trim(request("supername")),"'","")
pswd = replace(trim(request("superpass")),"'","")
'response.write(user)
'response.write(pswd)

set rs=server.createobject("adodb.recordset")
sql = "select * from super_user where super_name='"&user&"' and super_pass ='"&pswd&"'"
rs.open sql,conn,3,2
if rs.bof=false then
       session("uer")=user     '记录用户名
       session("pwd")=pswd      '记录密码
  response.Redirect "admin.asp"  
 else
   if  session("uer")=empty or session("pwd")=empty then
    response.Write("输入为空")
    end if
 end if
rs.close
set rs=nothing
%>
<html>
<head>
<title>验证页面</title>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>
<body>

<div id="Layer1" style="position:absolute; left:78px; top:70px; width:645px; height:198px; z-index:1; background-color: #9999FF; layer-background-color: #9999FF; border: 1px none #000000;">
<center><font size="+5"></font>输入错误</center>
<center><a href="index.asp"><font size="+5" color="#99FF00">返回首页</font></a></center>
</div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -