📄 user_online.asp
字号:
<!--#include file="admin.asp" -->
<!--#include file="function.asp" -->
<%
sql="select * from online order by lastimebk Desc"
rs.open sql,conn,1,1
pagesetup=20 '设定每页的显示数量
rs.pagesize=pagesetup
TotalPage=rs.pagecount '总页数
PageCount = cint(Request.QueryString("ToPage"))
if PageCount <1 then PageCount = 1
if PageCount > TotalPage then PageCount = TotalPage
if TotalPage>0 then rs.absolutepage=PageCount '跳转到指定页数
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>查看在线用户</title>
<LINK href="../css/admin.css" type=text/css rel=stylesheet>
<script language=javascript src="inc/select.js"></script>
</head>
<body>
<table width="98%" border=0 align="center" cellpadding=4 cellspacing=1 class="a2">
<tr bgcolor="#f0f0f0" class="a1" height=25>
<td align="center">用户</td>
<td align="center">访问时间</td>
<td align="center">活动时间</td>
<td align="center">用户IP</td>
<td align="center">操作系统</td>
<td align="center">浏览器</td>
</tr>
<%
j=0
i=0
Do While Not RS.EOF and i<pagesetup
if j mod 2 = 0 then
a="a3"
else
a="a4"
end if
i=i+1
%>
<tr class="<%=a%>">
<td align="center"><%if rs("UserName")<>"游客" then%><a onMouseOver="showmenu(event,'<div class=menuitems><a href=user_admin.asp?menu=user2&username=<%=rs("username")%>>查看资料</a></div><div class=menuitems><a href=../view.asp?username=<%=rs("username")%> target=_blank>浏览网站</a></div><div class=menuitems><a href=message_admin.asp?menu=addmsg&touser=<%=rs("username")%>>发送短信</a></div><div class=menuitems><a href=../gbook/index.asp?username=<%=rs("username")%> target=_blank>查看留言</a></div><div class=menuitems><a href=user_filemanage.asp?username=<%=rs("username")%> target=_blank>管理文件</a></div>')" style=cursor:hand>
<%=rs("username")%></A><%
else
Response.Write("访客")
end if%></td>
<td align="center"><%=rs("startime")%></td>
<td align="center"><%=rs("lastimebk")%></td>
<td align="center"><%= rs("ip") %></td>
<td align="center"><%=system(rs("browser"))%></td>
<td align="center"><%=browser(rs("browser"))%></td>
</tr>
<%
j=j+1
rs.movenext
loop
%>
<tr bgcolor="#FFFFFF">
<td height="20" colspan="6" class="a4">[<b>共有 <font color="990000"><%=TotalPage%></font> 页
<script>
ShowPage(<%=TotalPage%>,<%=PageCount%>,"")
</script>
</b>]
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -