关于记数学器(10分)

大家帮助我写段网站浏览人数统计的记数器代码吧，
我已经搞的昏头了，

分数是不是太少了，大哥！是否考虑另加100分？
以下是一段代码，我以前用过的，请参考！
需要下载的图形我有，来信取之，OK？
还有其它类形的计数器，要不要？还望多多加分才是！
将代码复制-粘贴到ASP文件的适当位置即可。
<%
' 显示的数字位数；
TotalDigits = 7
' 记录数字的文件名和位置，下面的写法与ASP文件在同一目录下；
CounterFile = Server.MapPath ("test.cnt")
On Error Resume Next
Set fs = CreateObject("Scripting.FileSystemObject")
'打开计数文件
Set a = fs.OpenTextFile(CounterFile, 1, 0, 0)
' 取当前计数
CurrentCount = a.ReadLine
InStream.Close
' 计数器加1
CurrentCount = CurrentCount + 1
set b = fs.CreateTextFile (CounterFile, 1, 0)
' 写入新计数
b.WriteLine CurrentCount
b.Close
' 准备显示新计数
TotalCount = Right(String(TotalDigits, "0") &amp;
CurrentCount, TotalDigits)
For i = 1 To TotalDigits
DisplayCount = "<img src=" &amp;
Chr(&amp;H22) &amp;
"images/" &amp;
Mid(TotalCount, i, 1) &amp;
".gif" &amp;
Chr(&amp;H22) &amp;
"width=11 height=12" &amp;
">"
Response.Write(DisplayCount)
Next
%>
注意如下问题：
（1）首先你有执行ASP的权限。
（2）如果你在本地安装了IIS或PWS，用 http://127.0.0.1/count/count.asp
即可看到结果。注意，直接双击count.asp是不行的。
（3）实际上将你的HTML文件的扩展名改成ASP也可以的。然后将上面的代码假如
到其中适当的位置即可。
（4）你可以将数字图片替换成你喜欢的，但是建议加上width和height属性，这
样计数在显示时比较快，效果也比较好。图片放在images目录内，图片的名字
0.gif - 9.gif。

呜，呜……
代码被服务器过滤掉了！
我给你发过去吧，注意看信箱！

老哥，我的主页没有用ASP呀，只是一般性的个人HOMEPAGE，
问题出在我去申请了免费记数器后，也把他们给的语句放到我的HTML文件里
了，只是我放到网络上去看，从来就不动数字，0访问量一直都不增加的，我自己连续访问
就是不增加，我是问这个为啥？

一般的个人homepage没法自己写Counter的，（除非你能找到有
CGI或ISAPI权限的空间）
只有用别人提供的代码，我用的是网易的，挺不错，还有263的
也蛮好，功能全

要不重新到其他网上申请一个？

收到了你的回信，
这其中有几种原因:
1、你没有正确的将它连到你的网页上；
2、没有产生你个人正确的计数器文件；
3、本身这个计数器有BUG；
解决办法：
去另外申请一个计数器，网上有一大把！
介绍一个给你去看看吧！
<a href='http://member.netease.com/~linwen/mfjsq.htm' target=_blank>一个有许多免费计数器的地方</a>

在你的个人主页上一般是没有执行这些数器的权利的！
所以你只有到别人的服务器上去申请一个！
我还以你是在给某公司做主页呢？

THANK YOU！！