XMLHTTP无刷新自动实时更新数据

<% @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:22

var 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").Value

rs.MoveNext();

}

//escape解决了XMLHTTP。中文处理的问题.

Response.Write(escape(sResult.join("###")));

%>