不刷新页面---刷新数据

来源：互联网发布：excel2010软件编辑：程序博客网时间：2024/04/30 02:58

不刷新页面---刷新数据

作者：不详　来源于：天下资源网收集整理　发布时间：2004-8-19 3:32:00

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+  超级简单/方便--不刷新页面---刷新数据之--幕后黑手---XMLHTTP---介绍/用法
+
+
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

--------------就是下面这个很简单的javascript函数SEND(STR,URL)----------------------

使用到的是XMLDOM和XMLHTTP对象.用这种技术的好处是:全JS控制,方便/简单,比RDS
或者remote好多了.(前提:服务器端和客户端都必须安装IE5或者更高版本),在俺贴的
那个无刷新在线信息功能使用的也是这种技术.有兴趣的朋友可以看看..

function Send(Str,URL)
//STR参数是传入的XML数据,你也可以传入其他文本数据.
//不过这个函数需要服务器端处理之后返回XML数据,你也可以修改一下
//URL参数表示你所要处理数据的ASP文件地址
{
var Http = new ActiveXObject("Microsoft.XMLHTTP") //建立XMLHTTP对象
var Dom = new ActiveXObject("Microsoft.XMLDOM") //建立XMLDOM对象
Http.open("POST",URL,false)
//第一个参数的意思是,用"POST"方式发送数据.可以大到4MB,也可以换为"GET".只能256KB
//第2个参数的意思是数据发送到哪个文件处理
//第3个参数意思是同步或异步方式.TRUE为异步,FALSE为同步
Http.send(Str) //开始发送数据.............嘟嘟..
Dom.async=false //设置为同步方式获取数据
Dom.loadXML(Http.responseText)
//开始获取服务器端处理后返回的数据.我在这里设置必须为XML数据,否则出错.
//你也可以自己修改.使返回的是2进制或者记录集数据.................................
if(Dom.parseError.errorCode != 0) //检查是否发生获取数据时错误
{
            delete(Http)
            delete(Dom)
return(false)
}
else
{
var Back = Dom.documentElement.childNodes.item(0).text
//得到返回的XML数据,我这里假设处理程序只返回一行XML数据(一个节点)
            delete(Http)
            delete(Dom)
return(Back) //函数返回数据.......................结束
}
}

VAR CAT = Send("<用户资料><姓名>谢柠檬</姓名></用户资料>","HTTP://WWW.WRCLUB.NET/VIVA.ASP";) //执行函数
IF(CAT == FALSE)
{
      ALERT("对不起.处理程序返回的是FALSE.数据处理已经失败........")
}
ELSE
{
IF(EVAL(CAT))
{
      ALERT("OK.数据已经发送成功.兼以处理完成!!!!!!")
}
ELSE
{
      ALERT("对不起.处理程序返回的是FALSE.数据处理已经失败........")
}
}

==========================================VIVA.ASP==========================================
ON ERROR RESUME NEXT
DIM BOBO
DIM MOMO
SET BOBO = SERVER.CREATEOBJECT("MICROSOFT.XMLDOM")
BOBO.ASYNC = FALSE
BOBO.LOAD REQUEST
IF BOBO.PARSEERROR.ERRORCODE <> 0 THEN
RESPONSE.WRITE("<程序处理结果><最终结果>FALSE</最终结果></程序处理结果>")
ELSE
SET MOMO = BOBO.DOCUMENTELEMENT
IF MOMO.CHILDNODES.ITEM(0).TEXT = "谢柠檬" THEN
RESPONSE.WRITE("<程序处理结果><最终结果>TRUE</最终结果></程序处理结果>")
ELSE
RESPONSE.WRITE("<程序处理结果><最终结果>FALSE</最终结果></程序处理结果>")
END IF
END IF
SET BOBO = NOTHING

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
<SCRIPT LANGUAGE="JavaScript">
<!--

function ShowWeather()
{
/*
*--------------- ShowWeather() -----------------
* ShowWeather()
* 功能:通过XMLHTTP发送请求,返回结果.
* 参数:str,字符串,发送条件.
* 实例:ShowWeather();
*--------------- ShowWeather() -----------------
*/
var oBao = new ActiveXObject("Microsoft.XMLHTTP");
oBao.open("POST","Weather.php",false);
oBao.send();
var strResult =oBao.responseText;
//将字符串分开.
var arrResult = strResult.split("###");
//RemoveRow(); //删除以前的数据.
weather.innerText="";
//将取得的字符串分开,并写入表格中.
for(var i=0;i<arrResult.length-1;i++)
{
arrTmp = arrResult[i].split("@@@");
num1 = arrTmp[0]; //字段num1的值
//row1 = tb.insertRow();
//cell1 = row1.insertCell();
weather.innerText = "天气情况:"+num1;
}
}
ShowWeather();
//-->
</SCRIPT>