📄 chklogin.asp
字号:
<!--#include file="inc/char.asp"-->
<!--#include file="conn.asp"-->
<%
response.buffer=true
dim to_url
to_url=rst("from_url")
if to_url="" then to_url="index.asp"
%><html>
<head>
<title>会员登陆---联系QQ:6439358，联系邮箱vqqq59r@163.com，网站www.vqqq.com，谢谢大家对我们系统的支持</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
uname=rst("aspeasename")
upass=rst("aspeasepass")
sql="select * from users where regUsername='"&uname&"'and regPassword='"&upass&"'"
set rsupass=server.createobject("adodb.recordset")
rsupass.open sql,conn
if not(rsupass.bof and rsupass.eof) then
if uname=rsupass("regUsername") then
session("user")=uname
session("vqqqkey")=super_user
response.redirect to_url
rsupass.close
set rsupass=nothing
else
response.write"<SCRIPT language=JavaScript>alert('您输入的用户名和密码不正确。');"
response.write"this.location.href='javascript:history.back();'</SCRIPT>"
response.end
end if
else
response.write "<script LANGUAGE='javascript'>alert('对不起，登陆失败！');history.go(-1);</script>"
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -