四步完成asp网页设计流量统计

按照以下步骤,逐步操作,你很快就会拥有精美的图形化计数器。 
步骤1:在网站的某个目录如count下建立文本文件,如counter.dat    ,用于存放访问量。文件内容仅有一行数字,表示网站初始访问量,一般为0。
步骤2:在相同目录下建立计数器的ASP程序,可命名为mycount.asp,内容如下:

 <%
  '自编ASP图形化计数器  V1.1
  '用于网页浏览统计,免费使用,自由拷贝! 

  dim  vistors
  '获取计数文件counter.dat的地址
  countfile=server.mappath("counter.dat")
  '创建filesystemobject对象实例fs
  set  fs=server.createobject("scripting.filesystemobject")
  '以读方式打开文件,其中1为读方式
  set  thisfile=fs.opentextfile(countfile,1,FALSE,FALSE)
  '读取计数文件的内容
  visitors=thisfile.readline
  '关闭文件
  thisfile.close 

  set  fs=server.createobject("scripting.filesystemobject")
  '以覆盖方式(TRUE)、以ASCII格式(FALSE)创建文件
  set  thisfile=fs.createtextfile(countfile,TRUE,FALSE) 

  '计数器的关键处:
  '增加了变量connected,用于判断访问者是否为新的连接者
  '此举可防止同一用户在同一次浏览中,由于多次按浏览器的“刷新”按钮,
  '从而使计数器值不断升高的现象发生 

  if  IsEmpty(session("connected"))  then
     application.lock
     '禁止其它用户更改计数器的值
     visitors=visitors+1
     '计数器值加1
     thisfile.writeline(visitors)
     '将结果写入文件
     application.unlock
     '取消锁定,允许用户更改计数器的值
  else
     application.lock
     visitors=visitors
     thisfile.writeline(visitors)
     application.unlock
  end  if 

  session("connected")=TRUE
  '设定来访者为已连接者(TRUE),此时再按“刷新”按钮计数器值不会变化。 

  countlen=len(visitors)
  '获得计数器值的长度(即数值的位数) 

  '如果您不想使用图形,可用如下内容代替for/next循环
  '文本计数器:  response.write  "document.write("&visitors&");" 

  '逐位显示图形化数字
  for  i=1  to  countlen
      response.write  "document.write('<img  src="&"images/"&"/"&mid  (visitors,i,1)&".gif></img>');"
  next 

  '关闭文件
  thisfile.close
  set  fs=nothing
  %>

步骤3:将counter.dat、mycount.asp文件放在同一目录下(也可分开存放,但此时需指定文件路径),并在该目录下建立images目录,存放图形化的数字文件,要求数字0对应0.gif,数字1对应1.gif,以此类推(展现你个性的机会来了,你可以将数字做得非常Cool)。    
步骤4:至此,大功即将告成。你只要在网页中使用以下格式调用计数器即可:

 <script  language="javascript"  src="count/mycount.asp">
</script>

注意:  (1)如果你采用不同的目录名、文件名,请作相应修改; 
               (2)计数器程序采用ASP编程,请在网站上试验或在个人服务器PWS调试;

只要以上四大步骤大家认真仔细研究,相信大家一定会制作出一个具有自己风格特点的asp网页设计流量统计。

(0)

相关推荐

  • ASP.net中网站访问量统计方法代码

    一.建立一个数据表IPStat用于存放用户信息 我在IPStat表中存放的用户信息只包括登录用户的IP(IP_Address),IP来源(IP_Src)和登录时间(IP_DateTime),些表的信息本人只保存一天的信息,如果要统计每个月的信息则要保存一个月.因为我不太懂对数据日志的操作,所以创建此表,所以说我笨吧,哈哈. 二.在Global.asax中获取用户信息 在Global.asax的Session_Start即新会话启用时获取有关的信息,同时在这里实现在线人数.访问总人数的增量统计,代

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

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

  • asp.net中调用Office来制作3D统计图的实例代码

    1.首先下载owc11 COM组件 http://www.microsoft.com/downloads/details.aspx?FamilyID=7287252c-402e-4f72-97a5-e0fd290d4b76&displaylang=en 2.注册owc11 在工程中添加 C:/Program Files/Common Files/Microsoft Shared/Web Components/11  文件下的owc11.dll引用 3.在工程中添加 using OWC11; 4.

  • 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 ||

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

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

  • 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 aspnetpager分页统计时与实际不符的解决办法

    基本函数如下: 复制代码 代码如下: /// <summary> /// 需要分页时使用,根据参数和ConditionExpress获取DataTable /// </summary> /// <param name="_tableName">表名</param> /// <param name="_fieldNames">字段名集合,用逗号分开</param> /// <param na

  • asp实现一个统计当前在线用户的解决方案

    一个统计当前在线用户的解决方案 在做一个在线交流的网站时,有个问题很令我头疼,就是关于实时统计在线用户的问题,客户要求:统计当前在线人数.游客人数.会员人数.在线用户列表,包括游客.会员和管理员(如果是游客,则自动生成游客的ID,如果是会员,则显示会员姓名).因为它要求有实时性,则首先我将用global.asa解决的想法pass掉. 问题的关键是如何判断用户已经离开,和当用户离开时如何执行一个文件或一个函数. 经过和网上一些朋友的探讨,终于解决了这个问题. 解决的原理为:编写一个通用页面,所谓的

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

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

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

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

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

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

随机推荐