📄 logmanage.asp
字号:
<!--#INCLUDE FILE="checklogin1.asp" -->
<!--#INCLUDE FILE="theme.asp" -->
<%
if request.form("operation")="DEL" then
num=request.form("ID").Count
for i=1 to num
conn.execute("delete from Log where ID="&request.form("ID")(i))
next
end if
page=request.querystring("page")
if page<=1 or page="" then page=1
set rs=server.createobject("adodb.recordset")
sql="select ID,User,ErrorPas,LoginIP,Date,OS,result from Log order by Date desc"
rs.open sql,conn,1,1
rs.pagesize=15
for i=1 to rs.pagesize*(page-1)
if not rs.eof then
rs.movenext
end if
next
%>
<html>
<head>
<title>登陆信息</title>
<link href="include/site.css" type="text/css" rel="stylesheet">
</head>
<SCRIPT LANGUAGE='JavaScript' SRC='script/jsfun.js' TYPE='text/javascript'></script>
<body>
<form name=form method=post action="">
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="<%=tablebordercolor%>">
<tr bgcolor="<%=tabletitlecolor%>">
<td colspan="3" width="100%" height="25">
<!--#include file = topMenu.htm--></td>
</tr>
<tr bgcolor="<%=tabletitlecolor%>" valign="middle" align="center">
<td height="2" colspan="3">
<table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="<%=tablebordercolor%>">
<%
if rs.eof and rs.bof then
%>
<tr>
<td width="100%" align="center" height="40"><font color=#ffffff>暂时没有任何登陆信息</font></td>
</tr>
<%
response.end
end if
for i=1 to rs.pagesize
if rs.eof then exit for
if rs("result")="Error" then
%>
<tr bgcolor="<%=tabletitlecolor%>">
<td bgcolor=#ffffff height="20" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<font color="#FF0000">非法登录--> </font>用户名：<font color="#FF0000"><%=rs("User")%></font> 密码：<font color="#FF0000"><%=rs("ErrorPas")%> </font>登录IP：<font color="#FF0000"><%=rs("LoginIP")%> </font>登录日期：<%=rs("Date")%><font color="#FF0000"> </font>操作系统：<font color="#FF0000"><%=rs("OS")%></font>
</td>
<td height="20" bgcolor=#ffffff>
<input type=checkbox Name=ID Value=<%=rs("ID")%>>
</td>
</tr>
<%
else
%>
<tr bgcolor="<%=tabletitlecolor%>">
<td height="20"bgcolor=#ffffff onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
用户名：<%=rs("User")%> 登录IP：<%=rs("LoginIP")%> 登录日期：<%=rs("Date")%> 操作系统：<%=rs("OS")%>
</td>
<td height="20" bgcolor=#ffffff>
<input type=checkbox Name=ID Value=<%=rs("ID")%>>
</td>
</tr>
<%
end if
rs.movenext
next
%>
<tr bgcolor="#FFFFFF">
<td width="100%" height=20 colspan=4 align=right onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>
<input type=hidden value=DEL name=operation>
<input type="checkbox" name="chkall" onclick="CheckAll(this.form)">选中所有
<input type=submit value=删除 onclick="return Del()">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="100%" height=20 colspan=4 onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>
<%
for i=1 to rs.PageCount
response.write("第<a href=LogManage.asp?Page="&i&"><b> "&i&" </a></b>页")
next
rs.close
%>
</td>
</tr>
</table>
</td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -