![]() |
#2
gupiao1752010-12-22 22:33
|
原代码如下,各位哥哥姐姐们,帮帮小妹吧
<!--#include file="conn.asp"-->
<%
a=request.Form("yh")
b=request.Form("mm")
if a="" or b="" then
response.Write("<script language=javascript>alert('用户名和密码不能为空');history.go(-1);</script>")
end if
dim sql
sql="select * from dl where yh='"&a&"' and mm='"&b&"'"
rs.open sql,conn,3,1
if rs.eof then
response.Write "用户名和密码错误"
response.End
end if
response.Cookies("yonghu")=a
response.Cookies("pass")=b
response.Cookies("name")=true
response.Redirect("admin.asp")
rs.close
set rs=nothing
conn.close
set conn=nothing
%>