[watermark]计数器是网站运行中一个很重要的组成部分,它可以记录网站的来访情况,也在某种程度上说明了网站的受欢迎程度,因此许多网站都录入了计数器,
以下是网站计数器的两个做法，很简单，不需后台数据库
方法一：直接在网页中需要显示访问次数的地方加上以下程序代码
<%
Application.lock
Application("clicks")=Application("clicks")+1
Application.unlock
response.write "您是本站第 "&Application("clicks")&" 位访客！"
%>
这种方法比较简单，但刷新一次，访问次数就会相应增加，而且服务器重启，访问次数就会归零
方法二：
①.先在网站的根目录下建立一个文本文件命名为count.txt,并且在文件的 首行写上0，保存；
②.编写一个名为visitor.asp 的程序,也是计数器的重要组成部分,如下
%
Dim visitors
file=Server.mappath(count.txt) ';count.txt的物理地址
';接下来创建一个FileSystemObject对象
Set fs = CreateObject(Scripting.FileSystemObject)
Set fileto = fs.OpenTextFile(file)
visitors = fileto.readline
fileto.close
if IsEmpty(session(Connected)) then
Application.lock
visitors = visitors + 1 ';当有人访问时就加 1
Application.unlock
End if
session(Connected) = true
Set out = fs.CreateTextFile(file) ';将数据写入count.txt中
out.writeline(visitors)
out.close
Set fs = nothing
%
以上的程序可以放在<head>..</head>中,也可放在<html>上面，
在适当的地方加上 %=visitors% 就可以了！
o℃啲永恒ツ 发表于 2007-5-23 16:29:00 阅读全文 | 回复(0) | 引用通告 | 编辑 |
