asp统计信息实现代码/文章每日、每周、每月、总访问量的方法

代码如下:

<%
'//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
%>

(0)

相关推荐

  • 统计有多少行JS代码和ASP代码

    计算当前文件夹中,有多少行JS代码和ASP代码,并且还可统计代码有多少字节有示例代码 复制代码 代码如下: <% '\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ '\\ '\\    来自 codeproject.com '\\    计算js和asp代码 '\\    修改 bluedestiny '\\    mail:bluedestiny at 126.com '\\ '\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

  • 简单的ASP统计制作实例

    我做了一个网站,当然啦,跟大家一样,也摆了个计数器在上面,每天看计数器都在不断的翻,心里很高兴,不过后来我又想,到底是谁看了我的网站啊?是新朋友还是老朋友啊?也不知他们来了多少次,我还想给他们都编上号,于是我申请了 免费统计,不过一连换了N个都不满意,唉,看来,只有自己动手才能丰衣足食了,说干就干,还望高手笑话之于,不访指教. 我以ACCESS库为例子,其实用SQL SERVER库也只要改一下链接库的语句就得啦, 库结构如下 库文件名: CONT.ASP 本来是CONT.MDB但在建好后把扩展名

  • asp论坛在线人数统计研究

    1.建立数据库表   表名为online    设如下字段   id '用来记录每一个访问都的session.sessionid   name '如果是访客,则记录为访客.   online  '如果是访各为0 如果是会员1    datetime '最近活动时间   username '会员的登录用户名,访客为空.   ip '记录访问都的登录IP head.asp '向数据库表写入在线人数,该页面必须搜入到每一个用于浏览ASP页面中. <% set rs=Server.CreateObjec

  • php模仿asp Application对象在线人数统计实现方法

    本文实例讲述了php模仿asp Application对象在线人数统计实现方法.分享给大家供大家参考.具体实现方法如下: 复制代码 代码如下: /* 用法: application('key','value'); //设置 key=value $value = application('key'); //获取 key的值 */   function application() {  $args = func_get_args(); //获取输入参数  if (count($args) >2 ||

  • ASP.NET中使用Application对象实现简单在线人数统计功能

    注:最近在复习ASP.NET,为了加深印象,会制作一些小的demo程序,分享给大家. 1 新建ASP.NET网站,编辑Global.asax文件,修改后的文件内容如下所示. <%@ Application Language="C#" %> <script runat="server"> void Application_Start(object sender, EventArgs e) { // 在应用程序启动时运行的代码 Applicati

  • ASP制作在线人数统计实例

    我们先新建一个ACCESS数据库 内容为 表名:zai 字段为 1.ip 2.time 建立一个文件为index.asp 然后就如下程序! <% '===================================================================================================''******************** 冰翎在线人数统计程序 V2.0 ******************************'' 本站程序由

  • ASP访问数量统计代码

    1.建立数据库表 表名为online 设如下字段 id '用来记录每一个访问都的session.sessionid name '如果是访客,则记录为访客. online '如果是访各为0 如果是会员1 datetime '最近活动时间 username '会员的登录用户名,访客为空. ip '记录访问都的登录IP head.asp '向数据库表写入在线人数,该页面必须搜入到每一个用于浏览ASP页面中. <% set rs=Server.CreateObject("ADODB.Records

  • ASP.NET 统计图表控件小结

    1.OWC11 这个控件全称是:Office Web Component 11,是office2003中的一个组件,可惜的是office2007中没有了它的身影.不过安装office2003之后可以引用,然后使用.使用过的人都知道,就是它的效果要差一点. 2.dotnetCharting http://www.dotnetcharting.com/ dotnetcharting是国外的一个产品,是要收费的.具体还没有使用,后面在我尝试之后,我会添加一些使用范例.大家也可以上网搜索一下,很多的列子

  • ASP程序代码执行时间统计类

    第一次写ASP类,实现功能:分段统计程序执行时间,输出统计表等. 复制代码 代码如下: Class ccClsProcessTimeRecorder '程序作者:明月星光 '作者主页:http://www.5iya.com/blog 'http://www.kuozhanming.com 'ASP程序代码执行时间统计类 Private ccInti,ccIntNonceTime,ccIntDecimal   Private ccIntStartTime,ccIntEndTime,ccIntNow

  • asp统计信息实现代码/文章每日、每周、每月、总访问量的方法

    复制代码 代码如下: <% '//hittime 日期型:获得上次访问时间 '//hits 数字型:获得总浏览量 '//hitsday 数字型:获得今天浏览量 '//hitsweeks 数字型:获得本周浏览量 '//hitmonths 数字型:获得本月浏览量 '数据库中 添加这5个字段. set rs1=server.CreateObject("adodb.recordset") rs1.open "select * from qwbmnewssss where id=

  • Oracle 12c新特性之如何检测有用的多列统计信息详解

    前言 之前和大家分享过Oracle 11g下的一个新特性--收集多列统计信息(http://www.jb51.net/article/109514.htm),今天和大家分享Oracle 12c的一个新特性--自动检测有用列组信息.二者相得益彰,大家可以具体情况酌情使用. 言归正传,我们可以针对一个表,基于特定的工作负荷,通过使用DBMS_STATS.SEED_COL_USAGE和REPORT_COL_USAGE来确定我们需要哪些列组.当你不清除需要创建哪个扩展统计信息时,这个技术是非常有用的.需

  • 在ASP.NET 2.0中操作数据之十五:在GridView的页脚中显示统计信息

    导言 除了需要了解产品的单价.库存量和订货量,并按等级排序之外,用户可能还对统计信息感兴趣,比如说平均价格.库存总量等等.这些统计信息常常显示在报表最下面的一个统计行中.GridView控件可以含有一个页脚行,我们可以通过编程将统计数据插入到它的单元格里面去.这个任务给了我们以下3个挑战: 1.配置GridView以显示它的页脚行 2.确定统计数据.即我们应该如何计算平均价格还有库存总量? 3.将统计信息插入到页脚行的相应的单元格中 在本节教程中,我们将会看到如何去征服这些挑战.另外呢,我们将创

  • 实现ASP程序执行时间统计类的代码

    第一次写ASP类,实现功能:分段统计程序执行时间,输出统计表等.  复制代码 代码如下: Class ccClsProcessTimeRecorder  '程序作者:明月星光  '作者主页:http://www.5iya.com/blog  'http://www.kuozhanming.com  'ASP程序代码执行时间统计类 Private ccInti,ccIntNonceTime,ccIntDecimal    Private ccIntStartTime,ccIntEndTime,cc

  • 自增长键列统计信息的处理方法

    这篇文章通过文字代码的形式讲解了如何处理用自增长键列的统计信息.我们都知道,在SQL Server里每个统计信息对象都有关联的直方图.直方图用多个步长描述指定列数据分布情况.在一个直方图里,SQL Server最大支持200的步长,但当你查询的数据范围在直方图最后步长后,这是个问题.我们来看下面的代码,重现这个情形: -- Create a simple orders table CREATE TABLE Orders ( OrderDate DATE NOT NULL, Col2 INT NO

  • MySQL 8.0统计信息不准确的原因

    前言 不管是Oracle还是MySQL,新版本推出的新特性,一方面给产品带来功能.性能.用户体验等方面的提升,另一方面也可能会带来一些问题,如代码bug.客户使用方法不正确引发问题等等. 案例分享 MySQL 5.7下的场景 (1)首先,创建两张表,并插入数据 mysql> select version(); +------------+ | version() | +------------+ | 5.7.30-log | +------------+ 1 row in set (0.00 s

  • git log根据特定条件查询日志并统计修改的代码行数

    前言 随着年龄的增长和知识的积累,最近常常有种豁然开朗的感觉,或者对一个已经存在的事物突然有了新的认识,比如统计这个词很早就接触了,从没考虑过它是什么意思,而这篇总结的题目中用了统计一词,第一感觉应该是汇总.记录的意思,后来去查了词条定义,也确实就是类似的解释,从没有刻意去学这个词的含义,但是在每天的生活中已经潜移默化地归纳.总结出来了. 想要统计就得有数据源,而 git log 命令恰恰就能提供这个数据源,git log 本身就是一个显示日志的命令,日志记录的是代码库变化的数据,类似于描述代码

  • Redis实现UV统计的示例代码

    目录 一.HyperLogLog 1.为什么用HyperLogLog 2.HyperLogLog是什么 二.实现UV统计 一.HyperLogLog 1.为什么用HyperLogLog 先介绍两个概念: UV:全称 Unique Visitor,也叫独立访客量,是指通过互联网访问.浏览这个网页的自然人.1 天内同一个用户多次访问该网站,只记录 1 次.PV:全称 Page View,也叫页面访问量或点击量,用户每访问网站的一个页面,记录一次 PV,用户多次打开页面,则记录多次 PV.往往用来衡量

  • Oracle 11g收集多列统计信息详解

    前言 通常,当我们将SQL语句提交给Oracle数据库时,Oracle会选择一种最优方式来执行,这是通过查询优化器Query Optimizer来实现的.CBO(Cost-Based Optimizer)是Oracle默认使用的查询优化器模式.在CBO中,SQL执行计划的生成,是以一种寻找成本(Cost)最优为目标导向的执行计划探索过程.所谓成本(Cost)就是将CPU和IO消耗整合起来的量化指标,每一个执行计划的成本就是经过优化器内部公式估算出的数字值. 我们在写SQL语句的时候,经常会碰到w

随机推荐