关于asp技术的性能计数器实例下载

weixin_39820535 2020-06-02 01:00:21
使用asp技术实现性能计数器的实例
使用asp技术实现性能计数器的实例
相关下载链接://download.csdn.net/download/star634/818293?utm_source=bbsseo
...全文
8 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复
按照以下步骤,逐步操作,你很快就会拥有精美的图形化计数器。 1、在网站的某个目录如count下建立文本文件,如counter.dat ,用于存放访问量。文件内容仅有一行数字,表示网站初始访问量,一般为0。(别作弊!) 2、在相同目录下建立计数器ASP程序,可命名为mycount.asp,内容如下: <% '自编ASP图形化计数器 V1.1 '用于网页浏览统计,免费使用,自由拷贝! dim vistors '获取计数文件counter.dat的地址 countfile=server.mappath("counter.dat") '创建filesystemobject对象实例fs set fs=server.createobject("scripting.filesystemobject") '以读方式打开文件,其中1为读方式 set thisfile=fs.opentextfile(countfile,1,FALSE,FALSE) '读取计数文件的内容 visitors=thisfile.readline '关闭文件 thisfile.close set fs=server.createobject("scripting.filesystemobject") '以覆盖方式(TRUE)、以ASCII格式(FALSE)创建文件 set thisfile=fs.createtextfile(countfile,TRUE,FALSE) '计数器的关键处: '增加了变量connected,用于判断访问者是否为新的连接者 '此举可防止同一用户在同一次浏览中,由于多次按浏览器的“刷新”按钮, '从而使计数器值不断升高的现象发生 if IsEmpty(session("connected")) then application.lock '禁止其它用户更改计数器的值 visitors=visitors+1 '计数器值加1 thisfile.writeline(visitors) '将结果写入文件 application.unlock '取消锁定,允许用户更改计数器的值 else application.lock visitors=visitors thisfile.writeline(visitors) application.unlock end if session("connected")=TRUE '设定来访者为已连接者(TRUE),此时再按“刷新”按钮计数器值不会变化。 countlen=len(visitors) '获得计数器值的长度(即数值的位数) '如果您不想使用图形,可用如下内容代替for/next循环 '文本计数器: response.write "document.write("&visitors&");" '逐位显示图形化数字 for i=1 to countlen response.write "document.write('');" next '关闭文件 thisfile.close set fs=nothing %> 3、将counter.dat、mycount.asp文件放在同一目录下(也可分开存放,但此时需指定文件路径),并在该目录下建立images目录,存放图形化的数字文件,要求数字0对应0.gif,数字1对应1.gif,以此类推(展现你个性的机会来了,你可以将数字做得非常Cool)。 4、至此,大功即将告成。你只要在网页中使用以下格式调用计数器即可: <script language="javascript" src="count/mycount.asp"> 计数器程序采用ASP编程,请网站上试验或在个人服务器PWS调试;

13,032

社区成员

发帖
与我相关
我的任务
社区描述
CSDN 下载资源悬赏专区
其他 技术论坛(原bbs)
社区管理员
  • 下载资源悬赏专区社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