asp利文本文档加FSO统计网站访问量的方法(2)
网络 2009/9/15 8:21:17 深山行者 字体:
大 中 小 浏览 8668
1.新建count.txt文件文档
<%
response.write "您是本页的第"&counter()&"位访客"
function counter()
whichfile=server.mappath("count.txt")
'打开文件并将其值读取，最后关闭连接释放资源
set fso=createobject("Scripting.FileSystemObject")
set openfile=fso.opentextfile(whichfile,1)
visitors=openfile.readline
openfile.close
'页面显示记数内容并做加1运算
visitors=visitors+1
'将新的数值添加写入到文本，最后关闭所有连接释放资源
set creatfile=fso.createtextfile(whichfile)
creatfile.writeLine(visitors)
creatfile.close
set fso=nothing
counter=visitors
end function
%>
- 相关阅读
- 名扬石化设备
- 防止点击空链接时，页面往往重置到页首端
- asp之自动闭合HTML标签函数
- 微信公众号回复视频消息或用客服接口推送视频消息
- IE6.0, IE7.0和FireFox浏览器css样式兼容
- JS自动格式化输入的数字/千位分隔符
- 微信小程序-接入广告
- 青岛景色旅程
苏公网安备 32070502010230号