分类：电脑/网络-互联网
问题：能帮我写出计算ASP网站访问量的代码吗，各位大侠． 
能帮我写出计算网站访问量的代码吗，各位大侠．
回答：没必要的啊，个免费的就行了。而且现在都不用单纯的计数器，都是流量统计呀。我自己写的一个fso文本计数器。<%ispic=0  '是否使用图片计数，为1用图片，其它值不使用图片set fs=createobject(" lesystemobject")application.lockif not  leexists( ppath("test.txt")) thenset ts= eatetextfile( ppath("test.txt"))end iffilepath= ppath("test.txt")set fout=fs.opentextfile(filepath,,true)count=cstr( adline)count=count+1 ose letefile filepath,trueset fin= eatetextfile(filepath)fin.writeline countapplication.unlockif ispic=1 thenFunction GCounter( counter )   Dim S, i, G   S = CStr( counter )     For i = 1 to Len(S)      G = G & "<IMG SRC=0/" & Mid(S, i, 1) & ".gif Align=middle>"   Next   response.write GEnd FunctionGCounter(count)elseresponse.write countend if%>