当前位置: 首页 > 图文教程 > 网络编程 > ASP > XMLHTTP+javascript+Asp写得聊天室，无刷新实现（六）

ASP
ASP技巧：在Access数据库中重命名表
用ASP编程实现网络内容快速查找
比较ASP生成静态HTML文件的几种方法
ASP实例：实现邮件发送普通附件和嵌入附件
如何用ASP实现去掉三个最高分和三个最低分
ASP实例：Access为后台数据库的网站统计系统
用标签替换的方法生成静态网页
例程：用ASP判断文件地址是否有效
学ASp动态网页必备：常用的38个函数
ASP教程：初次接触学习ASP脚本程序
ASPJPEG水印中关于文字水印的帮助文档(中英文对照)
ASP例子：ASP把汉字转化为拼音的函数
ASP教程：学习ASP应用Cookies的技巧
ASP入门：认识ASP程序所使用的几种脚本语言
初学者的ASP教程：常用ASP内置函数
ASP初级教程之ASP对表单和用户输入的处理
学习ASP文件引用的方法
用ASP编写更人性化的弹出窗口程序
谈谈学习ASP动态网页制作技术的编程心得
用ASP程序实现网站在线人数统计

No. « 3 4 5 6 »

技术文章搜索

关键字

ASP 中的 XMLHTTP+javascript+Asp写得聊天室，无刷新实现（六）

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-11-03   浏览: 24 ::
收藏到网摘: n/a

  #############续send.asp#################

var oRDom=new ActiveXObject("Microsoft.XMLDOM");
oRDom.async=false;
var Path="reload.asp";
var tCok;
function Clock()
{cRld++;
if (cRld>10){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="/upload/tech/20091103/20091103101855_0efe32849d230d7f53049ddc4a4b0c60.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;