cklogin.asp

都市星空BBS系统 v1.1(SQL)

<%
'==============================================================================
'软件名称：星空社区 VER 1.0.15
'当前版本：starcity club V1.0.15
'最新更新：2004.9
'==============================================================================
'Copyright (C) 2002-2004 Googln.com  All rights reserved.
'商业注册联系：010-64410364
'技术支持QQ：6370639(限商业用户) 
'程序开发：Googln Studio(BeiJing)
'Email:[e-mail]
'论坛支持：星空社区(http://www.starcity.cn/bbs)
'官方网站：www.Googln.com  演示站点：www.starcity.cn/bbs  都市星空：www.starcity.cn 阳光商城:www.sunmall.com.cn
'==============================================================================
'免费版本请在首页保留版权信息，并做上本站LOGO友情连接
'都市星空在线保留此程序的法律追究权利
'==============================================================================
%>
<!-- #include file="include/conn.asp"-->
<!-- #include file="include/md5.asp"-->
<%
if Request("username")="" then
%>
	<script language=Javascript>
	alert("用户名不能为空！");
	window.history.go(-1);	
	</script>
<%
response.End
end if
sql="select * from db_user where username='" & trim(request("username")) & "' and Password='"&EnPas(trim(request("password")))&"'"
set rs = conn.Execute(sql)
if not (rs.eof or err) then
		session("id")=rs("id")
		session("username")=rs("username")
		session("password")=rs("password")
		if session("oldUrl")<>"" then
			response.redirect session("oldUrl")
		else
			response.redirect "main.asp"
		end if
else
%>
	<script language=Javascript>
	alert("用户名或密码错误，请重新输入！");
	window.history.go(-1);	
	</script>
<%	
	end if
%>