Dreamweaver添加点击率代码

这是用ASP编写的，利用存取文本文件实现的。
Dim fs,whichfile,record,sFile,oFile
whichfile=server.mappath("inc/logvisit.ini")
set fs=server.CreateObject("Scripting.FileSystemObject")
if fs.FileExists(whichfile) then
set sFile=fs.OpenTextFile(whichfile,1)
if not sFile.AtEndOfStream then record=sFile.ReadLine
//以上代码是读取logvisit.ini文件中的第一行并赋给record变量
record=csng(record)+1
//记数加1
sFile.Close
set sFile=Nothing
If session("Visitor")="" Then //防止刷新页面增加点数，原理是先在首页上加入session("Visitor")="aaa" ，后面的值只要不为空就行。
set oFile=fs.CreateTextFile(whichfile,true)
oFile.WriteLine(record)
//写入logvisit.ini文件。
oFile.Close
set oFile=Nothing
End if
End if

本代码只适合ASP开发的动态网站，logvisit.ini必须手动建立，而且第一行默认为0。
或者用数据库来显示。

如果是统计数据库中某条记录的话，直接在表中加点击率字段。

用动态网页吧，给数据库多加一个点击率的字段，完全可以实现