XMLHTTP+javascript+Asp写得聊天室 无刷新实现(六)

咱穷乐呵呗

咱穷乐呵呗

2016-01-29 17:35

XMLHTTP+javascript+Asp写得聊天室 无刷新实现(六),XMLHTTP+&#106avascript+Asp写得聊天室,无刷新实现(六)
  #############续send.asp#################

var oRDom=new ActiveXObject("Microsoft.XMLDOM");
oRDom.async=false;
var Path="reload.asp";
var tCok;
function Clock()
{cRld++;
if (cRld10){cRld=1;GetXmlData();}
clearTimeout(tCok);
tCok=setTimeout("Clock()",1000);
}
function GetXmlData() //这就是刷新用户XML数据的函数
{cRld=1;
oRDom.load(Path)
if(oRDom.parseError.errorCode != 0)
{alert("Sorry.出现了错误");
return }
else
{
var aryF=oRDom.documentElement.selectNodes("F");
var aryT=oRDom.documentElement.selectNodes("T");
var arysC=oRDom.documentElement.selectNodes("sC");
var arycL=oRDom.documentElement.selectNodes("cL");
var arysJ=oRDom.documentElement.selectNodes("sJ");
var aryE=oRDom.documentElement.selectNodes("E");
var tmpHtml="";
lengt=aryF.length;
for(var i=0;i<lengt;i++){
img="<img src="http://img.jcwcn.com/attachment/portal/jcwcj/2005-12/10/05121001091113429.gif" width=12 height=12 border=0";
tmpHtml="<font style='cursor:hand;color:"+arycL(i).text+"'"+eV[aryE(i).text*2]+rp2(arysC(i).text,"{^amp]","&")+"</font  <span class=t["+arysJ(i).text+"]</span<br";
tmpHtml=rp2(tmpHtml,"$F","<a href="javascript:parent.sd.towho('"+aryF(i).text+"');""+img+aryF(i).text+"</a");
tmpHtml=rp2(tmpHtml,"$T","<a href="javascript:parent.sd.towho('"+aryT(i).text+"');""+aryT(i).text+"</a");
if (aryF(i).text==Me || aryT(i).text==Me)
{ parent.my.Ly.innerHTML+=tmpHtml;
} else
parent.pub.Ly.innerHTML+=tmpHtml;
}
}
delete(aryF);delete(aryT);delete(arysC);delete(arycL);delete(arysJ);
}
function towho(un){
document.say.T.options[0].value=un;
document.say.T.options[0].text=un;
document.say.says.focus();return;}
</script
<base onmouseover="parent.window.status='欢迎光临 蓝蝶精品网 www.ChinaOk.net 站长:NetNice QICQ:6097356 ';return true;"
</head
<body bgcolor="#76b4d9" topmargin="4" leftmargin="1"
<table BORDER="0" width="767" cellspacing="0" cellpadding="0"
<tr<td width="735" height="16" align="left" nowrap
<form method="post" action="save.asp" name="say" target="b" onsubmit='return(checksays());'
<input type="hidden" name="oldsays"
<input name="F" maxlength="10" size="10" value="<%=session("u_name")%" readonly style="BACKGROUND-COLOR: #76aadd; BORDER-BOTTOM: 0px double; BORDER-LEFT: 0px double; BORDER-RIGHT: 0px double; BORDER-TOP: 0px double; COLOR: #ffffff; TEXT-ALIGN: right"
对 <select name="T" onclick="this.options[0].value='大家'; document.say.T.options[0].text='大家'; document.say.says.focus();"
<option value="大家" selected大家</option
</select 说:<input type=text name="says" maxlength="150" size="50" style="BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM: 1px double; BORDER-LEFT: 1px double; BORDER-RIGHT: 1px double; BORDER-TOP: 1px double; COLOR: #000000" accesskey="t" title="发表对话区(Alt+T)可激活!" LANGUAGE="javascript "
<input type="submit" name="send" value="发言" class="an" accesskey="s" onmouseover="this.style.color='3366dd'" onmouseout="this.style.color='663300'" title="(Alt+S)"
</form</td</tr</table
<div style="HEIGHT: 80px;
展开更多 50%)
分享

猜你喜欢

XMLHTTP+javascript+Asp写得聊天室 无刷新实现(六)

ASP
XMLHTTP+javascript+Asp写得聊天室 无刷新实现(六)

XMLHTTP+javascript+Asp写得聊天室 无刷新实现(二)

ASP
XMLHTTP+javascript+Asp写得聊天室 无刷新实现(二)

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

XMLHTTP+javascript+Asp写得聊天室 无刷新实现(三)

ASP
XMLHTTP+javascript+Asp写得聊天室 无刷新实现(三)

XMLHTTP+javascript+Asp写得聊天室 无刷新实现(五)

ASP
XMLHTTP+javascript+Asp写得聊天室 无刷新实现(五)

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

XMLHTTP+javascript+Asp写得聊天室 无刷新实现(四)

ASP
XMLHTTP+javascript+Asp写得聊天室 无刷新实现(四)

XMLHTTP+javascript+Asp写得聊天室 无刷新实现(一)

ASP
XMLHTTP+javascript+Asp写得聊天室 无刷新实现(一)

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

断开网络后Windows XP中巧查上网时间

断开网络后Windows XP中巧查上网时间

《上古卷轴5 天际》大剑职业详细分析攻略

《上古卷轴5 天际》大剑职业详细分析攻略
下拉加载更多内容 ↓