ASP建站十大常用程序(第五节):计数器

接下来编一个显示图形数字的程序，把在线人数显示在指定的页面上。这样就能得出在人数了
*online.asp
<% @language="vbscript" %>
<%
tmp=application("online")
tmp=Cstr(tmp)
dim disp(20)
dim images(20)
dbbits=len(tmp)
for I= 1 to dbbits
disp(I)=left(right(tmp,I),I-(I-1))
next
for I=dbbits to 1 step -1
images(I)="<img src="&"http://xxxx.com.cn/pic"&"/"&disp(I)&".gif>"
response.write "document.write("&images(I)&");"
next
%>
上面的程序很简单，这里不作分析了，请大家自己阅读一下。在调用在线统计的页面上用一句script语句引用online.asp文件，以显示图形统计器。
<script language="JavaScript" src="http://xxxx.com.cn/online.asp"></script>
现在可以了，记住要点，你必须把gobal.asa放在正确的web应用程序根目录上，而最好单独为这个统计新建一个web应用程序，不要与其它别的程序混乱了，不然得出的数据是不准确的，而把这个程序修改为多用户的在线统计也很简单。这样就可以提供在线统计服务了，如何实现请又大家去思考一下吧....