源码网,源码论坛,源码之家,商业源码,游戏源码下载,discuz插件,棋牌源码下载,精品源码论坛

 找回密码
 立即注册
查看: 675|回复: 17

[编程10000问] 如何将访问者数目周期性地保存?

[复制链接]

7万

主题

861

回帖

32万

积分

论坛元老

Rank: 8Rank: 8

积分
329525
发表于 2006-11-16 00:00:00 | 显示全部楼层 |阅读模式

如何将访问者数目周期性地保存?

<script LANGUAGE="VBScript" RUNAT="Server">

SUB Session-OnStart

...

Application.Lock

Application("visitors")=Application("visitors") + 1

' 增加访问计数

t-visitors = Application("visitors")

Application.UnLock

Session("VisitorID")=t-visitors

If t-visitors MOD 15 = 0 Then

Set FileObject = Server.CreateObject("Scripting.FileSystemObject")

Set Out=FileObject.CreateTextFile-(Application

("VisitorCountFilename"),trUE,FALSE)

' 周期性地保存到文件中

Application.Lock

Out.Write(t-visitors)

Application.UnLock
End If

...

END SUB

</script>

 

回复

使用道具 举报

6

主题

1万

回帖

174

积分

注册会员

Rank: 2

积分
174
发表于 2022-8-12 11:25:05 | 显示全部楼层
天天源码社区。。。。
回复 支持 反对

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2022-9-25 01:54:19 | 显示全部楼层
呵呵呵呵呵呵
回复 支持 反对

使用道具 举报

1

主题

1万

回帖

207

积分

中级会员

Rank: 3Rank: 3

积分
207
发表于 2022-11-8 21:30:26 | 显示全部楼层
1312315458748777
回复 支持 反对

使用道具 举报

16

主题

1万

回帖

376

积分

中级会员

Rank: 3Rank: 3

积分
376
发表于 2022-12-10 13:43:27 | 显示全部楼层
谢谢小Y分享
回复 支持 反对

使用道具 举报

1

主题

1万

回帖

176

积分

注册会员

Rank: 2

积分
176
发表于 2022-12-18 04:48:16 | 显示全部楼层
老衲笑纳了
回复 支持 反对

使用道具 举报

16

主题

1万

回帖

376

积分

中级会员

Rank: 3Rank: 3

积分
376
发表于 2022-12-29 05:57:42 | 显示全部楼层
问问问企鹅哇哇哇哇哇
回复 支持 反对

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2023-6-9 08:55:39 | 显示全部楼层
飞飞飞飞飞飞飞飞飞飞飞飞飞
回复 支持 反对

使用道具 举报

0

主题

1万

回帖

68

积分

注册会员

Rank: 2

积分
68
发表于 2023-7-1 09:35:36 | 显示全部楼层
先把创新班才能下班才能下班
回复 支持 反对

使用道具 举报

1

主题

1万

回帖

69

积分

注册会员

Rank: 2

积分
69
发表于 2023-9-25 09:51:02 | 显示全部楼层
hi哦和烦恼农家女
回复 支持 反对

使用道具 举报

高级模式
B Color Image Link Quote Code Smilies

本版积分规则

手机版|小黑屋|网站地图|源码论坛 ( 海外版 )

GMT+8, 2024-9-21 03:13 , Processed in 0.086135 second(s), 26 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表