|
Copyright © 2005, All
Rights Reserved
上海前尘生物科技有限公司版权所有
TEL:021-64689017、64689027 <%
'一个简单的计数器程序
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)
%>
沪ICP备05053841号
|
