[此文来源于互联网,牛C网只负责收集整理]
传统上,我们浏览网页,如果加入最新的数据。只能是等我们重新向服务器端请求时才能显示出来。但是,对于一些时效性很强的网站,传统的这种做法是不能满足的。
我们可以让程序自动刷新,定时向服务器请求数据。5秒取一次数据,10秒取一次数据。利用XMLHTTP发出请求并取得数据。传到客户端,客户端重新组织并显示数据。
demo.htm 前台显示.
<script language="JavaScript">function GetResult(){/**--------------- GetResult() -----------------* GetResult() * 功能:通过XMLHTTP发送请求,返回结果.* 参数:str,字符串,发送条件.* 实例:GetResult();*--------------- GetResult() -----------------*/var oBao = new ActiveXObject("Microsoft.XMLHTTP");//特殊字符: ,%,&,=,?等的传输解决办法.字符串先用escape编码的.//Update:2004-6-1 12:22oBao.open("POST","Server.asp",false);oBao.send();//服务器端处理返回的是经过escape编码的字符串.var strResult = unescape(oBao.responseText);//将字符串分开.var arrResult = strResult.split("###");RemoveRow(); //删除以前的数据.//将取得的字符串分开,并写入表格中.for(var i=0;i<arrResult.length;i ){arrTmp = arrResult[i].split("@@@");num1 = arrTmp[0]; //字段num1的值num2 = arrTmp[1]; //字段num2的值row1 = tb.insertRow();cell1 = row1.insertCell();cell1.innerText = num1;cell2 = row1.insertCell();cell2.innerText = num2;}}function RemoveRow(){//保留第一行表头,其余数据均删除.var iRows = tb.rows.length;for(var i=0;i<iRows-1;i ){tb.deleteRow(1);}}function MyShow(){//2秒自动刷新一次,2秒取得一次数据.timer = window.setInterval("GetResult()",2000);}</script><body onload="MyShow()"><p></p><table width="47%" height="23" border="0" cellpadding="1" cellspacing="0"id="tb"><tr><td>num1</td><td>num2</td></tr></table>
Server.asp 后台读取数据
<% @Language="JavaScript" %><%function OpenDB(sdbname){/**--------------- OpenDB(sdbname) -----------------* OpenDB(sdbname) * 功能:打开数据库sdbname,返回conn对象.* 参数:sdbname,字符串,数据库名称.* 实例:var conn = OpenDB("database.mdb");*--------------- OpenDB(sdbname) -----------------*/var connstr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" Server.MapPath(sdbname);var conn = Server.CreateObject("ADODB.Connection");conn.Open(connstr);return conn;}var sResult = new Array();var oConn = OpenDB("data.mdb");//特殊字符: ,%,&,=,?等的传输解决办法.客户端字符是经过escape编码的//所以服务器端先要经过unescape解码.//Update:2004-6-1 12:22var sql = "select num1,num2 from nums order by id";var rs = oConn.Execute(sql);while(!rs.EOF){//一条记录用"###"隔开.每列数据用"@@@"隔开. 这是以只有两个列数据的情况.sResult[sResult.length] = rs("num1").Value "@@@" rs("num2").Valuers.MoveNext();}//escape解决了XMLHTTP。中文处理的问题.Response.Write(escape(sResult.join("###")));%>
数据库data.mdb
表 nums
id,自动编号
num1,文本
num2,文本
测试数据
id num1 num2
1 20.70 20.810
2 10.5 20.5
3 12.3 300
4 132 323
5 563 56
6 20 10
作者:gdgzboy@牛C网
地址:http://www.niuc.net/post/3200/
版权所有。转载时必须以链接形式注明作者和原始出处及本声明!
牛C网推荐您再看看以下日志:
应用 XML 管理层次结构的数据
XML经典问答
C#来创建和读取XML文档
XML入门精解之结构与语法
让J2SE1.5从 XML 中装载属性
对XML数据使用XMLConvert
基于Lucene/XML的站内全文检索解决方案
WML开发教程--WAP网站服务器配置
XSL教程-匹配模式的学习
XML卷之实战锦囊(5)-结构树图
应用 XML 管理层次结构的数据
XML经典问答
C#来创建和读取XML文档
XML入门精解之结构与语法
让J2SE1.5从 XML 中装载属性
对XML数据使用XMLConvert
基于Lucene/XML的站内全文检索解决方案
WML开发教程--WAP网站服务器配置
XSL教程-匹配模式的学习
XML卷之实战锦囊(5)-结构树图
搞定CSS SPAN和DIV的区别
用Ajax和RSS制作一个首页新闻





