📄 login.asp

📁 不错的一个网站哦, 不错的一个网站哦

💻 ASP

字号:

<!--#include file="config.asp" -->
<!--#include file="md5.asp" -->
<%
if session("admin")="on" then
Response.Redirect "addfile.asp"
end if
Set rs=Server.CreateOBject("ADODB.RecordSet")
sql="select admin_name,admin_password from admin"
rs.open sql,conn,1,1
usr=rs("admin_name")
psd=rs("admin_password")
rs.close
Set rs=Nothing
if Request.Form("usr")<>"" and Request.Form("psd")<>"" then
if trim(Request.Form("usr"))=usr and md5(trim(Request.Form("psd")))=psd then
session("admin")="on"
Response.Redirect"addfile.asp"
else
Response.Redirect"info.asp?info=登陆失败，请检查用户名和密码"
end if
end if
%>
<html>
<head>
<title><%=title%><%=desktoptitle%>登陆管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="INDEX.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
	background-image: url(IMAGES/bg/bg.gif);
}
-->
</style></head>

<body text="#000000" leftmargin="0" topmargin="0">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
 <tr>
  <td>
    <table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0" background="bg.jpg">
      <tr>
        <td align="center"><table width="100%" height="100" border="0" align="center" cellpadding="0" cellspacing="0" background="IMAGES/bg/memo2004-bg.gif" class="sx">
          <form name="form1" method="post">
            <tr>
              <td width="23%" rowspan="2" align="right" class="y"><%=title%>登陆管理：</td>
              <td width="77%"> 用 户 名：
                  <input type="text" name="usr" class="an" size="20">
                  <br>                  </td>
            </tr>
            <tr>
              <td>用户密码：
                <input type="password" name="psd" class="an" size="20">
                <input type="submit" name="Submit" value="登陆" class="an"></td>
            </tr>
          </form>
        </table></td>
      </tr>
    </table>
    　　　　　　　　　　　　　　　　　　　</td>
 </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -