程序员

asp中使用MSXML2.ServerXMLHTTP实现异步请求例子

作者:admin 2021-04-22 我要评论

asp使用MSXML2.ServerXMLHTTP异步发送请求时,需要注意判断MSXML2.ServerXMLHTTP对象的readyState是否为4,如果不判断直接获取对象的属性,如responseText会出现...

在说正事之前,我要推荐一个福利:你还在原价购买阿里云、腾讯云、华为云服务器吗?那太亏啦!来这里,新购、升级、续费都打折,能够为您省60%的钱呢!2核4G企业级云服务器低至69元/年,点击进去看看吧>>>)

asp使用MSXML2.ServerXMLHTTP异步发送请求时,需要注意判断MSXML2.ServerXMLHTTP对象的readyState是否为4,如果不判断直接获取对象的属性,如responseText会出现如下错误:

复制代码 代码如下:

msxml3.dll 错误 '8000000a'

完成该操作所需的数据还不可使用。

/a.asp,行 18

asp使用MSXML2.ServerXMLHTTP异步发送请求源代码:

复制代码 代码如下:

<%
if request.QueryString("dc")="1" then'xhr请求则输出当前时间并停止继续执行
  response.Write now
  response.End
end if
Dim xmlServerHttp
set xmlserverhttp = server.createobject("MSXML2.ServerXMLHTTP")
xmlServerHttp.open "GET", "http://root.jb51.net/a.asp?dc=1", true'发起异步请求
xmlServerHttp.send
 
While xmlServerHttp.readyState <> 4'注意这里要判断xhr对象的状态,如果不为4则等待1000ms,要不最下面那句会报上面贴出来的错误
    xmlServerHttp.waitForResponse 1000
Wend
 
response.contenttype = "text/html"
response.write "Receiver Page: " & xmlServerHttp.responseText & "<br/>"
%>


原文链接:https://m.jb51.net/article/53756.htm

版权声明:本文转载自网络,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。本站转载出于传播更多优秀技术知识之目的,如有侵权请联系QQ/微信:153890879删除

相关文章
  • 天津智慧物联赛道明星结营丨创业不孤独

    天津智慧物联赛道明星结营丨创业不孤独

  • 阿里新零售赛道明星结业,群星集结相伴

    阿里新零售赛道明星结业,群星集结相伴

  • 教育行业优质解决方案分享【智慧校园解

    教育行业优质解决方案分享【智慧校园解

  • Excelize 2.4.0 正式版发布, 新增 152

    Excelize 2.4.0 正式版发布, 新增 152