XmlHttp异步获取网站数据的例子
2004-08-19 11:16
555 查看
<P><BR><BR>xmlhttp异步的例子:<BR><A HREF="/net_lover/admin/<input">URL:<INPUT< A> name=a value="<A href="http://www.microsoft.com/">http://www.microsoft.com</A>" style="width:600px"><BR><INPUT onclick=getXML() type=button value=得到源代码><BR><INPUT onclick="if(xh && xh.responseText) {alert(xh.responseText);oDiv.innerHTML=xh.responseText}" type=button value=显示源代码><BR>
<DIV id=m></DIV>
<SCRIPT><br />var oDiv <br />var xh <br />function getXML()<br />{<br /> oDiv = document.all.m<br /> oDiv.innerHTML = "正在装载数据,请稍侯......."<br /> oDiv.style.display= ""<br /> xh = new ActiveXObject("Microsoft.XMLHTTP")<br /> xh.onreadystatechange = getReady<br /> xh.open("GET",a.value,true)<br /> xh.send()</p> <p>}</p> <p>function getReady()<br />{<br /> if(xh.readyState==4)<br /> {<br /> if(xh.status==200)<br /> {</p> <p> oDiv.innerHTML = "完成"<br /> }<br /> else<br /> {<br /> oDiv.innerHTML = "抱歉,装载数据失败。原因:" + xh.statusText<br /> }<br /> }<br />}<br /></SCRIPT>
<P></P>
<DIV id=m></DIV>
<SCRIPT><br />var oDiv <br />var xh <br />function getXML()<br />{<br /> oDiv = document.all.m<br /> oDiv.innerHTML = "正在装载数据,请稍侯......."<br /> oDiv.style.display= ""<br /> xh = new ActiveXObject("Microsoft.XMLHTTP")<br /> xh.onreadystatechange = getReady<br /> xh.open("GET",a.value,true)<br /> xh.send()</p> <p>}</p> <p>function getReady()<br />{<br /> if(xh.readyState==4)<br /> {<br /> if(xh.status==200)<br /> {</p> <p> oDiv.innerHTML = "完成"<br /> }<br /> else<br /> {<br /> oDiv.innerHTML = "抱歉,装载数据失败。原因:" + xh.statusText<br /> }<br /> }<br />}<br /></SCRIPT>
<P></P>
相关文章推荐
- VC与Delphi之间动态链接库互相调用
- javascript表单之间的数据传递!
- delphi中的时间操作技术(1)
- delphi中的时间操作技术(2)
- IP地址的隐藏(delphi实现 )
- 解析IP地址为主机域名
- 将某一主机域名解析为IP地址
- 有关TrueDBGrid的问题向各位大虾请教
- 用VB和MTS开发多层数据库应用系统
- 纯编码实现数据库的建立或压缩
- 从数据库中动态选取下拉列表的方法
- 如何在VB例程中接收自定义消息
- servlet的2种重定向方法
- VB.NET学习资料:
- Member Function Pointers and the Fastest Possible C++ Delegates
- 我的php的一个数据库的操纵类
- 如何根据下拉列表框的值来给textarea或者其它容器动态的增加内容?
- 一般网站用户注册流程:(适用初学者)
- Netscaler URL/Cookie domain Transformation 转换
- 关于LoadRunner压测过程中出现的error26601的解释