<!--#include file="conn.asp"-->
<!--自己修改下数据库连接
--><% dim admin_name,admin_pwd,admin_style,admin_id
admin_name=Replace(request.Form("txt_name"), "'", "''")
admin_pwd=Request.Form("txt_pwd")
admin_style=request.Form("shf")
if admin_name="" then
response.Write("<script language=javascript>alert('请输入登陆帐号!');history.go(-1)</script>")
response.end
end if
if Request("txt_pwd")="" then
response.Write("<script language=javascript>alert('请输入登陆密码!');history.go(-1)</script>")
response.end
end if
sql="select * from admin where admin_name='"&admin_name&"' and admin_pwd='"&admin_pwd&"'"
set rs=conn.execute(sql)
if rs.eof or rs.bof then
response.Write("<script language=javascript>alert('帐号密码错误!');history.go(-1)</script>")
response.End
end if
if admin_style=0 then
Response.Write("<script language=""JavaScript"">window.location.href='user.asp';</script>")
response.End()
end if
if admin_style=1 then
response.Write("<script language=""javascript"">window.location.href='admin.asp';</script>")
response.End()
end if
%>
温馨提示:答案为网友推荐,仅供参考