繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > XMLHTTP+javascript+Asp写得聊天室，无刷新实现（六）
- ASP
- 用ASP做一个分页程序
- 用ASP实现网站的“目录树”管理
- 网页在线人数统计的做法
- 用ASP生成Chart
- 用ASP构建你的网站新闻发布（一）
- 用ASP构建你的网站新闻发布（三）
- 如何处理ASP中的图象
- 用ASP编写计数器
- ASP防盗链及防下载的方法
- ASP数据类型
- ASP组件中的安全问题
- ASP漏洞集-ASP漏洞分析和解决方法
- ASP漏洞集-Carello Web 使 ASP 源码暴露(APP,缺陷)
- ASP漏洞集-MS IIS server的ASP安全缺陷(MS,缺陷)
- ASP漏洞集-MS IIS虚拟主机ASP源码泄露(MS,缺陷)
- ASP漏洞集-给你的FileSystemObject对象加把锁
- ASP漏洞集-通过asp入侵web server,窃取文件毁坏系统
- ASP漏洞集-MS IIS server/Frontpage Ext Server
- ASP漏洞集-虚拟web目录容易泄露ASP源代码 (MS,缺陷)
- ASP漏洞集-用ASP实现网页保密的两种方法
ASP 中的 XMLHTTP+javascript+Asp写得聊天室，无刷新实现（六）
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 223 ::
收藏到网摘: n/a
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;
评论 (0) All
