check.asp

网络书店

<!-- #include file="../conn/conn.asp" -->
<% 
set rs=server.CreateObject("adodb.recordset")
sql="select * from Customer where c_name='"&trim(request.Form("c_name"))&"'"
rs.open sql,conn,1,1
if not rs.eof then
if trim(request.Form("c_pwd"))=trim(rs("c_pwd")) or trim(request.Form("c_pwd"))=ucase(trim(rs("c_pwd"))) then
response.Cookies("customer")=trim(rs("c_name"))
session("disinf")=trim(rs("c_name"))
session("index")=1
response.Redirect("index.asp")
else
%>
<script>
window.alert("密码错误！")
history.go(-1);
</script>
<%
end if
else
%>
<script>
window.alert("帐号错误！")
history.go(-1);
</script>
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>