ASP实例：即时显示当前页面浏览人数
来源：豆豆网 发布时间：2008-04-19 22:02:00
标签：浏览,统计,人数,ip
ASP实现即时显示当前页面浏览人数
online.asp文件
<!--#include file="dbconn.asp" -->
<％
onlineTimeout=10 ''定义在线活动时间的时间间隔
Function Userip()
GetClientIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR") ''''''''''''''''''''''获得用户的虚拟IP地址
If GetClientIP = "" or isnull(GetClientIP) or isempty(GetClientIP) Then
GetClientIP = Request.ServerVariables("REMOTE_ADDR") ''''''''''如果未使用代理服务器,就获得来源的IP地址
End If
Userip = GetClientIP
End Function
sql="select o_id from c_online where o_ip='' "&Userip()&" '' " 在数据库中查找所获得 的IP地址的id
Set rs=conn.execute(sql)
If rs.eof and rs.bof Then
sql="insert into c_online(o_ip) values('' "&Userip()&" '')" 如果数据库中没有就表明是新IP,那么插入操作
conn.execute(sql)
Else
sql="update c_online set o_ltime=now() where o_ip='' "&Userip()&" '' " 更数据库的当前时间
conn.execute(sql)
End If
sql="delete from c_online where dateadd(''s'',"&onlineTimeout*60&",o_ltime) < now()" 定义十分钟刷新
conn.execute(sql)
rs.close
Set rs=nothing
Function allonline()
tmprs=conn.execute("Select count(o_id) from c_online")
allonline=tmprs(0)
set tmprs=nothing
end Function
％>
<％Response.Write "document.write(""在线"&allonline()&"人"")"％>
0
投稿猜你喜欢
一个不错的绿色下划线的简洁CSS导航代码，纯css不用图片，效果图如下：<html> <head> <meta- 本文实例讲述了MySQL触发器简单用法。分享给大家供大家参考，具体如下：mysql触发器和存储过程一样，是嵌入到mysql的一段程序，触发器
- 这篇文章主要介绍了Python三元运算与lambda表达式实例解析,文中通过示例代码介绍的非常详细，对大家的学习或者工作具有一定的参考学习价
- Python中内置了一些与时间处理相关的库，如time、datatime和calendar库。其中time库是Python中处理时间的标准库
- 动态图现在已经融入了我们的日常网络生活，大大丰富了我们的表达方式和交流趣味性。常常是一言不合就扔动图，我这里就不举例子了，例子太多，平时大家
- 代码如下:'===================================== '转换内容，防止意外 '==
- 本文实例讲述了Python实现读取TXT文件数据并存进内置数据库SQLite3的方法。分享给大家供大家参考，具体如下：当TXT文件太大，计算
- 问题： 将u'\u810f\u4e71'转换为'\u810f\u4e71'
- 1. 简介有些时候在项目中，使用配置文件来配置一些灵活的参数是比较常见的事，因为这会使得代码的维护变得更方便。而ini配置文件是比较常用的一
- 前言项目中大量用到图片加载，由于图片太大，加载速度很慢，因此需要对文件进行统一压缩一：导入包from PIL import Imageimp
- 起因事情是这样的，项目最近有个需求。服务器有个图片空间，说白了就是个文件夹。文件夹的结构大家都知道，一层一层的。然后需要在前端以树形展示。具
- @using@using 指令用于向生成的视图添加 C# using 指令：@using System.IO@{
- 本文实例为大家分享了opencv实现车牌识别的具体代码，供大家参考，具体内容如下（1）提取车牌位置，将车牌从图中分割出来；（2）车牌字符的分
- 创建项目Location：新项目文件夹GOROOT：go 安装根目录Proxy：https://goproxy.io,direct重要：ht
- 打包pyinstaller 02.py --noconsole --hidden-import PySide2.QtXml报错0：The &
- Python 中的运算符什么是运算符？举个简单的例子 4 +5 = 9 。 例子中，4 和 5 被称为操作数，"+" 称
- pycharm对数据库的查询等操作(非多步操作)import pymysqlimport pandas as pdconnect = pym
- 本文实例讲述了python下MySQLdb用法。分享给大家供大家参考。具体分析如下：下载安装MySQLdb① linux版本http://s
- python输入错误怎么删除？python常用的输入函数raw_input()在输入的过程中如果输错了，不能像在命令行下那样backspac
- 当你试图在mysql中创建一个外键的时候，这个出错会经常发生，这是非常令人沮丧的。像这种不能创建一个.frm 文件的报错好像暗示着操作系统的
