当前位置：首页 > 资讯 > 技术文档

如何让计数器只对新进用户计数？

时间：2021-12-08 14:40 编辑：来源：阅读：
扫一扫，手机访问

摘要：如何让计数器只对新进用户计数？

[h2]如何让计数器只对新进用户计数？[/h2]<script language=vbscript runat=server> sub application_onstart filepath=server.mappath("/count") filename=filepath+"\counter.txt" set fs=createobject("scripting.filesystemobject") if not fs.fileexists(filename) then fs.createtextfile(filename) set f=fs.getfile(filename) s=1 Set ts = f.OpenAsTextStream(2, -2) ts.writeline(cstr(s)) ts.close else set f=fs.getfile(filename) Set ts = f.OpenAsTextStream(1, -2) s=ts.readline+1 ts.close end if application(“visitor”)=s end sub

sub session_onstart session.timeout=5 application("visitor ")=application("visitor ")+1 set f=fs.getfile(filename) Set ts = f.OpenAsTextStream(2, -2)

ts.writeline (cstr(application("visitor "))) ts.close end sub </script> <% s=cstr(application("visitor")+10^6) s=mid(s,2,6) for i=1 to 6 response.write "<img src='flashdays/liyanbing/images/" &mid(s,i,1)&".gif' width='18' height='25'>" next %> [b][1][/b]

全部评论(0)

上一篇：怎样避免直接在地址栏敲入URL即可绕过登录页的错误？
下一篇：如何处理包含&#106avascript语句时的间隔符？

资讯排行榜
更多>>