chklogin.asp

来自「一个不错的拍卖网站,fdsafdsfdfe」· ASP 代码 · 共 60 行

ASP
60
字号
<!--#include file = "conn.asp" -->
<%response.buffer=true
dim url
url=request("url")
%><html>
<head>
<title>会员登陆</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<%
uname=request("aspeasename")
upass=request("aspeasepass")
sql="select * from users where regUsername='"&uname&"'and regPassword='"&upass&"'"
set rs=conn.execute(sql)
if not(rs.bof and rs.eof) then
   if uname=rs("regUsername") then
	session("user")=uname
	'session("pass")=upass
	response.redirect ("index.asp")
	rs.close 
	set rs=nothing 
	conn.close
	set conn=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 + =
减小字号Ctrl + -
显示快捷键?