网页计数器怎么用DW做网页计数器

网页计数器  时间:2021-03-17  阅读:()

怎么用DW做网页计数器

<script Language="vbscript" RunAt="server"> Sub Application_OnStart ''global.asa 一定是放在网站的虚拟根目录下的 ''在根目录下有一个 counter.txt 记录访问总量 ''Application("Counter") ''计数器的变量名 ''Application("Online") ''在线人数的变量名 dim objFSO,objTS set objFSO = Server.CreateObject("scripting.FileSystemObject") set objTS = objFSO.OpenTextFile(Server.MapPath("./images/counter.gif"),1,false) if not objTS.atendofstream then Application("Counter") = CLng(objTS.ReadLine) ''网站计数器 end if objTS.close : set objTS=nothing : set objFSO = Nothing if IsEmpty(Application("Counter")) then Application("Counter") = 0 ''置初始值 Application("Online") = 0 ''在线人数 设置初始值 End Sub Sub Session_OnStart Application.Lock Application("Online") = Application("Online") + 1 ''在线人数累加 Application("Counter") = Application("Counter")+ 1 ''计数器累加 Application.UnLock End Sub Sub Session_OnEnd Application.Lock Application("Online") = Application("Online") - 1 ''在线人数累减 Application.UnLock dim objFSO,objTS set objFSO=Server.CreateObject("scripting.FileSystemObject") set objTS=objFSO.OpenTextFile(Server.MapPath("./images/counter.gif"),2,true) objTS.write Application("Counter") ''将计数器记录到文本中 objTS.close : set objTS=nothing : set objFSO = Nothing End Sub Sub Application_OnEnd End Sub </script>

QQ防红跳转短网址生成网站源码(91she完整源码)

使用此源码可以生成QQ自动跳转到浏览器的短链接,无视QQ报毒,任意网址均可生成。新版特色:全新界面,网站背景图采用Bing随机壁纸支持生成多种短链接兼容电脑和手机页面生成网址记录功能,域名黑名单功能网站后台可管理数据安装说明:由于此版本增加了记录和黑名单功能,所以用到了数据库。安装方法为修改config.php里面的数据库信息,导入install.sql到数据库。...

新注册NameCheap账户几天后无法登录原因及解决办法

中午的时候有网友联系提到自己前几天看到Namecheap商家开学季促销活动期间有域名促销活动的,于是就信注册NC账户注册域名的。但是今天登录居然无法登录,这个问题比较困恼是不是商家跑路等问题。Namecheap商家跑路的可能性不大,前几天我还在他们家转移域名的。这里简单的记录我帮助他解决如何重新登录Namecheap商家的问题。1、检查邮件让他检查邮件是不是有官方的邮件提示。比如我们新注册账户是需...

Hostiger 16G大内存特价VPS:伊斯坦布尔机房,1核50G SSD硬盘200Mbps带宽不限流量$59/年

国外主机测评昨天接到Hostigger(现Hostiger)商家邮件推送,称其又推出了一款特价大内存VPS,机房位于土耳其的亚欧交界城市伊斯坦布尔,核50G SSD硬盘200Mbps带宽不限月流量只要$59/年。 最近一次分享的促销信息还是5月底,当时商家推出的是同机房同配置的大内存VPS,价格是$59.99/年,不过内存只有10G,虽然同样是大内存,但想必这次商家给出16G,价格却是$59/年,...

网页计数器为你推荐
phpcms模板phpcms模板下载后如何安装flashfxp注册码找flashfxp3.4注册码文档下载请问手机版wps如何把云文档下载到手机上的本地文档?开放平台企鹅号和腾讯内容开放平台是一样的吗,有什么区别?温州商标注册温州商标注册?温州商标注册温州注册公司在哪里注册即时通平台有好的放单平台吗?oa办公软件价格一个oa系统多少钱站点管理工行网点现场管理人员主要职责是什么powerbydedecms如何去掉织梦网站底部的powered by dedecms方法
重庆虚拟空间 中文域名注册 主机优惠码 webhostingpad l5520 免费cdn加速 万网优惠券 e蜗牛 777te 创梦 idc资讯 cn3 服务器合租 万网主机管理 沈阳主机托管 湖南idc 德隆中文网 独立主机 德讯 qq金券 更多