地址：中国浙江省嘉兴市洪殷路365号 邮编: 314001 电话：0573-82713621 信箱：jxshs@163.com
<%
const forreading = 1, forwriting = 2, forappending =3
const tristateusedefault = -2, tristatetrue = -1, tristatefalse = 0
filepath=server.mappath("/count")
filename=filepath+"\counter.txt"
set fs=createobject("scripting.filesystemobject")
if fs.fileexists(filename) then
set f=fs.getfile(filename)
set ts = f.openastextstream(forreading,
tristateusedefault)
s=ts.readline+1
ts.close
else
fs.createtextfile(filename)
set f=fs.getfile(filename)
s=1
end if
'向counter.txt中写数据
set ts = f.openastextstream(forwriting,
tristateusedefault)
ts.writeline(cstr(s))
ts.close
'显示计数器
s=cstr(s+1000000)
s=mid(s,2,6)
for i=1 to 6
response.write "![](../images/"&mid(s,i,1)
&".gif)
"
next
%>