时间:2021-05-28
复制代码 代码如下:
<%
'//hittime 日期型:获得上次访问时间
'//hits 数字型:获得总浏览量
'//hitsday 数字型:获得今天浏览量
'//hitsweeks 数字型:获得本周浏览量
'//hitmonths 数字型:获得本月浏览量
'数据库中 添加这5个字段。
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from qwbmnewssss where id=26",conn,1,3
if rs1.eof and rs1.bof then
response.write "erry"
else
hittime = rs1("hittime") '获得上次访问时间
dim dayNow,monthNow,weeknow
dayNow = day(date()) '现在几号
monthNow = month(date()) '现在几月
weekNow = weekday(date()) '现在星期几 0为星期天
rs1("hits") = rs1("hits") + 1 '总浏览次数 + 1
if datediff("d",hittime,now()) = 0 then '比较最后访问日期与现在的时间 天数
rs1("hitsday") = rs1("hitsday") + 1 '今天的浏览量 + 1
else
rs1("hitsday") = 1 '今天的浏览量 = 1
end if
if monthNow = month(hittime) then
rs1("hitmonths") = rs1("hitmonths") + 1 '本月的浏览量 + 1
else
rs1("hitmonths") = 1 '本月的浏览量 + 1
end if
if datediff("d",hittime,now()) > 6 then '在处理星期的期的时候有一个问题,如果上一个时间是星期五,下一次访问是下个星期的星期二,记录还是叠加。
rs1("hitsweeks") = 1
else
if weekNow <> 1 then
rs1("hitsweeks") = rs1("hitsweeks") + 1
else
weekNowss = weekday(hittime) '上次访问的星期几
if weekNow = weekNowss then
rs1("hitsweeks") = rs1("hitsweeks") + 1
else
rs1("hitsweeks") = 1
end if
end if
end if
rs1("hittime") = now() '更新最后的访问题意
rs1.update
%>
时间比较:<%=datediff("d",hittime,now())%><br />
当前时间:<%=now()%><br />
最后点击时间:<%=hittime%><br />
当前天:<%=dayNow%><br />
当前月:<%=monthNow%><br />
当前周:<%=weekNow%><br />
总共浏览量:<%=rs1("hits")%><br />
今天访问量:<%=rs1("hitsday")%><br />
星期访问量:<%=rs1("hitsweeks")%><br />
当月访问量:<%=rs1("hitmonths")%><br />
<%
end if
rs1.close
set rs1=nothing
%>
声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。
网站访问量和信息发布量。网站访问量包括独立用户访问总量和网站总访问量,独立用户访问总量是指本年度访问网站的用户总数(UV),同一用户每日多次访问不重复计算,只计
可以实现在线人数统计,日访问量统计,月访问量统计。。。。。
静态页面staticHtml.html复制代码代码如下:统计动态页面访问量的几种方法这是在层中显示累加页面AddNumber.aspxAddNumber.asp
写了个shell脚本,可以用来统计每天的访问日志,并发送到电子邮箱,方便每天了解网站情况。脚本统计了:1、总访问量2、总带宽3、独立访客量4、访问IP统计5、访
下面的脚本能统计出网站的总访问量,以及404,500出现的次数。统计出来后,我们可以结合监控宝来进行记录,进而可以看出网站访问量是否异常,是否存在攻击,一目了然