一个简单的计数器程序

一个简单的计数器程序

<%'一个简单的计数器程序Set fs=CreateObject("Scripting.FileSystemObject")Set a=fs.openTextFile(server.mappath("count.txt"))count=a.readlineresponse.write countcount=count+1Set fs = CreateObject("Scripting.FileSystemObject")Set a=fs.createTextfile(server.mappath("count.txt"))a.writeline (count)%>