回复：asp的计数器如何实现防止刷新！
没找到~ 上次格盘后没剩下多少代码了
这是刚写的 你看看先
<%
dim path,myFile,read,write,cntNum
path=server.mappath("counter.txt")
read=1
write=2
Set myFso = Server.CreateObject("Scripting.FileSystemObject")
set myFile = myFso.opentextfile(path,read)
cntNum=myFile.ReadLine
myFile.close
If Session("co") = "" Then '防刷新 判断是否已登陆
cntNum = cntNum+1
Session("co")="aaa" '如刚登陆，记录到session里
End if
set myFile = myFso.opentextfile(path,write,TRUE)
myFile.write(cntNum)
myFile.close
set myFile=nothing
set myFso=Nothing
%>
复制过去后，自己在同个目录下建立一个名为counter的记事本文件（初始值写0，简单点就是直接在记事本里写个数字0）
