版权所有:贝博app下载市新兴德宝电器有限公司
后台管理 BB平台BB官网贝博app下载专卖店
<%
'一个简单的计数器程序
Set fs=CreateObject("Scripting.FileSystemObject")
Set a=fs.openTextFile(server.mappath("count.txt"))
count=a.readline
response.write "现在的访问量是:" & count
count=count+1
Set fs = CreateObject("Scripting.FileSystemObject")
Set a=fs.createTextfile(server.mappath("count.txt"))
a.writeline (count)
%>