📄 listcount.asp
字号:
<%@ language=vbscript%>
<%response.buffer=true%>
<!--#include file=conn.asp-->
<%id=trim(request.querystring("id"))
if id="" then response.end
oldid=id
id=replace(id,"'","''")
sql="select userinfo.webname,userinfo.url,userinfo.kindname,userinfo.totalcount,months.m"&day(date())&" as todayno from userinfo inner join months on months.admin=userinfo.admin where userinfo.admin='"&id&"'"
set countcon=server.createobject("adodb.connection")
countcon.open conn
set list_userinfo=countcon.execute(sql)
if list_userinfo.eof and list_userinfo.bof then
list_userinfo.close
set list_userinfo=nothing
countcon.close
set countcon=nothing
end if%>
<head>
<title></title>
</head>
<body bgcolor="#B2AAA6">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="654" style="font-size: 9pt">
<tr>
<!-- Shim row, height 1. -->
<td><img src="shim.gif" width="39" height="1" border="0"></td>
<td><img src="shim.gif" width="33" height="1" border="0"></td>
<td><img src="shim.gif" width="31" height="1" border="0"></td>
<td><img src="shim.gif" width="30" height="1" border="0"></td>
<td><img src="shim.gif" width="15" height="1" border="0"></td>
<td><img src="shim.gif" width="162" height="1" border="0"></td>
<td><img src="shim.gif" width="318" height="1" border="0"></td>
<td><img src="shim.gif" width="13" height="1" border="0"></td>
<td><img src="shim.gif" width="13" height="1" border="0"></td>
<td><img src="shim.gif" width="1" height="1" border="0"></td>
</tr>
<tr>
<!-- row 1 -->
<td rowspan="2" colspan="6"><img src="img/top.gif" border="0"></td>
<td colspan="2" BACKGROUND="img/namebg.gif"> </td>
<td rowspan="2"><img src="img/edge3.gif" width="13" height="56" border="0"></td>
<td><img src="shim.gif" width="1" height="26" border="0"></td>
</tr>
<tr>
<!-- row 2 -->
<td colspan="2"><img src="img/topbot.gif" border="0" width="331" height="30"></td>
<td><img src="shim.gif" width="1" height="30" border="0"></td>
</tr>
<tr>
<!-- row 3 -->
<td rowspan="8"><img src="img/ileft.gif" width="39" height="262" border="0"></td>
<td rowspan="2"><img src="img/edge1.gif" width="33" height="38" border="0"></td>
<td rowspan="2" BACKGROUND="img/mailbg.gif"> </td>
<td rowspan="2" BACKGROUND="img/questionbg.gif"> </td>
<td rowspan="2"><img src="img/edge2.gif" width="15" height="38" border="0"></td>
<td colspan="2"><img src="img/shadow.gif" width="480" height="22" border="0"></td>
<td colspan="2" VALIGN="top"><img src="img/rtop.gif" width="26" height="22" border="0"></td>
<td><img src="shim.gif" width="1" height="22" border="0"></td>
</tr>
<tr>
<!-- row 4 -->
<td rowspan="8" colspan="2" VALIGN="top" BGCOLOR="#ffffff">
<table border="0" cellpadding="3" cellspacing="1" width="100%" height="103" style="font-size: 9pt" bgcolor="#7A727E">
<tr>
<td width="100%" height="5" colspan="5" bgcolor="#FFFFFF">
<p align="center">网站:<a href="<%response.write list_userinfo("url")%>"><%response.write list_userinfo("webname")%></a> 站长:<%response.write oldid%> <br>[<a href="listcount.asp?id=<%response.write oldid%>">整体统计</a>][<a href="list.asp?id=<%response.write oldid%>">本月统计</a>][<a href="list2.asp?id=<%response.write oldid%>">本年度统计</a>]
</td>
</tr>
<%
sql="select ip,llq,system,visittime,froms from ip where admin='"&id&"' order by visittime desc"
set list_ip=countcon.execute(sql)
%>
<tr>
<td width="100%" height="11" colspan="5" bgcolor="#FFFFFF">
<p align="center">本日共:<%response.write list_userinfo("todayno")%> 共计:<%response.write list_userinfo("totalcount")
list_userinfo.close
set list_userinfo=nothing %> 最后15个访问情况</td>
</tr>
<tr>
<td width="20%" height="12" align="center" bgcolor="#FFFFFF">ip</td>
<td width="19%" height="12" align="center" bgcolor="#FFFFFF">访问时间</td>
<td width="35%" height="12" align="center" bgcolor="#FFFFFF">访问的页面</td>
<td width="15%" height="12" align="center" bgcolor="#FFFFFF">操作系统</td>
<td width="15%" height="12" align="center" bgcolor="#FFFFFF">浏览器</td>
</tr>
<%do while not list_ip.eof and ii<15%>
<tr>
<td width="20%" height="19" align="center" bgcolor="#FFFFFF"><%response.write list_ip("ip")%></td>
<td width="19%" height="19" align="center" bgcolor="#FFFFFF"><%response.write list_ip("visittime")%>
</td>
<td width="30%" height="19" align="center" bgcolor="#FFFFFF"><%froms=list_ip("froms")
froms=replace(froms,"http://","")
if len(froms)>33 then
froms=left(froms,33)&"<br>"&right(froms,len(froms)-33)
end if
response.write froms%></td>
<td width="15%" height="19" align="center" bgcolor="#FFFFFF"><%response.write list_ip("system")%></td>
<td width="15%" height="19" align="center" bgcolor="#FFFFFF"><%response.write list_ip("llq")%></td>
</tr>
<%list_ip.movenext
ii=ii+1
loop%>
</table>
</td>
<td rowspan="8" colspan="2" VALIGN="top" BACKGROUND="img/rmidbg.gif"><img src="img/rmid.gif" width="26" height="370" border="0"></td>
<td><img src="shim.gif" width="1" height="16" border="0"></td>
</tr>
<tr>
<!-- row 5 -->
<td colspan="4"><img src="img/itop.gif" border="0" width="109" height="64"></td>
<td><img src="shim.gif" width="1" height="64" border="0"></td>
</tr>
<tr>
<!-- row 6 -->
<td colspan="4" background="img/b1.gif" align="center"><font color="#FFFFFF"><a style="cursor: hand" onclick="jscript:window.location='<%response.write yoururl%>'">首
页</a></font></td>
<td><img src="shim.gif" width="1" height="27" border="0"></td>
</tr>
<tr>
<!-- row 7 -->
<td colspan="4" background="img/b2.gif" align="center" valign="top"><font color="#FFFFFF"><br>
<a onclick="jscript:window.location='reg.htm'" style="cursor:hand">免费申请</a></font></td>
<td><img src="shim.gif" width="1" height="31" border="0"></td>
</tr>
<tr>
<!-- row 8 -->
<td colspan="4" background="img/b3.gif" align="center" valign="top"><font color="#FFFFFF"><br>
<a onclick="jscript:window.location='list_ph.asp?id=<%response.write server.urlencode(oldid)%>'" style="cursor:hand">网站排行</a></font></td>
<td><img src="shim.gif" width="1" height="31" border="0"></td>
</tr>
<tr>
<!-- row 9 -->
<td colspan="4" background="img/b4.gif" align="center" valign="top"><font color="#FFFFFF"><br>
<a onclick="jscript:window.location='log.htm'" style="cursor:hand">修改资料</a></font></td>
<td><img src="shim.gif" width="1" height="32" border="0"></td>
</tr>
<tr>
<!-- row 10 -->
<td colspan="4"><img src="img/aftw.gif" border="0" width="109" height="39"></a></td>
<td><img src="shim.gif" width="1" height="39" border="0"></td>
</tr>
<tr>
<!-- row 11 -->
<td colspan="5" BACKGROUND="img/left.gif" VALIGN="top" HEIGHT="450">
<p ALIGN="center"><br>
</td>
<td><img src="shim.gif" width="1" height="130" border="0"></td>
</tr>
<tr>
<!-- row 12 -->
<td colspan="5"><img src="img/bot1.gif" width="148" height="20" border="0"></td>
<td colspan="2"><img src="img/bot2.gif" width="480" height="20" border="0"></td>
<td colspan="2"><img src="img/bot3.gif" width="26" height="20" border="0"></td>
<td><img src="shim.gif" width="1" height="20" border="0"></td>
</tr>
</table>
</center>
</div>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -