📄 alogin.asp

📁 这是我个人用ASP制作的一个动态网页,也是我的主页,谢谢大家的使用~~~`

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="doc/config.asp"-->
<%
if request("LoginSubmit")<>"" then
  wordid=request.Form("wordid")
  admin=request.Form("admin")
  password=request.Form("password")
  set rs=server.CreateObject("adodb.recordset")
  rs.open "select * from admin where name='"&admin&"' and password='"&password&"'",conn,1,1
  if rs.eof and rs.bof then
     call msgbox("对不起您不是管理员，没有权限回复！","back","none")
  else
     session("admin")=trim(rs("name"))
	 session.Timeout=40 
	 if wordid<>"" then
	 response.Redirect "revert.asp?wordid="&wordid
	 else
     response.Redirect "index.asp"
	 end if
  end if
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理员登陆</title>
</head>
<body background="images/bottom-z.gif">
<form name="form1" method="post" action="alogin.asp">
<table  width="630" height="415" border="0" cellpadding="3" cellspacing="5" background="images/login211a.gif" align="center">
  <tr>
      <td align="right" valign="bottom" background="images/1222.jpg"> 
        <table width="190" height="100" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="64" bgcolor="#ffffff" align="right">管理员：</td>
        <td width="153" bgcolor="#ffffff"><input name="admin" type="text" id="admin2" size="15"></td>
      </tr>
      <tr>
        <td height="31" align="right" bgcolor="#ffffff">密&nbsp;&nbsp;码：</td>
        <td bgcolor="#ffffff"><input name="password" type="password" id="password" size="15"></td>
      </tr>
      <tr>
        <td height="40" colspan="2" align="center" bgcolor="#ffffff"><input name="LoginSubmit" type="submit" id="LoginSubmit"  value="登录">&nbsp;
          <input  type="reset" name="Submit2" value="重置" ><input name="wordid" type="hidden" id="wordid" value="<%=request.QueryString("wordid")%>"></td>
        </tr>
    </table></td>
  </tr>
</table>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -