chat.asp

基于ASP开发的聊天室源码

}

function manip()
{
if(man_ip.indexOf(mygrade)!=-1 && userna!=selfname)
 {window.open('man_ip.asp?name='+userna,'man','height=210,width=310,left=150,top=60,resizable=no,scrollbars=auto,status=no,toolbar=no,menubar=no,location=no');}
}

function manzha()
{
if(man_hongzha.indexOf(mygrade)!=-1 && userna!=selfname)
{window.open('man_hongzha.asp?name='+userna,'man','height=210,width=310,left=150,top=60,resizable=no,scrollbars=auto,status=no,toolbar=no,menubar=no,location=no');}
}

function muxia()
{
 if(mumode == 1){
  mumode = 0;
  if(songs == 1){
  this.muxia1.rows = "0,*,0,0,0";}
  else{
   this.muxia1.rows = "40,*,0,0,0";}
  this.l3.allsay.xia.value="↑";
  this.l3.document.allsay.saysword.focus();}
 else{mumode = 1;
 if(songs == 1){
  this.muxia1.rows = "0,*,76,0,0";}
  else{this.muxia1.rows = "40,*,76,0,0";}
    this.l3.allsay.xia.value="↓";
    this.l3.document.allsay.saysword.focus();}}
function muzuo(){
 if(zuomode == 1){zuomode = 0;
  this.zuo.cols = "0,0,*,0,0,0";
  this.l3.allsay.zuo.value="←";
  this.l3.document.allsay.saysword.focus();}
 else{zuomode = 1;
  this.zuo.cols = "0,0,*,160,0,0";
  this.l3.allsay.zuo.value="→";
  this.l3.document.allsay.saysword.focus();}}
function fp(){
 if(fpmode == 1 && fpmode2 == 1){
  fpmode = 0;
  this.fpp.rows = "*,0";
  this.fpp.cols="*";
  this.l3.document.allsay.saysword.focus();
  this.l3.document.allsay.b5.value="一屏";}
 else{
if(fpmode2==1){
 fpmode = 1;
 fpmode2 = 0;
 this.fpp.rows = "*,*";
 this.fpp.cols="*";
 this.l3.document.allsay.saysword.focus();
 this.l3.document.allsay.b5.value="分屏";
}else
 {fpmode = 1;
 fpmode2 = 1;
 this.fpp.rows = "*";
 this.fpp.cols = "*,*"
 this.l3.document.allsay.saysword.focus();
 this.l3.document.allsay.b5.value="垂直";
}}
}

function changeshowmode()
{
if(this.l3.document.allsay.pbhr.checked && this.l3.document.allsay.zlhy.checked)
{showmode="friendonly";}
if(!this.l3.document.allsay.pbhr.checked && !this.l3.document.allsay.zlhy.checked)
{showmode="all"}
if(this.l3.document.allsay.pbhr.checked && !this.l3.document.allsay.zlhy.checked)
{showmode="nobadman"}
if(!this.l3.document.allsay.pbhr.checked && this.l3.document.allsay.zlhy.checked)
{showmode="friendonly"}
}

