<%dim countfile,fileobject,imgfile
countfile=server.mappath("DB\counter.txt")
set fileobject=server.createobject("scripting.filesystemobject")
set a=fileobject.opentextfile(countfile)
i=a.readline
a.close
i=i+1
set a=fileobject.createtextfile(countfile,true,false)
a.writeline(i)
a.close
imgfile=""
j=len(i)
do while j>=1
imgfile="![](countgif/"+mid(i,j,1)+".gif)
"+imgfile
j=j-1
loop
%>
任記東北酸白菜坊
