%
whichfile=server.mappath("counter.txt")
'打开文件并将其值读取,最后关闭连接释放资源
set fso=createobject("Scripting.FileSystemObject")
set openfile=fso.opentextfile(whichfile,1)
visitors=openfile.readline
openfile.close
'页面显示记数内容并做加1运算
contX = " "&visitors&" visited"
'contX = "欢迎您来到天旭摄影,您是本站的第 "&visitors&" 位访问者,该站暂时欠费关闭,请稍后访问!"
'response.write "您是本页的第"&visitors&"位访客"
'if Session("visite") = "" then
visitors=visitors+1
' Session("visite")=visitors
'else
' Session("visite")=visitors
'end if
'将新的数值添加写入到文本,最后关闭所有连接释放资源
set creatfile=fso.createtextfile(whichfile)
creatfile.writeLine(visitors)
creatfile.close
set fso=nothing
%>
肖像摄影大师---傅小海
<%=contX%>