<%
username=Request.Cookies("esung")("username")
password=Request.Cookies("esung")("password")
set rs1=server.createobject("adodb.recordset")
sql="select * from member where username='" &username& "'  "
 rs1.open sql,conn,1,1
if  rs1.eof then
response.write"<script language='javascript'>alert('用户名密码错误！')</script>"
response.write "<script language='javascript'>history.back(-1)</script>"
response.end
end if
if password<>rs1("password") then
response.write"<script language='javascript'>alert('用户名密码错误！')</script>"
response.write "<script language='javascript'>history.back(-1)</script>"
response.end
end if

 if rs1("manbid")<>20000 then
response.write"<script language='javascript'>alert('你不是论坛管理员！')</script>"
response.write "<script language='javascript'>history.back(-1)</script>"
response.end 
end if
%>