三、ASPNET中实现在线用户检测（使用后台守护线程）

2022-07-15 80酷酷网 80kuku.com

　　后台|在线启动后台线程可以用下面的语句：
CheckOnline online=new CheckOnline();

用户可以将它放到GLOBAL。ASAX中，我是没有了，只放到了一个ASPX文件中做简单的测试。如下

//start.aspx

<% Page Language="c#" autoEventWireup=true Debug="true" %>
<% Assembly Name="Soholife" %>
<%Import Namespace="System"%>
<%Import Namespace="Soholife"%>
<%Import Namespace="System.Collections"%>

<script runat="Server" Language="C#">
void Page_Load(Object sender, EventArgs args)
{
    CheckOnline online=new CheckOnline();
}

</script>

<html><head>
<style type="text/css">
    td{font-size:12;}
    .bgcolor{background:#ffffcc;}
</style>
</head>
<body><center>

</center></body></html>

而我们还需要一个程序来显示当前在线拥护的数据，程序如下：

//online.aspx

<% Page Language="c#" autoEventWireup=true Debug="true" %>
<% Assembly Name="Soholife" %>
<%Import Namespace="System"%>
<%Import Namespace="Soholife"%>
<%Import Namespace="System.Collections"%>

<script runat="Server" Language="C#">
void Page_Load(Object sender, EventArgs args)
{
    OnLineUser temp= new OnLineUser();

    ArrayList alluser =temp.alluser;
    string str="";
    str += "<tr bgcolor=#ffff99>";
    str += "<td width=100 align=center class=coolbar>用户</td>";
    str += "<td align=center width=150 class=coolbar>登陆时间</td>";
    str += "<td align=center width=150 class=coolbar>最近时间</td>";
    str += "<td width=100 height=20 class=coolbar>当前位置</td>";
    str += "</tr>";


    for ( int i = 0 ; i < alluser.Count ; i++)
    {
        Soholife.User tempuser=(Soholife.User)alluser[i] ;
        str += "<tr bgcolor=white>";
        str += "<td>" + tempuser.name + "</td>";
        str += "<td>" + tempuser.lasttime + "</td>";
        str += "<td>" + tempuser.curtime + "</td>";
        str += "<Td>" + tempuser.iswhere + "</td>";
        str += "</tr>";
    }
    maininfo.Text=str;
}

</script>

<html><head>
<style type="text/css">
    td{font-size:12;}
    .bgcolor{background:#ffffcc;}
</style>
<script language=javascript>
function openwindow(url,w,h)
    {
    window.open(url,"","toolbar=no,menubar=no,directories=no,status=yes,width=" + w + ",height=" + h + ",scrollbars=yes,resizable=yes");
    return false;
    }
</script>
</head>

<body bgcolor="#ccffcc"><center>

<table width=450 bgcolor=white cellpadding="0" cellspacing="0" colspan=2 align=center class=bar>当前在线用户</td></tr>
</table>

<asp:Label font-size="8pt" id="showmsg" runat="server"/>
<table width=450 bgcolor=white cellpadding="2" cellspacing="1" class="Grid">
    <asp:Label font-size="8pt" id="maininfo" runat="server"/>
</table>
</center></body></html>