<% if request("act")="out" then session.Abandon() response.redirect "index.asp" end if if session("admin")="true" then response.write "


登陆成功   退出系统" else if request("act")="do" then sql="select * from admin where name='"&request("name")&"' and psw='"&cstr(md5(trim(request("psw"))))&"'" rs.open sql,conn,1,1 if rs.eof then session("admin")="false" response.write "您输入的管理员名或密码有误,重新登陆" else session("aid")=rs("aid") session("admin")="true" session("name")=rs("name") session("gid")=rs("gid") if rs("gid")<0 then session("gname")="超级管理员" elseif rs("gid")=1 then session("gname")="管理员" end if response.write "


登陆成功   退出系统" end if rs.close else %>
用户名:
密 码:
    
<% end if end if %>
 
     
Copyright © 2010-<%=year(now())%>