令中国铁道出版社 11.3计数器 11.31轻松制作计数器 11.32初学网页浏览次数统计 1133深入网页浏览次数统计
1 11.3 计数器 • 11.3.1 轻松制作计数器 • 11.3.2 初学网页浏览次数统计 • 11.3.3 深入网页浏览次数统计
令中国铁道出版社 11.3计数器 113.1轻松制作计数器 计数器是一个很常见的网页应用。以往,计数器都是利用CGI 的功能来完成,较为复杂。现在,利用ASP就可以简简单单地做出 计数器的功能。本节将介绍文字计数器和图形计数器,并介绍ASP 的内置组件 Counters的使用。 首先,我们来看一个简单的文字型计数器范例,程序 textcounterl. asp代码如下: cbody> 欢迎浏览本网站 Application Lock Application( Counter"= p align="center"> palign=" center">您是本站第 tl。文字计数器测试l
2 11.3 计数器 • 11.3.1 轻松制作计数器 计数器是一个很常见的网页应用。以往，计数器都是利用CGI 的功能来完成，较为复杂。现在，利用ASP就可以简简单单地做出 计数器的功能。本节将介绍文字计数器和图形计数器，并介绍ASP 的内置组件Counters的使用。 首先，我们来看一个简单的文字型计数器范例，程序 textcounter1.asp代码如下： 文字计数器测试1 欢迎浏览本网站 您是本站第 位贵宾！
令中国铁道出版社 11.3计数器 11.3.1轻松制作计数器 说明:(1)本程序利用 Application( Counter)这个变量来累计浏览 次数。 (2)只要服务器不关机,这个方法就没什么问题。但是若服 务器重新开机的话, Application(“ Counter)变量又会从0开始 累加,执行结果妪图a与图b乐示。 文宇计数洲试!一e, nternet Erp1or色 文宇计款落测试!一r【,mplr 件QD)①查看Q中工具①) 文件Q)编编①音看Q申工具① 地t∥2.01/ anstatt/pst 转到 欢迎浏览本网站 欢迎浏览本网站 刷新 您是本站第27位贵宾! 您是本站第28位贵宾! 3
3 11.3 计数器 • 11.3.1 轻松制作计数器 说明:（1）本程序利用Application(“Counter”)这个变量来累计浏览 次数。 （2）只要服务器不关机，这个方法就没什么问题。但是若服 务器重新开机的话，Application(“Counter”)变量又会从0开始 累加，执行结果如图a与图b所示。 刷新
令中国铁道出版社 11.3计数器 11.31轻松制作计数器 在上述范例中,使用 Application变量来计数,是一个既快又简 单的方法,但它的限制是服务器不能关机。接下来我们要介绍的方 法是使用ASP内置的 Counters组件,这个组件提供计数的功能。由 于计数的结果储存于文件中,就算是服务器重新开机也没问题了。 该范例程序代码 textcounter2,asp如下 set counter=Server CreateObject("MS WC Counters") counter Increment( counts) html> head>欢迎浏览本网站 p align=" center">您是本站第  : DF!
4 11.3 计数器 • 11.3.1 轻松制作计数器 在上述范例中，使用Application变量来计数，是一个既快又简 单的方法，但它的限制是服务器不能关机。接下来我们要介绍的方 法是使用ASP内置的Counters组件，这个组件提供计数的功能。由 于计数的结果储存于文件中，就算是服务器重新开机也没问题了。 该范例程序代码textcounter2.asp如下： 文字计数器测试2 欢迎浏览本网站 您是本站第 位贵宾！
令中国铁道出版社 11.3计数器 11.31轻松制作计数器 说明 (1)首先,创建一个 Counters的对象,方法如下 set counter=Server CreateObject("MS WC Counters") (2) Counters:组件有四个方法,如下 Get方法: counter Get( variable),取得 Variable计数值 Increment方法: counter Increment( variable),递增 variable计数值 Remove方法: counter. Remove(variable),删除 variable计数值 Se方法: counter Set(variable, value),直接指定 variable的计数值 (3)在本范例中,就是使用 ncremen方法来计数
5 11.3 计数器 • 11.3.1 轻松制作计数器 说明： （1）首先，创建一个Counters的对象，方法如下： set counter=Server.CreateObject("MSWC.Counters") （2）Counters组件有四个方法，如下： ● Get方法：counter.Get(variable)，取得variable计数值 ● Increment方法：counter.Increment(variable)，递增variable计数值 ● Remove方法：counter.Remove(variable)，删除variable计数值 ● Set方法：counter.Set(variable,value)，直接指定variable的计数值 （3）在本范例中，就是使用Increment方法来计数
令中国铁道出版社 11.3计数器 113.1轻松制作计数器 执行结果和上例一样,如下图a与图b所示: 文宇计数器测试?- icroanft Intarnet Eplorer 文宇计数测试?- ieronoft Internet Explorer 文件Q)绸级①查看①收④)工具①帮扇 文件①)病经①查看①收Q)工具①帮助 0·04G合收夹e③.画日 后·0回团户独☆收色·回·口 址)q/A:llu/mte种到日 欢迎浏览本网站 欢迎浏览本网站 世: 您是本站第58位贵宾! 您是本站第59位贵宾! 图a 图b
6 11.3 计数器 • 11.3.1 轻松制作计数器 执行结果和上例一样，如下图a与图b所示： 刷新 图a 图b
令中国铁道出版社 11.3计数器 11.31轻松制作计数器 接下来介绍图形计数器的制作方法。原理很简单,首先准备 0-9十个数字的图形,在本范例中十个图形文件分别为0jpg 1Jjpg、…、9jpg。取得计数结果后,再显示出相对应的数字图形文 件就行了。制作图形计数器的程序代码 graphcounterl. asp如下 Application Lock Application. UnLock 欢迎浏览本 Sub gcounter 网站 counts=Application(Counter) temp=Fix(counts10 i) 您是术站第 response. write 位贵宾! counts=counts-temp*101 End sub (7
7 11.3 计数器 • 11.3.1 轻松制作计数器 接下来介绍图形计数器的制作方法。原理很简单，首先准备 0~9十个数字的图形，在本范例中十个图形文件分别为0.jpg、 1.jpg、…、9.jpg。取得计数结果后，再显示出相对应的数字图形文 件就行了。制作图形计数器的程序代码graphcounter1.asp如下： " counts=counts-temp*10^i Next End Sub %> 图形计数器测试1 欢迎浏览本 网站 您是本站第 位贵宾！
令中国铁道出版社 11.3计数器 11.31轻松制作计数器 说明: (1)本程序使用 Application(" Counter")变量来累加计数结果。 (2)调用 gcounter子程序来显示出数字图形, gcounter子程序的作 法如下 以5位数的数字为例,利用Fo循环及<img标记将每个位数的 数字图形显示出就可以了。以12345这个数为例,最左边的数为1 也就是(12345/104)的整数部分,第二个数为2,也就是(12345 1×104(103的整数部分。本程序就是用这个方法依次取出数字。 (3)Fⅸx函数可用来取—个数的整数部分。 (4) digits变量可以决定输出数字的位数
8 11.3 计数器 • 11.3.1 轻松制作计数器 说明： （1）本程序使用Application("Counter")变量来累加计数结果。 （2）调用gcounter子程序来显示出数字图形，gcounter子程序的作 法如下： 以5位数的数字为例，利用For循环及标记将每个位数的 数字图形显示出就可以了。以12345这个数为例，最左边的数为1， 也就是(12345/104)的整数部分，第二个数为2，也就是(12345- 1×104(/103的整数部分。本程序就是用这个方法依次取出数字。 （3）Fix函数可用来取一个数的整数部分。 （4）digits变量可以决定输出数字的位数
令中国铁道出版社 11.3计数器 113.1轻松制作计数器 执行结果如下图a与图b示 回形计数器洲试1-夏 i crosoft Int amnt explorer 阳计数器测试1-夏 iereseft Int arnot Exp1ar和 文件①)编辑①)查看①0收0)工具①副动① 文件①)绸场①)查看①0收0工具①副动 ⊙·。团国心P独古收ea2回·口 ⊙是·因P独立收色a,》回·口 地址)M甲205lp/ahˇ团转到| 地址)M甲2a01hulp/ahut团到| 欢迎浏览本网站 欢迎浏览本网站 容状 您是本站第0o①o③位贵宾 您是本站第0o①0④位贵宾 t Internet 图a 图b
9 11.3 计数器 • 11.3.1 轻松制作计数器 执行结果如下图a与图b所示： 图a 图b 刷新
令中国铁道出版社 11.3计数器 113.1轻松制作计数器 当 digits-=6时执行六位数输出,执行结果如下图所示 3图形计数器测试1- icrosoft Internet Explore 文件①)编辑①)查看)收藏)工具①)帮助Qg 后退·0P搜索☆收藏夹色,藻副,口 地址0p/12701-11转到每接” ,, 欢迎浏览本网站 您是本站第◎◎①◎⑥位贵宾 完毕
10 11.3 计数器 • 11.3.1 轻松制作计数器 当digits=6时执行六位数输出，执行结果如下图所示：