📄 loggo.asp
字号:
<!--#include file="../manager/function/conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>检验登陆</title>
</head>
<body>
<%
mem_loginname=trim(request("mem_loginname"))
mem_loginpasd=trim(request("mem_loginpasd"))
msg=""
mem_loginname=replace(mem_loginname,"'","")
set rs=server.CreateObject("adodb.recordset")
sql="select * from tmember where mem_loginname = '"&mem_loginname&"'"
rs.open sql,conn,3,1
if not rs.eof then
password=rs("mem_loginpasd")
if trim(password)<>trim(mem_loginpasd) then
msg="用户密码错误!"
else
session("mem_name")=mem_loginname
response.cookies("mem_safe")="@#^*#@@#3%@@324"
response.cookies("mem_login")=mem_loginname
response.cookies("mem_grade")=rs("mem_grade")
session("mem_money")=rs("mem_money")
mem_power_bak=rs("mem_power")
if isnull(mem_power_bak) or isempty(mem_power_bak) then mem_power_bak="0"
response.cookies("mem_power")=mem_power_bak
response.cookies("mem_safe").expires=date()+1
response.cookies("mem_name").expires=date()+1
response.cookies("mem_grade").expires=date()+1
response.cookies("mem_power").expires=date()+1
msg="成功登陆!"
%>
<script language="javascript">
alert('<%=msg%>');
//window.opener.close();
//window.close()
window.location.href="../my_RL/index.asp"
</script>
<%
end if
else
msg="没有此用户!"
end if
%>
<script language="javascript">
alert('<%=msg%>');
window.history.back(-1);
</script>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -