|
||||||||||||
|
||||||||||||
|
<%
dim visitors
dim mailobject
whichfile=server.mappath("counter.txt")
set fs=createobject("scripting.filesystemobject")
set thisfile=fs.opentextfile(whichfile)
visitors=thisfile.readline
thisfile.close
visitors=visitors+1
set thisfile=fs.createtextfile(whichfile)
thisfile.writeline(visitors)
thisfile.close
set fs=nothing
%>
访问量统计:<%=visitors%>人次 |
||||||||||||