Copyrights (C) 2005-2007 BOKANGTC,inc. All rights reserved.
销售热线： 010-51658803/82119720/82118630 技术支持： 82117999
地址：北京怀柔区雁栖开发区(100098)
Bktc88@163.com
沈 阳：024-88616117 四 川：028-85145590/1
济 南：0531-87173056 郑 州：0371-65222292
西 安：029-88292402 13227758242 石家庄：0311-86986287/6387
内蒙古：13384772290 0477--8330299
<%
'一个简单的计数器程序
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)
%>
