?? src_3.asp
字號:
<!--#include file="conn.asp" -->
<%
if chk_userlogin<>True then
call msgbox_j("請先登陸","self.close()")
Response.end
end if
%>
<link rel="stylesheet" href="images/css.css" type="text/css">
<table border="0" align="center" width="612">
<tr>
<td valign="top">
<div align="right"><br>
</div>
<table width="100%" border="0" cellspacing="5" cellpadding="5">
<tr>
<td bgcolor="#0086C6" class="t1"><b><font color="#FFFFFF">• 用戶操作紀錄</font></b></td>
</tr>
<tr>
<td bgcolor="#CAEEFF">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<%
'////限制紀錄條數/////參數:site_log_max///
conn.execute("delete from 操作紀錄 where 用戶='"&session("username")&"' and id not in(select top "&site_log_max&" id from 操作紀錄 order by id desc)")
'////限制紀錄條數////
set rs=server.createobject("adodb.recordset")
sql="select * from 操作紀錄 where 用戶='"&session("username")&"' or 事件='系統日志' order by id desc"
rs.open sql,conn,1,1
if not rs.eof then
'///////////////////開始分頁代碼//////////////////////////////////
cardnumber=rs.recordcount
if Rq("page")="" then page="1" else page=Rq("page") end if
PageSize = 20
rs.PageSize = PageSize
pgnum=rs.Pagecount
if page="" or clng(page)<1 then page=1
if clng(page) > pgnum then page=pgnum
if pgnum>0 then rs.AbsolutePage=page
'///////////////////結束分頁代碼//////////////////////////////////
count=1
do while not rs.eof and count-1<rs.PageSize%>
<tr>
<td> <%=rs("事件")%></td>
<td><%=rs("內容")%></td>
<td>
<div align="right">操作時間:<%=rs("時間")%></div>
</td>
</tr>
<tr>
<td colspan="3" height="1" background="images/line.gif"></td>
</tr>
<%count=count+1
rs.movenext
loop
rs.close
set rs=nothing
showpag=True
else
Rw "暫無"
end if%>
</table>
</td>
</tr>
</table>
<div align="right">
<table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="31"><img src="images/!.gif" width="14" height="14" align="absmiddle">
系統自動保留<b><%=site_clear_log%></b>天內的<b><%=site_log_max%></b>條日志</td>
<%if showpag=True then%>
<td height="31">
<div align="right">共<b><%=cardnumber%></b>條紀錄 共<b><%=pgnum%></b>頁 當前第<b><%=page%></b>頁
<%if cint(page)<>1 then%>
<a href="?page=1<%=urlstr%>">首頁</a> <a href="?page=<%=page-1%><%=urlstr%>">上一頁</a>
<%end if
if cint(page)<>cint(pgnum) then%>
<a href="?page=<%=page+1%><%=urlstr%>">下一頁</a> <a href="?page=<%=pgnum%><%=urlstr%>">尾頁</a>
<%end if%>
</div>
</td>
<%end if%>
</tr>
</table>
<br>
</div>
</td>
</tr>
</table>
<%cleartimeout_user
connclose%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -