⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 l3.asp

📁 基于ASP开发的聊天室源码
💻 ASP
字号:
<%
Response.Expires=0
Response.ExpiresAbsolute=Now()-1
Response.AddHeader "Pragma","No-Cache"
Response.AddHeader "Cache-Control","Private"
Response.CacheControl = "No-Cache"
%>
<!--#INCLUDE FILE="config.asp" -->
<%
If Not IsArray(Session("info")) Then Response.Redirect "err.asp?kind=20"
info = Session("info")
If InStr(Application("maninfo"),"," & info(0) & ",") <> 0 Then Response.Redirect "manyou.asp"
%>
<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style><!--
.but { font-family:'宋体';border:1px solid #C1D2EE; background-color: <%=zzbird_butbg%> ;color: <%=zzbird_buttext%>;CURSOR: hand; }
body { font-family:'宋体';font-size: 9pt;color:<%=zzbird_chattext%>}
.text { font-family:'宋体';border:1px solid #C1D2EE;font-size: 9pt ;background-color: <%=zzbird_saybg%>}
select { font-family:'宋体';font-size: 9pt ;color: <%=zzbird_selecttext%>; background-color: <%=zzbird_selectbg%>}
a:active { font-family:'宋体';font-size: 9pt; color: <%=zzbird_chattext%> ;text-decoration: none}
a:link { font-family:'宋体';font-size: 9pt; color: <%=zzbird_chattext%> ;text-decoration: none}
a:visited { font-family:'宋体';color: <%=zzbird_chattext%>; font-size: 9pt ;text-decoration: none}
a { font-family:'宋体';color: <%=zzbird_chattext%>; font-size: 9pt ;text-decoration: none}

--></style>
<Script Language="JavaScript">
parent.l2.document.open();
parent.l2.document.writeln("<body bgcolor=<%=zzbird_saybg%>>");
parent.l2.document.writeln("<form><font style='font-family:宋体;font-size:10.5pt'><font color=red>【建立连接】</font>正在与服务器建立连接……<br><br><input type=text name=str size=88 readonly value='请稍候' style='font-size:10.5pt;background-color:<%=zzbird_saybg%>;color:000000;border: 1 double'></font></form>");
parent.l2.document.writeln("<\script language=javascript>function wslh(){if(document.forms[0].str.value.length>76){document.forms[0].str.value='请稍候'}document.forms[0].str.value=document.forms[0].str.value + ' ';document.forms[0].str.select();setTimeout('wslh()', 100);}wslh();<\/script></body>");
parent.l2.document.close();
var nowautowords="";
var autoscrollon = true;
var bc=1;
var sayw;
var oldv;
var txv;
var selflink;
var namelink;
var namecolors;
var saycolors;
var bq;
var tx;
var he_name;
if(window==window.top){top.location.href="chat.asp?fp=1";}
function change(){if(document.allsay.gpp.checked){autoscrollon = true;parent.l2.scroll(0,65534);parent.l4.scroll(0,65534);}else{autoscrollon = false}}
function sete(){document.allsay.saysword.value="";document.allsay.saysword.focus();}
function reset1(){
document.allsay.txx.value="";
document.allsay.txx.options[0].selected=1;
document.allsay.dz.value="";
document.allsay.dz.options[0].selected=1;
document.allsay.saysword.value="";
document.allsay.saysword.focus();}

function saystart(){
he_name=document.allsay.hename.value;
while(he_name.indexOf(",") != -1)
{
he_name = he_name.replace(",","")
}
if(he_name=="" || he_name==" "){alert("你要对谁说话?");return false;}
if(he_name=="<%=info(0)%>"){alert("自言自语?");return false;}
if(parent.zzbird_name.indexOf("," + he_name + ",") == -1 && he_name != parent.automan && he_name != "大家")
{alert("对不起,该聊友不在该聊天室内,无法对其发言。");return false;}
if(document.allsay.fss.value=="titlesay" && parent.man_title.indexOf(parent.mygrade)==-1)
{alert("对不起,你目前的级别已经被规定不能使用标题!");return false;}
namelink="<a href=javascript:parent.l3.selectuser('[" + document.allsay.hename.value + "]'); target=l3><font color=0000ff>" + document.allsay.hename.value + "</font></a>"
selflink="<a href=javascript:parent.l3.selectuser('[" + parent.selfname + "]'); target=l3><font color='" + document.allsay.namecolor.value + "'>" + parent.selfname + "</font></a>"
document.allsay.fs.value=document.allsay.fss.value;
document.allsay.tx.value=document.allsay.txx.value;
if(document.allsay.fs.value!="allsay" && document.allsay.fs.value!="onlysay" && document.allsay.fs.value!="titlesay")
{document.allsay.fs.value="allsay";}
oldv=document.allsay.saysword.value;
sayw=oldv;
while(oldv.indexOf(" ") != -1 || oldv.indexOf(" ") != -1 || oldv.indexOf("

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -