📄 gn.asp

📁 应用于高等院校党团思想教育
💻 ASP
📖 第 1 页 / 共 2 页
字号:
上一页 12
Application("hxf_c_chatrs")=onliners
sd=Application("hxf_c_sd")
line=int(Application("hxf_c_line"))
Session("hxf_u_line")=line
Application("hxf_c_line")=line+1
Dim newsd(540)
j=1
for i=10 to 540 step 9
 newsd(j)=sd(i)
 newsd(j+1)=sd(i+1)
 newsd(j+2)=sd(i+2)
 newsd(j+3)=sd(i+3)
 newsd(j+4)=sd(i+4)
 newsd(j+5)=sd(i+5)
 newsd(j+6)=sd(i+6)
 newsd(j+7)=sd(i+7)
 newsd(j+8)=sd(i+8)
 j=j+9
next
newsd(532)=line+1
newsd(533)=1
newsd(534)=0
newsd(535)=nickname
newsd(536)="大家"
newsd(537)="660099"
newsd(538)="660099"
newsd(539)="对"
newsd(540)="<font color=black>【公告】</font><font color=008800>" & Replace(Application("hxf_c_userinto"),"%%","<a href=javascript:parent.sw('[" & nickname & "]'); target=f2>" & nickname & "</a>") & "</font><font class=t>(" & t & ")</font><bgsound src='readonly/cd.mid' loop='1'>"
Application("hxf_c_sd")=newsd
Application.UnLock
end if
chatbgcolor=Application("hxf_c_chatbgcolor")
chatimage=Application("hxf_c_chatimage")
chatroomname=Application("hxf_c_chatroomname")
if chatbgcolor="" then chatbgcolor="008888"%><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script Language="Javascript">
if(window!=window.top){top.location.href="gnchat.asp";}
var crm="<%=Application("hxf_c_chatroomname")%>";
document.write("<title>"+crm+"</title>");
var bgc="<%=Application("hxf_c_chatcolor")%>";
var myn="<%=nickname%>";
var cs=<%=Session("hxf_u_grade")%>;
var lst=0;<%if jb<>"" then%>
var jb=",<%=jb%>,";
function write(cls){var fsize,lheight;if(cls==1){fsize=this.f2.document.af.fs.value;lheight=this.f2.document.af.lh.value;}else{fsize='10.5';lheight='145';}this.f1.document.open();this.f1.document.writeln("<html><head><title>对话区</title><meta http-equiv=Content-Type content=\"text/html; charset=gb2312\">");this.f1.document.writeln("<style type=text/css>.p{font-size:20pt}.l{line-height:" + lheight + "%}.t{color:FF00FF;font-size:9pt;}body{font-family:\"宋体\";font-size:" + fsize + "pt}A{text-decoration:none}A:Hover{text-decoration:underline}A:visited{color:blue}</style></head><\Script Language=\"JavaScript1.1\">");this.f1.document.writeln("var autoScrollOn=1;var scrollOnFunction;var scrollOffFunction;");this.f1.document.writeln("function scrollit(){if(!parent.f2.document.af.as.checked){autoScrollOn=0;return true;}else{autoScrollOn=1;StartUp();return true;}}function scrollWindow(){if(autoScrollOn==1){this.scroll(0,65000);parent.f0.scroll(0,65000);setTimeout('scrollWindow()',200);}}function scrollOn(){autoScrollOn=1;scrollWindow();}function scrollOff(){autoScrollOn=0;}function StartUp(){this.onblur=scrollOnFunction;this.onfocus=scrollOffFunction;scrollWindow();}");this.f1.document.writeln("scrollOnFunction=new Function('scrollOn()');");this.f1.document.writeln("scrollOffFunction=new Function('scrollOff()');");this.f1.document.writeln("StartUp();</\script>");this.f1.document.writeln("<body<%if Int(Session("hxf_u_grade"))<10 then%> oncontextmenu=self.event.returnValue=false<%end if%> bgcolor=" + bgc + " text=660099>");this.f1.document.writeln("<span class=l><font color=red>【浏览器刷新】</font>热烈欢迎<font color=red>〖"+myn+"〗</font>来到《"+crm+"》！<font class=t>(<%=t%>)</font></span><br>");this.f0.document.open();this.f0.document.writeln("<html><head><title>嘉宾区</title><meta http-equiv=Content-Type content=\"text/html; charset=gb2312\">");this.f0.document.writeln("<style type=text/css>.p{font-size:20pt}.l{line-height:" + lheight + "%}.t{color:FF00FF;font-size:9pt;}body{font-family:\"宋体\";font-size:" + fsize + "pt;}A{text-decoration:none}A:Hover{text-decoration:underline}A:visited{color:blue}</style></head>");this.f0.document.writeln("<body<%if Int(Session("hxf_u_grade"))<10 then%> oncontextmenu=self.event.returnValue=false<%end if%> bgcolor=" + bgc + " text=660099>");this.f0.document.writeln("<span class=l><font color=red>【嘉宾发言区】</font>今日嘉宾：<font color=red><%=jb%></font>。<font class=t>(<%=t%>)</font></span><br>");this.t.location.href="t.asp";}
function sh(ac,mm,n1,n2,y1,y2,bq,ll){var show;if(ac==1){if(mm==1){show="<span class=l>【私聊】"+ll+"</span><br>";}else{show="<span class=l>"+ll+"</span><br>";}}else{if(mm==1){show="<span class=l>【私聊】";}else{show="<span class=l>";}if(n1==myn){show=show+"<a href=javascript:parent.sw('["+n1+"]'); target=f2><font color="+y1+"><b>"+n1+"</b></font></a>"+bq;}else{show=show+"<a href=javascript:parent.sw('["+n1+"]'); target=f2><font color="+y1+">"+n1+"</font></a>"+bq;}if(n2==myn){show=show+"<font color=red>〖<a href=javascript:parent.sw('["+n2+"]'); target=f2><font color=red>"+n2+"</font></a>〗</font>";}else{show=show+"<a href=javascript:parent.sw('["+n2+"]'); target=f2><font color=660099>"+n2+"</font></a>";}show=show+"说："+"<font color="+y2+">"+ll+"</font></span><br>";}if(jb.indexOf(","+n1+",")>=0){this.f0.document.writeln(show);}else{this.f1.document.writeln(show);}}
function qp(){this.f0.location.href="about:blank";this.f1.location.href="about:blank";setTimeout('parent.write(1)',500);}<%else%>
function write(cls){var fsize,lheight;if(cls==1){fsize=this.f2.document.af.fs.value;lheight=this.f2.document.af.lh.value;}else{fsize='10.5';lheight='145';}this.f1.document.open();this.f1.document.writeln("<html><head><title>对话区</title><meta http-equiv=Content-Type content=\"text/html; charset=gb2312\">");this.f1.document.writeln("<style type=text/css>.p{font-size:20pt}.l{line-height:" + lheight + "%}.t{color:FF00FF;font-size:9pt;}body{font-family:\"宋体\";font-size:" + fsize + "pt;}A{text-decoration:none}A:Hover{text-decoration:underline}A:visited{color:blue}</style></head><\Script Language=\"JavaScript1.1\">");this.f1.document.writeln("var autoScrollOn=1;var scrollOnFunction;var scrollOffFunction;");this.f1.document.writeln("function scrollit(){if(!parent.f2.document.af.as.checked){autoScrollOn=0;return true;}else{autoScrollOn=1;StartUp();return true;}}function scrollWindow(){if(autoScrollOn==1){this.scroll(0,65000);setTimeout('scrollWindow()',200);}}function scrollOn(){autoScrollOn=1;scrollWindow();}function scrollOff(){autoScrollOn=0;}function StartUp(){this.onblur=scrollOnFunction;this.onfocus=scrollOffFunction;scrollWindow();}");this.f1.document.writeln("scrollOnFunction=new Function('scrollOn()');");this.f1.document.writeln("scrollOffFunction=new Function('scrollOff()');");this.f1.document.writeln("StartUp();</\script>");this.f1.document.writeln("<body<%if Int(Session("hxf_u_grade"))<10 then%> oncontextmenu=self.event.returnValue=false<%end if%> bgcolor=" + bgc + " text=660099>");this.f1.document.writeln("<span class=l><font color=red>【浏览器刷新】</font>热烈欢迎<font color=red>〖"+myn+"〗</font>来到《"+crm+"》！<font class=t>(<%=t%>)</font></span><br>");this.t.location.href="t.asp";}
function sh(ac,mm,n1,n2,y1,y2,bq,ll){var show;if(ac==1){if(mm==1){show="<span class=l>【私聊】"+ll+"</span><br>";}else{show="<span class=l>"+ll+"</span><br>";}}else{if(mm==1){show="<span class=l>【私聊】";}else{show="<span class=l>";}if(n1==myn){show=show+"<a href=javascript:parent.sw('["+n1+"]'); target=f2><font color="+y1+"><b>"+n1+"</b></font></a>"+bq;}else{show=show+"<a href=javascript:parent.sw('["+n1+"]'); target=f2><font color="+y1+">"+n1+"</font></a>"+bq;}if(n2==myn){show=show+"<font color=red>〖<a href=javascript:parent.sw('["+n2+"]'); target=f2><font color=red>"+n2+"</font></a>〗</font>";}else{show=show+"<a href=javascript:parent.sw('["+n2+"]'); target=f2><font color=660099>"+n2+"</font></a>";}show=show+"说："+"<font color="+y2+">"+ll+"</font></span><br>";}this.f1.document.writeln(show);}
function qp(){this.f1.location.href="about:blank";setTimeout('parent.write(1)',500);}
<%end if%>function sw(username){var usna;usna=username.substring(1,username.length-1);this.f2.document.af.towho.options[0].value=usna;this.f2.document.af.towho.options[0].text=usna;this.f2.document.af.sytemp.focus();return;}
function md1(){this.f3.document.writeln("<html><head><meta http-equiv='content-type' content='text/html; charset=gb2312'><title>在线用户列表</title><style type='text/css'>");this.f3.document.writeln("body{font-family:\"宋体\";font-size:12pt;}td{font-family:\"宋体\";font-size:10.5pt;line-height:135%;}.p9{color=FFFF00;font-size:9pt;}A{color:white;text-decoration:none;}A:Hover{color:black;text-decoration:none;}A:Active {color:black}</style>");this.f3.document.writeln("<\script language=\"JavaScript\">var NS4=(document.layers);var IE4=(document.all);var win=window;var n=0;function findInPage(str){var txt,i,found;if(str==\"\"){return false;}if(NS4){if(!win.find(str))while(win.find(str,false,true))n++;else{n++;}if(n==0)alert(\"您要的名字没有找到！\");}if(IE4){txt=win.document.body.createTextRange();for(i=0;i<=n&&(found=txt.findText(str))!=false;i++){txt.moveStart(\"character\",1);txt.moveEnd(\"textedit\");}if(found){txt.moveStart(\"character\",-1);txt.findText(str);txt.select();txt.scrollIntoView();n++;}else{if(n>0){n=0;findInPage(str);}else{alert(\"您要的名字没有找到！\");}}}return false;}<\/script>");this.f3.document.writeln("</head><body oncontextmenu=self.event.returnValue=false bgcolor=\"<%=chatbgcolor%>\" background=\"<%=chatimage%>\" bgproperties=\"fixed\">");this.f3.document.writeln("<div align=\"center\"><font color=\"#FFFFFF\"<%if len(chatroomname)>6 then Response.Write " style='font-size:10.5pt'"%>><%=chatroomname%></font><hr size=1 color=FFFF00>");}
function md2(){this.f3.document.writeln("<table width=100% border=0 cellspacing=0 cellpadding=0>");this.f3.document.writeln("<form name='search' onSubmit='return findInPage(this.string.value);'><tr><td><br><input name='string' type='text' size=8 onChange='n=0;' style='font-family:宋体;font-size:9pt;background-color:008800;color:FFFFFF;border: 1 double'> <input type='submit' value='查找' style='font-size:9pt;background-color:FF9900;color:FFFFFF;border: 1 double'></td></tr></form><tr><td><br>");this.f3.document.writeln("<a href=javascript:parent.sw('[大家]');>大家</a><br>");}
function ma(nc,cw){var ss;ss="<a href=javascript:parent.sw('["+nc+"]');>"+nc+"</a>";if(cw!="")ss=ss+" <font class=p9>"+cw+"</font>";ss=ss+"<br>";this.f3.document.writeln(ss);}
function md3(){this.f3.document.writeln("</td></tr></table></body></html>");this.f3.document.close();}
function fc(){rn();setTimeout('parent.write()',0);}
function rn(){this.f2.document.af.username.value=myn;}
function clsay(){if(cs==1){setTimeout("this.f2.document.af.sytemp.value=''",0);}}
function checksays(){if(this.f2.document.af.sytemp.value=="/k"||this.f2.document.af.sytemp.value=="/K"){window.open("maninfosearch.asp?id="+this.f2.document.af.towho.value);this.f2.document.af.sytemp.value="";return false;}this.f2.document.af.sy.value='';if(this.f2.document.af.sytemp.value!=''){if((this.f2.document.af.oldsays.value==this.f2.document.af.sytemp.value)&&(this.f2.document.af.oldtowho.value==this.f2.document.af.towho.options[this.f2.document.af.towho.selectedIndex].value)){alert('内容不可重复！');this.f2.document.af.sytemp.focus();this.f2.document.af.sytemp.select();return false;}this.f2.document.af.oldtowho.value=this.f2.document.af.towho.options[this.f2.document.af.towho.selectedIndex].value;this.f2.document.af.oldtowho.value=this.f2.document.af.towho.value;this.f2.document.af.sy.value=this.f2.document.af.sytemp.value;this.f2.document.af.oldsays.value=this.f2.document.af.sytemp.value;this.f2.document.af.addsign.options[0].selected=true;this.f2.document.af.sytemp.focus();this.f2.document.af.sytemp.value='';if((this.f2.document.af.titleline.checked==false)&&(this.f2.document.af.oldtitleline.value=='1')){this.f2.document.af.oldtitleline.value='0';}if((this.f2.document.af.titleline.checked==true)&&(this.f2.document.af.oldtitleline.value=='1')){this.f2.document.af.titleline.checked=false;this.f2.document.af.oldtitleline.value='0';}if(this.f2.document.af.titleline.checked==true){this.f2.document.af.oldtitleline.value='1';}ty=new Date();var nh=ty.getHours();var nm=ty.getMinutes();var ns=ty.getSeconds();var ct=(nh*3600)+(nm*60)+ns;if((ct-lst)>2.5){lst=ct;}else{this.f2.af.sytemp.value=this.f2.af.oldsays.value;this.f2.af.oldsays.value='';return false;}this.f2.addOne(this.f2.document.af.sy.value);this.f2.startnosay();this.f2.document.af.subsay.disabled=1;setTimeout('this.f2.document.af.subsay.disabled=0',3000);return true;}if ((this.f2.document.af.addsign.options[this.f2.document.af.addsign.selectedIndex].value=='0')||(this.f2.document.af.addsign.options[this.f2.document.af.addsign.selectedIndex].value=='')){alert('请输入发言或选择动作！');this.f2.document.af.sytemp.focus();this.f2.document.af.sytemp.select();return false;}}
</script>
</head><%if jb<>"" then%>
<frameset cols="*,140" rows="*" border="0" framespacing="0" frameborder="NO">
<frameset rows="40,*,70,0" cols="*">
<frame src="about:blank" name="t" marginwidth="5" marginheight="5">
<frameset cols="*" rows="*,*" border="0" framespacing="1" frameborder="YES">
<frame src="about:blank" name="f0" scrolling="AUTO" marginheight="3" marginwidth="5">
<frame src="about:blank" name="f1" scrolling="AUTO" marginheight="3" marginwidth="5">
</frameset>
<frame src="f2.asp" name="f2" scrolling="NO" marginwidth="3" marginheight="8">
<frame src="about:blank" name="d" scrolling="NO">
</frameset>
<frameset rows="0,*,0,70" cols="*">
<frame src="f3.asp" name="m">
<frame src="about:blank" marginwidth="5" marginheight="5" name="f3">
<frame src="about:blank" marginwidth="5" marginheight="5" name="ps">
<frame src="f4.asp" scrolling="NO" noresize name="f4" marginwidth="3" marginheight="3">
</frameset>
</frameset>
<%else%><frameset cols="*,140" rows="*" border="0" framespacing="0" frameborder="NO">
<frameset rows="40,*,70,0" cols="*">
<frame src="about:blank" name="t" marginwidth="5" marginheight="5">
<frame src="about:blank" name="f1" scrolling="AUTO" marginheight="3" marginwidth="5">
<frame src="f2.asp" name="f2" scrolling="NO" marginwidth="3" marginheight="8">
<frame src="about:blank" name="d" scrolling="NO">
</frameset>
<frameset rows="0,*,0,70" cols="*">
<frame src="f3.asp" name="m">
<frame src="about:blank" marginwidth="5" marginheight="5" name="f3">
<frame src="about:blank" marginwidth="5" marginheight="5" name="ps">
<frame src="f4.asp" scrolling="NO" noresize name="f4" marginwidth="3" marginheight="3">
</frameset>
</frameset>
<%end if%></html>
上一页 12
⌨️ 快捷键说明

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