📄 memlogin.asp
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!--#include file="include/conn.asp"-->
<!--#include file="include/function.asp"-->
<%
session("ManagerName")=""
upload=testdb(request.Form("upload"))
if upload="upload" then
ManagerName=testdb(request.Form("ManagerName"))
LoginPasd=testdb(request.Form("LoginPasd"))
if ManagerName="" or LoginPasd="" then
call msginfor("对不起，登陆名或密码不能为空，请重新登陆","memlogin.asp")
end if
sql="select * from TAdmin where Adm_LoginName='"&ManagerName&"' and Adm_LoginPasd='"&LoginPasd&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if rs.eof then
call msginfor("对不起，您输入登陆名或密码有误，请重新输入","memlogin.asp")
else
session("LoginType")=rs("Adm_Remark")'登陆类型
session("ManagerName")=rs("Adm_LoginName")'管理员名
session("limit")=rs("Adm_Gread")'管理员权限
session("login_safe")="#$@2#3%$3#9#@$2343"
session("login_name")=ManagerName
session("login_grade")=rs("Adm_Gread")'管理员权限 '"1, 2, 3, 4, 5, 6"
session("Adm_Remark")=rs("Adm_Remark")'登陆类型 '"super"
session("login_ip")=rs("adm_ip")
session("adm_type")=rs("adm_type") '"2"
adm_LoginTime=trim(rs("adm_LoginTime"))
if adm_LoginTime="" or isnull(adm_LoginTime) then adm_LoginTime=now()
'response.Write adm_LoginTime
'response.End()
Adm_StartCity=""
city_IfInclude=""
If Adm_StartCity="" Then Adm_StartCity="*"
If city_IfInclude="" Then city_IfInclude="1"
session("Adm_StartCity")=Adm_StartCity
session("city_IfInclude")=city_IfInclude
response.cookies("login_safe")="#$@2#3%$3#9#@$2343"
response.cookies("login_name")=ManagerName
response.cookies("login_grade")=rs("Adm_Gread")'管理员权限
response.cookies("Adm_Remark")=rs("Adm_Remark")'登陆类型
response.cookies("login_ip")=request.ServerVariables("REMOTE_ADDR")
response.cookies("adm_LoginTime")=adm_LoginTime
response.cookies("login_safe").expires=date()+7
response.cookies("login_name").expires=date()+7
response.cookies("login_grade").expires=date()+7
response.cookies("Adm_Remark").expires=date()+7
response.cookies("login_ip").expires=date()+7
response.cookies("adm_LoginTime").expires=date()+7
rs("adm_LoginTime")=now()
rs("adm_times")=rs("adm_times")+1
UserIp = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If UserIp = "" Then UserIp = Request.ServerVariables("REMOTE_ADDR")
rs("adm_ip")=UserIp
rs.update
rs.close
set rs=nothing
response.redirect("default.asp")
end if
end if
%>
<HTML><HEAD><TITLE>网站数据管理系统 - 登录</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="main.css" type=text/css rel=stylesheet>
<STYLE type=text/css>
.uu {
BORDER-RIGHT: #245ca7 1px dotted; BORDER-TOP: #245ca7 1px dotted; FONT-SIZE: 8pt; BORDER-LEFT: #245ca7 1px dotted; COLOR: #ffffff; BORDER-BOTTOM: #ffffff 1px dotted; FONT-FAMILY: verdana, arial; BACKGROUND-COLOR: #245ca7
}
INPUT {
FONT-SIZE: 8pt; FONT-FAMILY: verdana, arial
}
.text {
FONT-SIZE: 12px; COLOR: #003366; TEXT-DECORATION: none
}
.tableback {
BACKGROUND-POSITION: left top; BACKGROUND-ATTACHMENT: fixed; BACKGROUND-IMAGE: url(images/mainlogo.gif); BACKGROUND-REPEAT: no-repeat
}
.style1 {color: #FFFFFF;FONT-SIZE: 9pt;}
body {
margin-left: 0px;
margin-top: 0px;
}
</STYLE>
<SCRIPT language=javascript>
function fCheckRemember()
{
document.all["chkRemember"].checked = !document.all["chkRemember"].checked;
}
function fCheckScreen(index)
{
document.all["optScreen"][index].checked = true;
}
//校验登录名：只能输入5-20个以字母开头、可带数字、“_”、“.”的字串
function isRegisterUserName(s)
{
//var patrn=/^[a-zA-Z0-9]{1}([a-zA-Z0-9]|[._]){4,19}$/;
var patrn=/^[a-zA-Z0-9]{1,19}$/;
if (!patrn.exec(s))
return false;
else
return true;
}
//校验用户姓名：只能输入1-30个以字母开头的字串
function isTrueName(s)
{
var patrn=/^[0-9a-zA-Z]{1,30}$/;
if (!patrn.exec(s))
return false;
else
return true;
}
//校验密码：只能输入6-20个字母、数字、下划线
function isPassword(s)
{
var patrn=/^(\w){1,20}$/;
if (!patrn.exec(s))
return false;
else
return true;
}
//校验是否全由数字组成
function isDigit(s)
{
var patrn=/^[0-9]{4}$/;
if (!patrn.exec(s))
return false;
else
return true;
}
function fCheckForm()
{
if (!isRegisterUserName( document.form1.ManagerName.value ))
{
alert('验证错误，请输入合法的登录帐号。\n只能输入1-20个以字母或数字开头、可带数字、“_”、“.”的字串');
document.form1.ManagerName.focus();
return false;
}
if (!isPassword( document.form1.LoginPasd.value ))
{
alert('验证错误，请输入合法的登录密码。\n只能输入1-20个字母、数字、下划线');
document.form1.LoginPasd.focus();
return false;
}
return true;
}
</SCRIPT>
</HEAD>
<BODY bgColor=#73a2d0
onload=javascript:form1.ManagerName.focus();>
<FORM name=form1 onSubmit="javascript:return fCheckForm();" action="memlogin.asp"
method="post">
<input type="hidden" name="upload" value="upload">
<TABLE height="100%" cellSpacing=0 cellPadding=0 width="100%" align=center
border=0>
<TBODY>
<TR>
<TD vAlign=center width="100%">
<TABLE width=778 height=351 border=0
align=center cellPadding=0 cellSpacing=0 background="images/mainlogo.gif">
<TBODY>
<TR>
<TD width=406 valign="top"> </TD>
<TD width=372>
<TABLE height=181 cellSpacing=0 cellPadding=0 width="100%"
border=0><TBODY>
<TR>
<TD height=20 class="style1"> </TD>
</TR>
<TR>
<TD height=131>
<TABLE class=text height=118 cellSpacing=0 cellPadding=4
width="64%" align=left border=0>
<TBODY>
<TR>
<TD align=right width=75>登录帐号：</TD>
<TD><INPUT maxLength=20 name="ManagerName"></TD></TR>
<TR>
<TD align=right width=75>登录密码：</TD>
<TD><INPUT type=password maxLength=20 name="LoginPasd"></TD></TR>
<TR align="center">
<TD height=26 colSpan=2><INPUT type=image height=16
alt=点击进入 width=25 src="images/go.gif"
align=absMiddle
name=btnLogin> </TD>
</TR></TBODY></TABLE></TD></TR>
<TR>
<TD> </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></FORM></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -