软件工程

本类阅读TOP10
·PHP4 + MYSQL + APACHE 在 WIN 系统下的安装、配置
·Linux 入门常用命令(1)
·Linux 入门常用命令(2)
·使用 DCPROMO/FORCEREMOVAL 命令强制将 Active Directory 域控制器降级
·DirectShow学习(八)： CBaseRender类及相应Pin类的源代码分析
·基于ICE方式SIP信令穿透Symmetric NAT技术研究
·Windows 2003网络负载均衡的实现
·一网打尽Win十四种系统故障解决方法
·数百种 Windows 软件的免费替代品列表
·收藏---行百里半九十

→ 分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
ServerXMLHTTP对象的危险特性

作者：未知 来源：月光软件站 加入时间：2005-2-28　月光软件站

ServerXMLHTTP对象的危险特性-一小时超时

The information in this article applies to:

-         Microsoft XML 3.0，SP3

-         Microsoft Windows XP,SP2

-         Microsoft Windows 2000,SP4

 

对本文档所有修改都应按修改时间顺序记录在此。

 

Version

Date

Creator

Description

1.0.0.1

2004-5-11

郑昀

草稿

 

如果你在你的组件中使用了MSXML3开发包的ServerXMLHTTP对象，利用它作HTTP各种操作，那么请注意它的一个危险特性：

如果你的目标URL地址实际上并不存在，用浏览器访问它得到“找不到服务器或发生 DNS 错误”提示，那么ServerXMLHTTP访问它时，有可能会长时间（长达1个小时）不返回，导致你的应用阻塞！

这种情况我只在访问如：“http://210.82.95.171:9090/EntSmsUp.asp”时遇到，而且对方IP地址确实有效。对于一般的URL，如果找不到服务器，ServerXMLHTTP最多30秒就会中断执行而返回。

更多试验发现，只有极少数情况的URL，才会导致访问1小时后才返回。原因不详。

但是以防万一，请一定要设置SXH的超时时间限制！

 

更多信息：

你可以建立下面VBS脚本文件：

dim objXmlHttp

Set objXmlHttp = CreateObject("Msxml2.ServerXMLHTTP")

objXmlHttp.Open "POST", "http://210.82.95.171:9090/EntSmsUp.asp",  False

    objXmlHttp.send "1"

 

上面这样的脚本在WinXP+SP2和Win2000+SP4(都已经打了MSXML3的SP3补丁)环境上运行，至少在1小时后才返回。（试验了若干台机器，效果一样）

执行时间一般是3605秒，刚好是1小时，如下所示：

 

 

解决方案：

你必须主动设置ServerXMLHTTP操作的超时时间，如下所示：

 

    lresolveTimeout = 10000   ‘ 解析DNS名字的超时时间,10秒

 

   lconnectTimeout = 10000    ‘ 建立Winsock连接的超时时间,10秒

 

    lsendTimeout = 120000     ‘ 发送数据的超时时间,120秒

 

   lreceiveTimeout = 60000     ' 接收response的超时时间,60秒

 

  objXmlHttp.setTimeouts lresolveTimeout, _

                          lconnectTimeout, _

                          lsendTimeout, _

                          lreceiveTimeout

             

方可避免这种问题。这样的话，访问一个不存在的URL，只需要60秒后就可以超时返回，COM异常错误码是0x80072EE2。

 

重现：

将下面代码保存为“testTimeout.vbs”文件，双击运行：

 

BeginTimer = Timer()

 

BeiginTime = Now()

 

On error resume next

dim objXmlHttp

    Set objXmlHttp = CreateObject("Msxml2.ServerXMLHTTP")

   

     ' ------------------------------------------------------------

    lresolveTimeout = 10000   ' 解析DNS名字的超时时间,10秒

 

   lconnectTimeout = 10000    ' 建立Winsock连接的超时时间,10秒

 

    lsendTimeout = 120000     ' 发送数据的超时时间,120秒

 

   lreceiveTimeout = 60000     ' 接收response的超时时间,60秒

 

  'objXmlHttp.setTimeouts lresolveTimeout, _

   '                       lconnectTimeout, _

    '                      lsendTimeout, _

     '                     lreceiveTimeout

    ' ------------------------------------------------------------

 

    sURL ="http://210.82.95.171:9090/xxx.asp"

    objXmlHttp.Open "POST", sURL, False

    objXmlHttp.send "1212312"

 

EndTimer = Timer()

TimeSpan_Send = EndTimer - BeginTimer

 

EndTime = Now()

msgbox  sURL & " okay!TimeSpan=" & CStr(TimeSpan_Send) & ";start:" & BeiginTime & ";EndTime:" & EndTime

 

 Writen by zhengyun.NoJunk(at)tomosoft.dot.com

相关文章：

相关软件：