?? logmanage.asp
字號:
<%Admin="log"%>
<!--#include file="check.asp"-->
<!--#include file="mdb.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,Username,ErrorPas,LoginIP,logtime,OS,result from Log order by logtime desc"
rs.open sql,conn,1,1
rs.pagesize=20
for i=1 to rs.pagesize*(page-1)
if not rs.eof then
rs.movenext
end if
next
%>
<html>
<head>
<title>花香盈路管理系統</title>
<meta copy="程序制作：心窗 www.hx.net">
<link rel="stylesheet" href="inc/admin.css" type="text/css">
</head>
<body>
<form name=form method=post action="">
<script language="javascript">
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.name != 'chkall')
e.checked = form.chkall.checked;
}
}
function Isvalidity(val,name){
if (val.value!='' && (isNaN(val.value) || val.value<=0))
{alert(name+"應填有效數字！");
val.value="";
val.focus();}
}
</script>
<table align="center" width="98%" align="center" border="0" cellspacing="0" cellpadding="0" class=lanyubk style="border-collapse: collapse">
<tr class=lanyuss>
<th width="19%" height="25" align="center">
<b>
<font color="#FF0000">花香盈路管理系統</font> 登陸日志管理</b></th>
</tr>
<tr valign="middle" align="center">
<td height="2">
<table align="center" width="100%" align="center" border="1" cellspacing="0" cellpadding="4" class=lanyubk style="border-collapse: collapse">
<%
if rs.eof and rs.bof then
%>
<tr>
<td width="100%" align="center">暫時沒有登陸紀錄！</td>
</tr>
<%
response.end
end if
for i=1 to rs.pagesize
if rs.eof then exit for
if rs("result")="Error" then
%>
<tr>
<td height="20" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<font color="#FF0000">非法登錄--> </font>用戶名：<font color="#FF0000"><%=rs("Username")%></font> 密碼：<font color="#FF0000"><%=rs("ErrorPas")%> </font>登錄IP：<font color="#FF0000"><%=rs("LoginIP")%> </font>登錄日期：<%=rs("logtime")%><font color="#FF0000"> </font>操作系統：<font color="#FF0000"><%=rs("OS")%></font>
</td>
<td height="20">
<input type=checkbox Name=ID Value=<%=rs("ID")%>>
</td>
</tr>
<%
else
%>
<tr>
<td height="20" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
用戶名：<%=rs("Username")%> 登錄IP：<%=rs("LoginIP")%> 登錄日期：<%=rs("logtime")%> 操作系統：<%=rs("OS")%>
</td>
<td height="20">
<input type=checkbox Name=ID Value=<%=rs("ID")%>>
</td>
</tr>
<%
end if
rs.movenext
next
%>
<tr>
<td height=20 width="100%" colspan=4 align=right onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<input type=hidden value=DEL name=operation>
<input type="checkbox" name="chkall" onclick="CheckAll(this.form)" value="ON">選中所有
<input type=submit value=刪除 onclick="return Del()">
</td>
</tr>
<tr>
<td height=20 width="100%" colspan=4 onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<%
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 + -