📄 dvonline.js
字号:
//论坛在线显示
function killErrors() {return true;}
//window.onerror = killErrors;
Dvbbs.OnineGuestlist='';
Dvbbs.OnineUserlist='';
var htmlcode;
function UserOnlineList(){this.id= new Array();this.username= new Array();this.UserGroupID= new Array();this.userhidden= new Array();this.userid= new Array();this.userclass= new Array();this.startime= new Array();this.lastimebk= new Array();this.browser= new Array();this.actCome=new Array();this.IP=new Array();this.stats=new Array();}
var Users= new UserOnlineList();
var Guests= new UserOnlineList();
function showonline()
{
parent.all.innerHTML=Dvbbs.allonline;
parent.allu.innerHTML=Dvbbs.onlinenum;
parent.allg.innerHTML=Dvbbs.guestnum;
//分解数据
var tmpstr0,j,k
if(Dvbbs.OnineUserlist!='')
{
Dvbbs.OnineUserlist=vhtmlencode(Dvbbs.OnineUserlist)
Dvbbs.OnineUserlist=Dvbbs.OnineUserlist.split("!#@@$#")
for (i=0;i<Dvbbs.OnineUserlist.length-1;i++)
{
tmpstr0=Dvbbs.OnineUserlist[i].split("@##@#@")
Users.username[i]=tmpstr0[0];
Users.UserGroupID[i]=tmpstr0[1];
Users.userhidden[i]=tmpstr0[2];
Users.userid[i]=tmpstr0[3];
Users.userclass[i]=tmpstr0[4];
j=5;
if (Dvbbs.Forum_Setting[33]=='1')
{
Users.stats[i]=tmpstr0[j];
j++;
}
else
{
Users.stats[i]='保密';
}
if (Dvbbs.Forum_Setting[34]=='1')
{
Users.startime[i]=tmpstr0[j];
j++;
Users.lastimebk[i]=tmpstr0[j];
j++;
}
else
{
Users.startime[i]='无记录';
Users.lastimebk[i]='无记录';
}
if (Dvbbs.Forum_Setting[35]=='1')
{
Users.browser[i]=tmpstr0[j];
j++;
}
else
{
Users.browser[i]='不公开';
}
if (Dvbbs.Forum_Setting[36]=='1')
{
Users.actCome[i]=tmpstr0[j];
j++;
}
else
{
Users.actCome[i]='不公开';
}
if (Dvbbs.Master || Dvbbs.GroupSetting[30] =='1')
{
Users.IP[i]=tmpstr0[j];
j++;
}
else
{
Users.IP[i]='*.*.*.*';
}
}
}
//显示在线用户数据
htmlcode='<table width="100%" border="0" cellspacing="0" cellpadding="0" ><tr>';
k=1
for (i=0;i < Users.username.length;i++)
{
htmlcode+='<td width="14%">';
htmlcode+=showonline_face(Users.UserGroupID[i],Users.userclass[i],Users.userhidden[i]);
if (Users.username[i]==Dvbbs.MemberName)
{
htmlcode+='<a title="您自己"><font color="'+Dvbbs.Forum_pic[5]+'">'+Users.username[i]+'</font></a></td>';
}
else
{
if (Dvbbs.Master==false)
{
if (Users.userhidden[i]!='2')
{
Users.username[i]='隐身会员'
htmlcode+='<a onMouseOver=\'parent.ShowMenu("目前位置:'+Users.stats[i]+'<br>来访时间:'+Users.startime[i]+'<br>活动时间:'+Users.lastimebk[i]+'",100)\'><font color="#000000">'+Users.username[i]+'</font></a></td>';
}
else
{
htmlcode+='<a onMouseOver=\'parent.ShowMenu("目前位置:'+vhtmlencode(Users.stats[i])+'<br>来访时间:'+Users.startime[i]+'<br>活动时间:'+Users.lastimebk[i]+'<br>'+usersysinfo(Users.browser[i],2)+'<br>'+usersysinfo(Users.browser[i],1)+'<br>I P地 址:<a href=look_ip.asp?action=lookip&ip='+Users.IP[i]+' target=_blank>'+Users.IP[i]+'</a><br>来源鉴定:'+Users.actCome[i]+'<br><a style=font-size:9pt;line-height:14pt; href=dispuser.asp?name='+ Users.username[i]+' target=_blank >查看资料</a> <a style=font-size:9pt;line-height:14pt; href=messanger.asp?action=new&touser='+ Users.username[i]+' target=_blank >给他留言</a>",100)\'><font color="#000000">'+Users.username[i]+'</font></a></td>';
}
}
else
{
htmlcode+='<a onMouseOver=\'parent.ShowMenu("目前位置:'+Users.stats[i]+'<br>来访时间:'+Users.startime[i]+'<br>活动时间:'+Users.lastimebk[i]+'<br>'+usersysinfo(Users.browser[i],2)+'<br>'+usersysinfo(Users.browser[i],1)+'<br>I P地 址:<a href=look_ip.asp?action=lookip&ip='+Users.IP[i]+' target=_blank>'+Users.IP[i]+'</a><br>来源鉴定:'+Users.actCome[i]+'<br><a style=font-size:9pt;line-height:14pt; href=dispuser.asp?name='+ Users.username[i]+' target=_blank >查看资料</a> <a style=font-size:9pt;line-height:14pt; href=messanger.asp?action=new&touser='+ Users.username[i]+' target=_blank >给他留言</a>",100)\'><font color="#000000">'+Users.username[i]+'</font></a></td>';
}
}
k++;
if (k==7)
{
htmlcode+='</tr><tr>';
k=1
}
}
htmlcode+='</tr><tr>'
//分解访客信息
if(Dvbbs.OnineGuestslist!='')
{
Dvbbs.OnineGuestlist=vhtmlencode(Dvbbs.OnineGuestlist)
Dvbbs.OnineGuestlist=Dvbbs.OnineGuestlist.split("!#@@$#")
for (i=0;i<Dvbbs.OnineGuestlist.length-1;i++)
{
tmpstr0=Dvbbs.OnineGuestlist[i].split("@##@#@")
Guests.id[i]=tmpstr0[0];
j=1;
if (Dvbbs.Forum_Setting[33]=='1')
{
Guests.stats[i]=tmpstr0[j];
j++;
}
else
{
Guests.stats[i]='保密';
}
if (Dvbbs.Forum_Setting[34]=='1')
{
Guests.startime[i]=tmpstr0[j];
j++;
Guests.lastimebk[i]=tmpstr0[j];
j++;
}
else
{
Guests.startime[i]='无记录';
Guests.lastimebk[i]='无记录';
}
if (Dvbbs.Forum_Setting[35]=='1')
{
Guests.browser[i]=tmpstr0[j];
j++;
}
else
{
Guests.browser[i]='不公开';
}
if (Dvbbs.Forum_Setting[36]=='1')
{
Guests.actCome[i]=tmpstr0[j];
j++;
}
else
{
Guests.actCome[i]='不公开';
}
if (Dvbbs.Master || Dvbbs.GroupSetting[30] =='1')
{
Guests.IP[i]=tmpstr0[j];
j++;
}
else
{
Guests.IP[i]='*.*.*.*';
}
}
}
k=1
for (i=0;i < Guests.id.length;i++)
{
htmlcode+='<td width="14%">';
htmlcode+=Dvbbs.GroupList[7]+' '
if (Guests.id==MyStatUserID)
{
htmlcode+='<a title="您自己"><font color="'+Dvbbs.Forum_pic[5]+'">客人</font></a></td>';
}
else
{
htmlcode+='<a onMouseOver=\'parent.ShowMenu("目前位置:'+vhtmlencode(Guests.stats[i])+'<br>来访时间:'+Guests.startime[i]+'<br>活动时间:'+Guests.lastimebk[i]+'<br>'+usersysinfo(Guests.browser[i],2)+'<br>'+usersysinfo(Guests.browser[i],1)+'<br>I P地 址:<a href=look_ip.asp?action=lookip&ip='+Guests.IP[i]+' target=_blank>'+Guests.IP[i]+'</a><br>来源鉴定:'+Guests.actCome[i]+'",100)\'><font color="#000000">客人</font></a></td>';
}
k++;
if (k==7)
{
htmlcode+='</tr><tr>';
k=1
}
}
htmlcode+='</tr></table>'
parent.followTd.innerHTML=htmlcode
htmlcode=''
}
function showonline_face(GroupID,Group,hideen)
{
if (hideen!='2')
{
Group='隐身会员'
return('<img src="'+Dvbbs.Forum_Info[7]+'messages2.gif" alt="'+Group+'" width="12" height="11"> ')
}
else
{
if (GroupID=='9999')
{
return(Dvbbs.GroupList[0])
}
else
{
return(Dvbbs.GroupList[GroupID])
}
}
}
//根据返回浏览器参数判断用户浏览器类型和操作系统函数
function usersysinfo(info,getinfo){
var infoArray;
var str1,str2
infoArray=info
infoArray=infoArray.substring(infoArray.indexOf("(",0)+1,infoArray.lastIndexOf(")",infoArray.length))
infoArray=infoArray.replace(/ /gi," ")
infoArray=infoArray.split(";")
if (infoArray.length > 2)
{
str1=infoArray[1]
str1=str1.replace(/MSIE/gi,'Microsoft Internet Explorer ')
str2=infoArray[2]
str2=str2.replace(")","")
str2=str2.replace("NT 5.1","XP")
str2=str2.replace("NT 5.0","2000")
str2=str2.replace("NT 5.2","2003")
str2=str2.replace("9x","ME")
str1="浏 览 器:" + str1
str2="操作系统:" + str2
if (getinfo==1)
{
return(str1);
}
else
{
return(str2);
}
}
else
{
if (getinfo==1)
{
return("浏 览 器:未知");
}
else
{
return("操作系统:未知");
}
}
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -