adminlogin.asp

问吧程序 问吧程序 问吧程序 问吧程序

<!--#include file=conn.asp-->
<title>管理员登陆</title>
<link href=../style.css rel=stylesheet type=text/css>
<style type="text/css">
<!--
body {
	background-color: #99CC00;
}
.style6 {
	color: #000000;
	font-weight: bold;
}
-->
</style>
<table width="100%" height="225"  border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td height="225">&nbsp;</td>
  </tr>
</table>
<%if request("submit")="登陆" then
if request("adminname")="" then
response.write"<div align=center>帐号不能为空!<a href=javascript:history.back()>返回</a></div>"
response.End()
elseif request("adminpwd")="" then
response.write"<div align=center>密码不能为空!<a href=javascript:history.back()>返回</a></div>"
response.End()
else
adminname=request("adminname")
adminpwd=request("adminpwd")
rs.open"select * from admin where adminname='"&adminname&"' and adminpwd='"&adminpwd&"'",conn,1,1
if rs.eof then
rs.close
response.write"<div align=center>帐号或密码错误!<a href=javascript:history.back()>返回</a></div>"
response.End()
else
rs.close
session("admin")=adminname
response.write"<div align=center>管理员登陆成功!<meta http-equiv=refresh content='1;url=adminmain.asp'></div>"
response.End()
end if
end if
end if
%>
<form method=post action=adminlogin.asp>
<table width="50%" height="88"  border="0" align="center" cellpadding="0" cellspacing="1" bgcolor=eeeeee>
  <tr>
    <td height="33" bgcolor="#99CC00" class="style6">管理员登陆</td>
  </tr>
  <tr>
    <td align="center" bgcolor="#99CC00"><p>帐号：
        <input name="adminname" type="text" id="adminname" size="12">
*    </p>
    <p>密码：
      <input name="adminpwd" type="password" id="adminpwd" size="12"> 
      *</p>
    <p>
      <input type="submit" name="Submit" value="登陆"> 
      <input type="reset" name="Submit" value="重写"> 
        </p></td>
  </tr>
</table>
</form>