<%lvl=validate(0) if allowtracking="" then response.write "

 

The user tracking feature is currently disabled

" response.end end if sortby=request("sortby") if sortby="" then sortby="lastdate desc" logindate=getlogin(now) %> Absolute Live Support : Visitor Activity <%if tracklimit="" or tracklimit=0 then tracklimit="100%" psql="select top "&tracklimit&" * from xlaALSVisitors order by "&sortby set conn=server.createobject("ADODB.Connection") conn.open connection call deletevisitors() set rs=conn.execute(psql) do until rs.eof name=rs("name") totalrequests=rs("totalrequests") ip=rs("ip") if name="" then user=ip else user=""&name&"
"&ip if totalrequests<>"" then user=user&"
"&totalrequests&" Requests" referer=rs("referer") timeonpage=datediff("n",rs("lastdate"),logindate) actionnote=replace(rs("actionnote")&"",vbcrlf,"
") actionid=rs("actionid") select case actionid case 0 bgcolor="#00CC00" case 1 bgcolor="#FFCC00" case 2 bgcolor="#0099CC" case 3 bgcolor="#666666" invitelink="javascript:alertproactive('"&ip&"','"&sessionid&"',3);" case 4 bgcolor="#FF3300" case 5 bgcolor="#9933CC" end select %> <%rs.movenext loop rs.close set rs=nothing conn.close set conn=nothing%>
Visitor On Page Time Status
<%=user%> <%=referer%>
<%=timeonpage%> Mins
<%=actionnote%>