📄 accdiary.asp

📁 用C++编写的人事管理系统
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% Response.Buffer =True  
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0  
Response.CacheControl = "no-cache"  
Response.AddHeader "Pragma", "No-Cache" %>
<!--#include file="conn.asp" -->

<%
if session("admin_id")=""then
 	response.write "<script language=JavaScript>{window.alert('对不起，您尚未登录或登录超时!');window.location.href='index.asp';}</script>"
  response.end 
  end if
   adminname=trim(request("adminname"))
   set rs=server.createobject("adodb.recordset")
   if adminname="" then
sql="select * from admin_login order by  logintime desc"
else 
sql="select * from admin_login where adminname like'%"&adminname&"%' order by  logintime desc"
end if
rs.open sql,conn,1,2
if rs.eof then
response.write("目录没有访问记录")
response.end
end if
rs.PageSize=20

pagecount=rs.PageCount 
page=int(request.QueryString ("page"))
if page<=0 then page=1
if request.QueryString("page")="" then page=1
rs.AbsolutePage=page 
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<STYLE type=text/css>
BODY {
	SCROLLBAR-FACE-COLOR: #c6ebde;
	MARGIN: 0px;
	FONT: 9pt 宋体;
	SCROLLBAR-HIGHLIGHT-COLOR: #ffffff;
	SCROLLBAR-SHADOW-COLOR: #39867b;
	SCROLLBAR-3DLIGHT-COLOR: #39867b;
	SCROLLBAR-ARROW-COLOR: #330000;
	SCROLLBAR-TRACK-COLOR: #e2f3f1;
	SCROLLBAR-DARKSHADOW-COLOR: #ffffff;
	TEXT-DECORATION: none;
	background-image: url(images/bg/bg2.gif);
}
TABLE {
	BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px
}
TD {
	FONT: 13px 宋体
}
IMG {
	BORDER-RIGHT: 0px; BORDER-TOP: 0px; VERTICAL-ALIGN: bottom; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px
}
A {
	FONT: 12px 宋体; COLOR: #000000; TEXT-DECORATION: none
}
A:hover {
	COLOR: #cc0000; TEXT-DECORATION: underline
}
.sec_menu {
	BORDER-RIGHT: white 1px solid; BACKGROUND: #c6ebde; OVERFLOW: hidden; BORDER-LEFT: white 1px solid; BORDER-BOTTOM: white 1px solid
}
.menu_title {
	
}
.menu_title SPAN {
	FONT-WEIGHT: bold; LEFT: 8px; COLOR: #39867b; POSITION: relative; TOP: 2px
}
.menu_title2 {
	
}
.menu_title2 SPAN {
	FONT-WEIGHT: bold; LEFT: 8px; COLOR: #cc0000; POSITION: relative; TOP: 2px
}

