index.asp 枫的记忆个人主页程序源码程序 - ASP源码程序

www.gusucode.com > 枫的记忆个人主页程序源码程序 > downcode.com\fengdejiyizh\admin\index.asp
    <!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
  hidden=trim(request("hidden"))
  login_name=trim(request("login_name"))
  password=md5(trim(request("password")))
  if hidden="ok" then

    set Rs=server.createobject("adodb.recordset")
    sql_str="select * from admin where login_name='"&login_name&"'"
    Rs.Open sql_str,Conn,1,3
    if rs.EOF then
        Response.Write("<script language=javascript>alert('系统提示：\n用户名不存在或密码有误！');history.back()</script>")
	Response.End
    else
		pw=rs.Fields("password")
    
    	          if password=pw then
		  true_name=rs.Fields("true_name")
		  level=rs.Fields("level")
		  login_times=rs.Fields("login_times")+1
		  last_login_time=rs.Fields("last_login_time")

		  set Rs=server.CreateObject("adodb.recordset")
		  sql_str="update admin set login_times="&login_times&",last_login_time=now() where login_name='"&login_name&"'"
		  Rs.Open sql_str,Conn,1,3
		  session("logined")="ok"
		  session("login_name")=login_name
		  session("true_name")=true_name
		  session("level")=level
		  session("login_times")=login_times
		  session("last_login_time")=last_login_time

		  response.Redirect("menu.asp")
		else
			Response.Write("<script language=javascript>alert('系统提示：\n用户名不存在或密码有误！');history.back()</script>")
			Response.End
		end if    
    end if  
  end if
%>
<head>
<title>≮‖〓 <%=web_name%> 〓‖≯后台管理中心</title>
<link href="admin.css" rel="stylesheet" type="text/css">
<script language="javascript">
<!--
  function check(){
    if(document.login.login_name.value.length<=0){
      alert("系统提示：\n请输入用户名");
      document.login.login_name.focus()
      return false;
    }
    if(document.login.password.value.length<=0){
      alert("系统提示：\n请输入密码");
      document.login.password.focus()
      return false;
    }    
  }
//-->
</script>
</head>
<body bgcolor="#CDD5DE">
<br>
<br>
<table border="0" width="30%" cellspacing="1" align="center" class="tablebody"  cellpadding="0">
  <tr>
    <th>管　理　中　心</th>
  </tr>
  <tr>
    <td width="100%">
        <table border="0" width="100%" cellspacing="6" bgcolor="ffffff">
       <form action="index.asp" method="post" name="login" language="javascript" onsubmit="return check()" target="_parent">
	     <input type="hidden" name="hidden" value="ok">
          <tr> 
            <td align="center" height=30><br>用户名：<input style="FONT-SIZE: 12px; WIDTH: 120px" type="text" name="login_name" size="40"></td>
          </tr>
          <tr> 
            <td align="center" height=30>密　码：<input style="FONT-SIZE: 12px; WIDTH: 120px" type="password" name="password" size="30"></td>
          </tr>
          <tr> 
            <td height="30"><div align="center"> 
                <input name=submit1 type=submit id="submit" value=登　陆>　　<input name=submit2 type=reset value=重　置>
              </div><br></td>
        </form>
          </tr>
        </table>
    </td>
  </tr>
</table>
<table width="30%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="30" align=center valign=bottom>　</td>
  </tr>
</table>
</body>