令中国铁道出版社 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代码如下: <l--textcounter l. asp--> cbody> <h2algn=" center"><b>欢迎浏览本网站 Application Lock </b><h2> Application( Counter"= p align="center"><img border="0"src= Application("Counter")+1 dhs. jpg" width=300 height=180"></p Application. UnLock <h2> palign=" center">您是本站第 <font color#ff0000 ><%=Application (counter o ></font nbsp 位贵宾!<> <head> </h2> tl。文字计数器测试l<tte<body> </head> <h/htmI>
2 11.3 计数器 • 11.3.1 轻松制作计数器 计数器是一个很常见的网页应用。以往，计数器都是利用CGI 的功能来完成，较为复杂。现在，利用ASP就可以简简单单地做出 计数器的功能。本节将介绍文字计数器和图形计数器，并介绍ASP 的内置组件Counters的使用。 首先，我们来看一个简单的文字型计数器范例，程序 textcounter1.asp代码如下： <!--textcounter1.asp--> <% Application.Lock Application("Counter")= Application("Counter")+1 Application.UnLock %> <html> <head> <title>文字计数器测试1</title> </head> <body> <h2 align="center"><b>欢迎浏览本网站 </b></h2> <p align="center"><img border="0" src= "dhs.jpg"width="300" height="180"></p> <h2><p align="center">您是本站第 <font color="#ff0000"> <%=Application ("counter")%></font> 位贵宾！</p> </h2> </body> </html>
令中国铁道出版社 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如下 <l--textcounter 2. asp--> set counter=Server CreateObject("MS WC Counters") counter Increment( counts) html> head>< title文字计数器测试2< /title></head <h2 align=" center"><b>欢迎浏览本网站</b></h2> <p align="center ><img border="0"src=dhs. jpg" width=300 height=180 ></p> <h2> p align=" center">您是本站第 <font color#ff0000"><=counter. Get(counts )%></font> : DF! </p></h2> </html>
4 11.3 计数器 • 11.3.1 轻松制作计数器 在上述范例中，使用Application变量来计数，是一个既快又简 单的方法，但它的限制是服务器不能关机。接下来我们要介绍的方 法是使用ASP内置的Counters组件，这个组件提供计数的功能。由 于计数的结果储存于文件中，就算是服务器重新开机也没问题了。 该范例程序代码textcounter2.asp如下： <!--textcounter2.asp--> <% set counter=Server.CreateObject("MSWC.Counters") counter.Increment(counts) %> <html> <head><title>文字计数器测试2</title></head> <body> <h2 align="center"><b>欢迎浏览本网站</b></h2> <p align="center"><img border="0" src="dhs.jpg" width="300" height="180"></p> <h2><p align="center">您是本站第 <font color="#ff0000"><%=counter.Get(counts)%></font> 位贵宾！</p> </h2> </body> </html>
令中国铁道出版社 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方法来计数