当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 如何显示在线人数和所在位置

ASP.NET
Internet Explorer 编程简述(二)在IE中编辑OLE嵌入文档
移动窗体
.NET 2.0获取数据库连接统计数据
VB.NET 拖动无边框的窗体
利用WH_CBT Hook将非模态对话框显示为模态对话框
Aspect#应用 - 权限验证
VB 从零开始编外挂(一)
【错误解决】Unable to find script library 'WebUIValidation.js'
VB 从零开始编外挂(四)
DTD指南(3)-DTD-Elements(元素)
知识库文章MDL9745154-File:Microsoft Visual Basic 运行时库
.net手机软件开发(六)OBEX应用:文件传输部分
在winform中使用WebBrowser控件时怎样去除IE的滚动条
WINZIP及WINRAR命令!!!!!
智能客户端相关Application Block结构功能分析(二)
如何在VB中操作EXCEL(一段代码,两个可以使用的过程)
在C#中用最简洁有效的代码执行存储过程并返回数据
.Net的Collection类的一些使用说明
ASP.NET实现数据图表c
用asp.net画饼图

ASP.NET 中的 如何显示在线人数和所在位置


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-23   浏览: 101 ::
收藏到网摘: n/a

一、原理

在.net中的global.asax中有Application_AuthenticateRequest事件和Application_BeginRequest事件是在每次访问aspx文件都会触发。但是Application_BeginRequest中不能对已经经过FROMS身份验证的身份ticket票进行识别。所以只能放到Application_AuthenticateRequest中去。

我的实现原理是:每次访问aspx文件时候都会判断在线表里面是否有这个用户(已经登录了的记录用户名,没有登录的记录IP地址),如果不存在,则将该用户的身份、最后访问时间、最后访问IP、和最后访问的URL存入数据库。如果数据库中已经曾在,则更新该记录,把最后访问时间,IP以及最后访问URL更新。

同时,删除数据库中与当前时间间隔20分钟以上的数据(20分钟没操作当为超时)。

二、优点

这样,你不仅仅可以看到当前在线的准确人数,还知道是那些人在线,以及是否登陆,和访问人数中已经是会员的比例,以及所在位置,并计算某个页上的人数。

三、数据库结构:

主键字段类型长度是否为空说明
1uson_serialint40序号
0uson_uservarchar200用户名(没登陆则为IP)
0uson_companyvarchar1000公司名(没登陆则为'游客')
0uson_ipvarchar200IP地址
0uson_datedatetime80最后操作时间
0uson_urlvarchar1000最后操作页面路径

四、程序

注意:

1、程序位于global.asax中
2、我是使用的FORMS身份验证
3、请usingSystem.Web.Security


protectedvoidApplication_AuthenticateRequest(Objectsender,EventArgse)
{
stringstrUserID=string.Empty;
stringstrCompany=string.Empty;
if(Request.IsAuthenticated)
{
FormsIdentityidentity=(FormsIdentity)User.Identity;
FormsAuthenticationTicketticket=identity.Ticket;
strUserID=User.Identity.Name;
strCompany=ticket.UserData.Split("|".ToCharArray())[2];
}
else
{
strUserID=Request.UserHostAddress;
strCompany="游客";
}

MemberOnlineInfoobjOnline=newMemberOnlineInfo(strUserID,Request.UserHostAddress,DateTime.Now.ToString(),Request.FilePath,strCompany);

MemberAccountaccount=newMemberAccount();
if(!account.CheckUserOnline(strUserID))
account.AddOnline(objOnline);
else
account.UpdateOnline(objOnline);

//删除超时的会员
account.DeleteOnline();
}