神马品牌网鲁冠球得的是什么病:用asp怎么计算链接的点击次数
来源：百度文库 编辑：神马品牌网 时间：2024/04/29 07:11:10
用ASP中的session对象，在文本文件记录点击数：
<%
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Dir = Request.ServerVariables("SCRIPT_NAME")
Dir = StrReverse(Dir)
Dir = Mid(Dir, InStr(1, Dir, "/"))
Dir = StrReverse(Dir)
HitsFile = Server.MapPath(Dir) & "\hits.txt"
On Error Resume Next
Set InStream= FileObject.OpenTextFile (HitsFile, 1, false )
OldHits = Trim(InStream.ReadLine)
if session("connected")="" then
OldHits = OldHits + 1
else
OldHits=OldHits
end if
NewHits=OldHits
session("connected")=true
Set OutStream= FileObject.CreateTextFile (HitsFile, True,false)
OutStream.WriteLine(OldHits)
%>
hits.txt是记录点击数的文件，建立在根目录（文件名可随意）
在数据库中建立一个字段，设置初始值为0。然后每当打开这个页面的时候向数据库的这个字段中+1
在链接的目标页面统计..^_^