地址：中国浙江省嘉兴市洪殷路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 "" next %>