function w(ww1,ww2,ww3,ww4,ww5)
{
ww2s=ww2.split("|");

if(ww3=="radio" && ww1 != selfname)
{recall(ww1,ww2s[0],ww4,"系统广播","yes",0,"ok");}

if(ww3=="poll")
{this.l3.poll.innerHTML=ww2;this.l2.document.writeln(ww4+"<br>");}

if(showmode=="all" || showmode=="friendonly" && friendlist.indexOf(","+ww1+",")!=-1 || showmode=="nobadman" && unfriendlist.indexOf(","+ww1+",")==-1)
{canshowit="yes"}else{canshowit="no"}

if(ww5==nowroom)
{

if(ww3=="add")
{if( ww1!=selfname )
 {addlist(ww1,ww2);}if(canshowit=="yes"){if(ww1!=selfname ){showlist();}if(fpmode==1 && ww1==selfname){this.l4.document.writeln(ww4+"<br>");}else{this.l2.document.writeln(ww4+"<br>");}}}

if(ww3=="del" || ww3=="drop")
 {dellist(ww1);if(canshowit=="yes"){showlist();this.l2.document.writeln(ww4+"<br>");}}

if(ww3=="kick" || ww3=="ip" || ww3=="hongzha")
 {dellist(ww1);showlist();this.l2.document.writeln(ww4+"<br>");}

if(ww3=="down")
 {dellist(ww1);if(canshowit=="yes"){showlist();outdown=outdown1.replace("(name)"," <img border='0' height='16' width='16' src='images/ICO/"+ww2+"-2.gif'><font color=#0000ff>"+ww1+"</font> ");this.l2.document.writeln(outdown+ww4+"<br>");}}

if(ww3=="changeinfo")
 {changeinfo(ww1,ww2);if(canshowit=="yes"){showlist();if(fpmode==1 && ww1==selfname){this.l4.document.writeln(ww4+"<br>");}else{this.l2.document.writeln(ww4+"<br>");}}}

if(ww3=="addfriend" && ww2==selfname)
 {window.open('friendyou.asp?name='+ww1+'&word='+ww4,'addfriendyou','height=210,width=310,left=150,top=60,resizable=no,scrollbars=auto,status=no,toolbar=no,menubar=no,location=no');}

if(ww3=="delfriend" && ww2==selfname)
 {window.open('frienddelyou.asp?name='+ww1+'&word='+ww4,'delfriendyou','height=210,width=310,left=150,top=60,resizable=no,scrollbars=auto,status=no,toolbar=no,menubar=no,location=no');}

if(ww3=="addbadman" && ww2==selfname)
 {window.open('badmanyou.asp?name='+ww1+'&word='+ww4,'addbadmanyou','height=210,width=310,left=150,top=60,resizable=no,scrollbars=auto,status=no,toolbar=no,menubar=no,location=no');}

if(ww3=="delbadman" && ww2==selfname)
 {window.open('badmandelyou.asp?name='+ww1+'&word='+ww4,'delbadmanyou','height=210,width=310,left=150,top=60,resizable=no,scrollbars=auto,status=no,toolbar=no,menubar=no,location=no');}

if(ww3=="system")
 {if(ww1==selfname || ww2==selfname){if(fpmode==1){this.l4.document.writeln(ww4+"<br>");}else{this.l2.document.writeln(ww4+"<br>");}}}

if(ww3=="hiddensystem")
 {if(ww2==selfname){if(fpmode == 1){this.l4.document.writeln(ww4+"<br>");}else{this.l2.document.writeln(ww4+"<br>");}}}

if(ww3=="unip")
 {this.l2.document.writeln(ww4+"<br>");}


if(canshowit=="yes")
{
ww1l="<a target=\"l3\" href=\"javascript:parent.l3.selectuser('["+ww1+"]');\"><font color=#ff6600>"+ww1+"</font></a>"
ww2l="<a target=\"l3\" href=\"javascript:parent.l3.selectuser('["+ww2+"]');\"><font color=#ff6600>"+ww2+"</font></a>"
songlink="<a target=\"l3\" href=\"javascript:parent.l3.selectuser('["+ww2s[0]+"]');\"><font color=#ff6600>"+ww2s[0]+"</font></a>"
if(ww3 == "titlesay"){
if(ww1==selfname){
this.mishu("为了避免标题发言过于频繁，系统已经自动将方式切换为“公聊”。");
this.l3.document.allsay.fss.value="allsay";
this.l3.document.allsay.fss.options[0].selected=1;}
writetitle(ww4);}

if(ww3 == "allsay"){
if(ww1 == selfname){if(fpmode == 1){this.l4.document.writeln(ww4+"<br>");}else{this.l2.document.writeln(ww4+"<br>");}}
else{if(ww2 == selfname){if(fpmode == 1){this.l4.document.writeln("[<img src='images/see.gif'>]"+ww4+"<br>");}
else{this.l2.document.writeln("[<img src='images/see.gif'>]"+ww4+"<br>");}}else{this.l2.document.writeln(ww4+"<br>");}}
}

if(ww3 == "onlysay"){
if(ww1 == selfname){if(fpmode == 1){this.l4.document.writeln(ww4+"<br>");}else{this.l2.document.writeln(ww4+"<br>");}}
else{if(ww2 == selfname){if(fpmode == 1){this.l4.document.writeln(ww4+"<br>");}else{this.l2.document.writeln(ww4+"<br>");}}}
}

if(ww3=="callyou" && ww2s[0]==selfname && this.l3.document.allsay.hjj.checked){
recall(ww1,ww2s[1],ww4,ww2s[2],"no",0,"");
}

if(ww3=="callyou" && ww2s[0]==selfname && !this.l3.document.allsay.hjj.checked){
this.autosay.location.href="autosay.asp?id=0&tot="+ww1;
if(fpmode==1){this.l4.document.write("[消息]<a href=\"javascript:parent.l3.selectuser('["+ww1+"]');\"><font color=\"#FF00FF\">"+ww1+"</font></a> 试图给你发送呼叫，该操作已经被拒绝。<font style='font-size: 8pt' color='#808080'>("+timev+")</font>");}
else{this.l2.document.write("[消息]<a href=\"javascript:parent.l3.selectuser('["+ww1+"]');\"><font color=\"#FF00FF\">"+ww1+"</font></a> 试图给你发送呼叫，该操作已经被拒绝。<font style='font-size: 8pt' color='#808080'>("+timev+")</font>");}
}

if(ww3=="selfsong" && ww2s[0]==selfname && !this.l3.document.allsay.dgg.checked || ww3=="selesong" && ww2s[0]==selfname && !this.l3.document.allsay.dgg.checked){
this.autosay.location.href="autosay.asp?id=1&tot="+ww1;}

if(ww3 == "allsay" && ww2==selfname && this.l3.document.allsay.ztt.checked || ww3 == "onlysay" && ww2==selfname && this.l3.document.allsay.ztt.checked)
{autoword = escape(this.l3.document.allsay.saysword.value);
this.autosay.location.href="autosay.asp?id=2&tot="+ww1+"&autoword="+autoword;}

if(ww3 == "selesong"){
if(fpmode == 1 && ww2s[0] == selfname || fpmode == 1 && ww1 == selfname){
this.l4.document.writeln("[点歌]"+ww1l+" 把一首[<font color=#ff6600>"+ww2s[1]+"</font>]的[<font color=#ff6600>"+ww2s[2]+"</font>]献给了 "+songlink+" ，用以表达我的心意...<FONT style='FONT-SIZE: 8pt' color=#808080>("+ww2s[3]+")</FONT><br>");}
else{this.l2.document.writeln("[点歌]"+ww1l+" 把一首[<font color=#ff6600>"+ww2s[1]+"</font>]的[<font color=#ff6600>"+ww2s[2]+"</font>]献给了 "+songlink+" ，用以表达我的心意...<FONT style='FONT-SIZE: 8pt' color=#808080>("+ww2s[3]+")</FONT><br>");}}

if(ww3 == "selfsong"){
if(fpmode == 1 && ww2s[0] == selfname || fpmode == 1 && ww1 == selfname){
this.l4.document.writeln("[点歌]"+ww1l+" 给 "+songlink+" 送上一首精心挑选的歌，至于是什么歌...保密呦^_^<FONT style='FONT-SIZE: 8pt' color=#808080>("+ww2s[1]+")</FONT><br>");}
else{this.l2.document.writeln("[点歌]"+ww1l+" 给 "+songlink+" 送上一首精心挑选的歌，至于是什么歌...保密呦^_^<FONT style='FONT-SIZE: 8pt' color=#808080>("+ww2s[1]+")</FONT><br>");}}

if(ww3 == "selesong" && ww2s[0]==selfname && this.l3.document.allsay.dgg.checked)
{resong(ww1,ww2s[1],ww2s[2],ww4,ww2s[3]);}

if(ww3 == "selfsong" && ww2s[0]==selfname && this.l3.document.allsay.dgg.checked)
{resong(ww1,"","",ww4,ww2s[1]);}

if(ww3=="add" || ww3=="del" || ww3=="down" || ww3=="kick" || ww3=="ip" || ww3=="hongzha" || ww3=="drop" || ww3=="changeinfo" || ww3=="onlysay" && ww2==selfname ||  ww3=="onlysay" && ww1==selfname  || ww3=="allsay" || ww3=="selesong" || ww3=="selfsong")
{
if(this.l3.autoscrollon == true)
{
this.l2.scroll(0,65534);
this.l4.scroll(0,65534);
}
clsnow();
}

}
else{
if(ww3=="allsay" && ww2==selfname || ww3!="allsay" && ww3!="titlesay" && ww3!="hiddensystem" && ww3!="add" && ww3!="del" && ww3!="kick" && ww3!="down" && ww3!="changeinfo" && ww3!="addfriend" && ww3!="delfriend" && ww3!="addbadman" && ww3!="delbadman")
{this.autosay.location.href="autosay.asp?id=3&tot="+ww1+"&mode="+showmode;}
}
}

if(ww3=="del" && friendlist.indexOf(","+ww1+",")!=-1)
  {mishu("你的好友 <font color='#0000FF'>"+ww1+"</font> 已经离开房间“<font color='#008000'>"+ww5+"</font>”。");}
if(ww3=="add" && friendlist.indexOf(","+ww1+",")!=-1)
  {mishu("你的好友 <font color='#0000FF'>"+ww1+"</font> 已经进入房间“<font color='#008000'>"+ww5+"</font>”。");}
if(ww3=="kick" && friendlist.indexOf(","+ww1+",")!=-1)
  {mishu("你的好友 <font color='#0000FF'>"+ww1+"</font> （在房间“<font color='#008000'>"+ww5+"</font>”）已经被踢出聊天室。");}
if(ww3=="ip" && friendlist.indexOf(","+ww1+",")!=-1)
  {mishu("你的好友 <font color='#0000FF'>"+ww1+"</font> （在房间“<font color='#008000'>"+ww5+"</font>”）已经被封锁了IP。");}
if(ww3=="hongzha" && friendlist.indexOf(","+ww1+",")!=-1)
  {mishu("你的好友 <font color='#0000FF'>"+ww1+"</font> （在房间“<font color='#008000'>"+ww5+"</font>”）已经被炸上了天。");}
if(ww3=="down" && friendlist.indexOf(","+ww1+",")!=-1)