| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1273 人关注过本帖, 1 人收藏
标题:请教一下 CreateObject("MSXML2.XMLHTTP") 网站关闭情况下如果出错处理 ...
只看楼主 加入收藏
nbwww
Rank: 8Rank: 8
等 级:贵宾
威 望:11
帖 子:332
专家分:804
注 册:2021-1-9
结帖率:88.24%
收藏(1)
已结贴  问题点数:20 回复次数:2 
请教一下 CreateObject("MSXML2.XMLHTTP") 网站关闭情况下如果出错处理
oXml = CreateObject("MSXML2.XMLHTTP")
cUrl = "HTTP://"+ALLTRIM(ip.ip)+":"+ALLTRIM(IP.端口)
oXml.Open("GET", cUrl, .F.,ALLTRIM(ip.用户名),ALLTRIM(ip.密码))
 oXml.Send()     &&到这里就出错了   
IF oXml.readyState==4 AND oXml.status==200
     &&正常执行   
ELSE
    messagebox("可能没有连接网络,请检查网络!",48,"错误提示!")
    RELEASE oXml
     RETURN
ENDIF


实际情况是到 oXml.Send()  这句已经出错  
请教一下如何进行出错处理
搜索更多相关主题的帖子: XMLHTTP 出错 处理 ip 网站 
2021-08-22 07:53
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:20 
程序代码:
    
    oHttp = NULL
    bError = .F.
    TRY 
        oHttp = CREATEOBJECT("MSXML2.XMLHTTP")
        oHttp.Open("GET", cUrl, .F.)
        oHttp.Send()
        bError = oHttp.readyState != 4
    CATCH
        bError = .T.
    ENDTRY
    IF bError
        RETURN
    ENDIF
    .......

2021-08-22 08:57
nbwww
Rank: 8Rank: 8
等 级:贵宾
威 望:11
帖 子:332
专家分:804
注 册:2021-1-9
收藏
得分:0 
谢谢   非常感谢!!
2021-08-22 10:33
快速回复:请教一下 CreateObject("MSXML2.XMLHTTP") 网站关闭情况下如果出错处 ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021350 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved