📄 login.asp
字号:
<!--#include file="conn.asp"-->
<script language="javascript">
<!--//
function submitcheck()
{if(form1.username.value == "")
{ window.alert ("用户名必填！");
form1.username.focus();
return false;
}
if(form1.password.value == "")
{ window.alert ("密码难道不填么！");
form1.password.focus();
return false;
}
}
-->
</script>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css" type="text/css">
<title>后台管理——登录</title>
</head>
<%
if request("denglu")<>"" then
dim rs,sql
set rs=server.createobject("adodb.recordset") '创建纪录集
sql="select * from admin where admin='"&trim(request("username"))&"'" '查找用户信息
rs.open sql,conn,1,2 '执行SQL语句
if not rs.eof then
if rs("password")=trim(request("password")) then '判断密码是否正确
session("longin")=1 '标记登录
rs("date")=now '更新登录时间
rs("ip")=Request.ServerVariables("REMOTE_ADDR") '更新登录IP地址
rs.update '保存更新内容
response.Write("<p><P><p align=center>登录成功！") '提示登录成功
else
response.Write("<p><P><p align=center>用户名或密码错误，<a href=login.asp>返回</a>")
end if
else
response.Write("<p><P><p align=center>用户名或密码错误，<a href=login.asp>返回</a>")
end if
set rs=nothing '关闭纪录集，释放所占资源
conn.close '关闭连结对象
set conn=nothing '释放所占资源
else
%>
<p>
<P>
<P>
<form action="login.asp" method="post" name="form1" onsubmit="return submitcheck()" >
<table border="1" width="40%" align="center">
<tr>
<td width="20%"><div align="center">用户名称</div></td>
<td width="20%"><input type=text name=username></td>
</tr>
<tr>
<td width="20%"><div align="center">密码</div></td>
<td width="20%"><input type=password name=password></td>
</tr>
<tr>
<td align="center" colspan="2"><div align="center">
<INPUT type="submit" value="登录" name=denglu>
</div></td>
</tr>
</table>
</form>
<%end if%>
</P></p>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -