checkuser.asp

网络商城系统

<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
if request.form("user")="" then
response.write"<script language=javascript>alert('用户名必须填写');this.location.href='index.asp';</script>"
end if
if request.form("password")="" then
response.write"<script language=javascript>alert('密码必须填写');this.location.href='javascript:history.go(-1)';</script>"
end if

username=request("user")
password=md5(request("password"))
set rs=server.createobject("adodb.recordset")
sql="select * from member where cname='"&username&"'"
rs.open sql,conn,1,1
if rs.eof then
response.write"<script language=javascript>alert('此用户名尚未注册');this.location.href='index.asp';</script>"
response.end
else
pass=rs("password")
if pass<>password then
response.write"<script language=javascript>alert('密码错误');this.location.href='javascript:history.go(-1)';</script>"
response.end
end if
session("user")=username
response.redirect"index.asp"
end if
rs.close
set rs=nothing
%>