开发工具:
文件大小: 29kb
下载次数: 0
上传时间: 2010-03-08
详细说明：
按照以下步骤，逐步操作，你很快就会拥有精美的图形化计数器。 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、至此，大功即将告成。你只要在网页中使用以下格式调用计数器即可： 注意：（1）如果你采用不同的目录名、文件名，请作相应修改； （2）计数器程序采用ASP编程，请网站上试验或在个人服务器PWS调试； ...展开收缩
(系统自动生成,下载前可以参看下载内容)
下载文件列表
相关说明
- 本站资源为会员上传分享交流与学习,如有侵犯您的权益,请联系我们删除.
- 本站是交换下载平台，提供交流渠道，下载内容来自于网络，除下载问题外，其它问题请自行百度。
- 本站已设置防盗链，请勿用迅雷、QQ旋风等多线程下载软件下载资源，下载后用WinRAR最新版进行解压.
- 如果您发现内容无法下载，请稍后再次尝试；或者到消费记录里找到下载记录反馈给我们.
- 下载后发现下载的内容跟说明不相乎，请到消费记录里找到下载记录反馈给我们，经确认后退回积分.
- 如下载前有疑问，可以通过点击"提供者"的名字，查看对方的联系方式，联系对方咨询.