INPUT{BORDER-TOP-WIDTH: 1px; PADDING-RIGHT: 1px; PADDING-LEFT: 1px; BORDER-LEFT-WIDTH: 1px; FONT-SIZE: 9pt; BORDER-LEFT-COLOR: #cccccc; BORDER-BOTTOM-WIDTH: 1px; BORDER-BOTTOM-COLOR: #cccccc; PADDING-BOTTOM: 1px; BORDER-TOP-COLOR: #cccccc; PADDING-TOP: 1px; HEIGHT: 18px; BORDER-RIGHT-WIDTH: 1px; BORDER-RIGHT-COLOR: #cccccc}
select {border-width: 1; border-color: #000000; background-color: #ffffff; font-family: 宋体; font-size: 9pt; font-style: bold;}
OPTION {
	FONT-FAMILY: "宋体"; FONT-SIZE: 12px; TABLE-LAYOUT: fixed; WORD-BREAK: break-all
}
.style1 {
	color: #000000;
	font-weight: bold;
}
</STYLE>
<style type="text/css">
<!--
tr {background-color:expression((this.sectionRowIndex%2==0)?"#FF9999":"#FFCCCC")}
-->
</style>

</head>

<body>
<p align="center"><span style="color: #FF0000"><br>
当前为：管理员操作日记</span>　(<a href="accdiary_jg.asp">教工登录日记</a>　<a href="accdiary_updjg.asp">教工资料修改日记</a>　<span style="color: #FF0000"><a href="accdiary_deljg.asp">教工记录删除日记</a></span></p>
<form name="form1">
  <div align="center">
    <table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td><div align="center" style="font-size: 12px">共<%=rs.recordcount%>条记录,每页显示<%=rs.pagesize%>条
               
        ，第<%=page%>/<%=rs.pagecount%>页
  &nbsp;
                    <%if page>1 then%>
                    <a Href="accdiary.asp?Page=<% = 1%>">首页</a> <a Href="accdiary.asp?Page=<% =page -1 %>">上一页</a>
                    <%end if %>
                    <%if page<>rs.pagecount then %>
                    <a Href="accdiary.asp?Page=<% =page + 1%>">下一页</a> <a Href="accdiary.asp?Page=<% = rs.PageCount%>">尾页</a>
                    <% end if %>
                    <select name="select" id="select" onChange="javascript:window.location.href('accdiary.asp?page='+this.options[this.selectedIndex].value+'')">
                      <% for i=1 to rs.pagecount%>
                      <option value="<%=i%>" <%if i=page then response.Write("selected") end if%> ><%=i%> </option>
                      <% next%>
                    </select>      </div></td>
      </tr>
    </table>
  </div>
</form>
<form name="form2" method="post" action="accdiary.asp">
  <div align="center">
    <select name="monthadmin" size="1" class="put" id="select14">
      <%for i=1 to DateDiff("m",#5/1/2005#,date) %>
      <option value="<%=i%>">清除<%=i%>个月以前的管理员访问记录</option>
      <%next%>
    </select>
    <input type="button" name="Submit3" value="清除所选范围的访问记录" onClick="subyiqian()">    
    <input type="button" name="Submit2" value="清空所有管理员的操作日记" onClick="suball()">
    <input name="del" type="hidden" id="del">
  管理员姓名
  <input name="adminname" type="text" id="adminname" size="7">
  <input type="submit" name="Submit4" value="查询">
  </div>
</form>
<form name="form1" method="post" action="accdiarydel.asp">
  <table width="97%" border="1" align="center" cellpadding="3" cellspacing="0" bordercolor="#FFFFFF" bgcolor="#FFCCCC">
    <tr bgcolor="#FF9999">
      <td width="37" height="31">全选
      <input type=checkbox onClick="this.value=check(this.form.seljgid)" value="全选"></td>
      <td width="70">管理员用户名</td>
      <td width="77">管理员姓名</td>
      <td width="157">时间</td>
      <td width="115" bgcolor="#FF9999">访问IP</td>
      <td width="275">客户端信息</td>
    </tr>
	<% for i=1 to rs.pagesize 
	if rs.eof then
	exit for
	end if %>
    <tr>
      <td><input name="seljgid" type="checkbox" id="seljgid" value="<%=rs("id")%>"> </td>
      <td><%=rs("adminlogin")%></td>
      <td><%=rs("adminname")%></td>
      <td><%=rs("logintime")%></td>
      <td><span style="font-size: 12px"><%=rs("loginip")%></span></td>
      <td><span style="font-size: 12px"><%=rs("os")%></span></td>
    </tr>
	<% rs.movenext
	next %>
  </table>
  <div align="center">    <table width="97%" height="23" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td><div align="center" style="font-size: 12px">共<%=rs.recordcount%>条记录,每页显示<%=rs.pagesize%>条 ，第<%=page%>/<%=rs.pagecount%>页 &nbsp;
        <%if page>1 then%>
        <a Href="accdiary.asp?Page=<% = 1%>">首页</a> <a Href="accdiary.asp?Page=<% =page -1 %>">上一页</a>
        <%end if %>
        <%if page<>rs.pagecount then %>
        <a Href="accdiary.asp?Page=<% =page + 1%>">下一页</a> <a Href="accdiary.asp?Page=<% = rs.PageCount%>">尾页</a>
        <% end if %>
        <select name="select2" id="select2" onChange="javascript:window.location.href('accdiary.asp?page='+this.options[this.selectedIndex].value+'')">
          <% for i=1 to rs.pagecount%>
          <option value="<%=i%>" <%if i=page then response.Write("selected") end if%> ><%=i%> </option>
          <% next%>
        </select>
</div></td>
      </tr>
    </table>
    <br>
    全选/不选
    <input type=checkbox onClick="this.value=check(this.form.seljgid)" value="全选">
    　 
    <input type="submit" name="Submit" value="清除所选的管理员访问记录"onClick="return confirm('真的要清除所选的管理员访问记录？该操作不可恢复！继续吗？')">
    <input name="del" type="hidden" id="del" value="delsel">
</div>
</form>
</body>
</html>
<script language="javascript">

function suball()
{
  if (window.confirm('真的要清空所有管理操作日记吗？该操作不可恢复！继续吗？'))
     {
	  form2.action="accdiarydel.asp"; 
    form2.del.value="delsel_admin_all";
   form2.submit();
     }
    else
     {
       return;//取消提交表单操作
     }
}
//
function subyiqian()
{
if (window.confirm('真的要清空所选范围的访问日记吗？该操作不可恢复！继续吗？'))
     {
	form2.action="accdiarydel.asp"; 
form2.del.value="delsel_admin_yiqian";
form2.submit();
     }
    else
     {
       return;//取消提交表单操作
     }

}
  </script>
 <SCRIPT LANGUAGE="JavaScript">

<!-- 
var checkflag = "false";
function check(field) {
if (checkflag == "false") {
for (i = 0; i < field.length; i++) {
field[i].checked = true;}
checkflag = "true";
return "false"; }
else {
for (i = 0; i < field.length; i++) {
field[i].checked = false; }
checkflag = "false";
return "true"; }
}
 -->
</script>
💿 文件大小 1315 K
👤 上传用户 zzxt
📂 所属分类企业管理
🏷️ 相关标签

#编写 #管理系统
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -