你好!非常感谢你已经帮我解决了很大的难题,因我初学,还是没底,请问你是下面这个意思吗?谢谢了!global.asa文件：subApplicationOnStartApplication("renshui")=aEndsubsubSessionOnStartApplication.Lockf.writea+1Ap

Question

你好!非常感谢你已经帮我解决了很大的难题,因我初学,还是没底,请问你是下面这个意思吗?谢谢了!
global.asa文件：

sub Application_OnStart
Application("renshui")=a
End sub
sub Session_OnStart
Application.Lock
f.write a+1
Application("renshu")=Application("renshu")+1
Application.UnLock
End sub
sub Session_OnEnd
Application.Lock
f.write a+1
Application("renshu")=Application("renshu")-1
Application.UnLock
End sub

count.txt文件：

Answer 1

count.txt文件中手工输入0保存到网站目录下,用于计数sub Application_OnStartSet fso = Server.CreateObject("Scripting.FileSystemObject") set f=fso.openTextFile(server.mappath("count.txt"),1)a=f.readallAppl...