ASP实例:即时显示当前页面浏览人数
2009-02-08 21:14
351 查看
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()&"人"")"%> |
相关文章推荐
- 利用ASP显示当前在线人数
- 基于Global.asax实现显示当前在线人数--ASP.NET基础
- jsp页面中两种方法显示当前时间的简单实例
- jsp页面中两种方法显示当前时间的简单实例
- JavaScript实现页面实时显示当前时间的简单实例
- 利用ASP显示当前在线人数
- asp.net + CSS实现动态菜单突出显示当前页面!
- JavaScript页面实时显示当前时间实例代码
- 使用ASP.NET页面创建可视的UI,在客户机上实例化MSXML分析器的页面从中间层组件取出XML数据、操作并显示 并有问题请高手解决
- JavaScript实现页面实时显示当前时间的简单实例
- asp.net中页面显示当前系统时间(aspx)
- 利用ASP显示当前在线人数
- asp怎样显示当前页的在线人数
- asp.net中页面显示当前系统时间附图
- asp.net中页面显示当前系统时间附图
- JavaScript页面实时显示当前时间实例代码
- 在页面中输出当前客户端时间javascript实例代码
- ASP.NET页面中显示数据库记录集最快的方法
- ASP.NET实现个人信息注册页面并跳转显示
- html页面静态页面实现统计访问人数实例代码