<%application.Lock()
set f_object= Server.CreateObject("scripting.FileSystemObject")
path=Server.MapPath("counter.txt")
set file1=f_object.OpenTextFile(path)
application("counter")=file1.Readline
file1.close
application("counter")=application("counter")+1
counter=application("counter")
set file1=f_object.CreateTextFile(path,true)**********ie老报这一行错误，如果把这下两行删除，也可以正常运行。
file1.WriteLine counter
application.UnLock()
response.write counter
%>

请问：这是一个计数器吗？把这段代码放进网页里就可以记数了？

好像大多数的服务器已经禁止使用FSO这个有安全问题的组件了。