Foxtable(狐表)用户栏目专家坐堂 → [求助]检测网页是否能连上,能使用XMLH.open 吗?


  共有1977人关注过本帖树形打印复制链接

主题:[求助]检测网页是否能连上,能使用XMLH.open 吗?

帅哥哟,离线,有人找我吗?
浙江仔
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1316 积分:9484 威望:0 精华:1 注册:2010/7/21 14:20:00
[求助]检测网页是否能连上,能使用XMLH.open 吗?  发帖心情 Post By:2016/7/17 17:12:00 [只看该作者]

Dim XMLH As Object
XMLH = CreateObject("Microsoft.XMLHTTP")
XMLH.open("GET", "http://www.baidu.com", True)
XMLH.send(Nothing)
Do While XMLH.readyState <> 4
    Application.DoEvents
Loop

怎么知道连接网址是的用时吗?如果超时2秒以上,判断网络不通
该怎么做?

 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1316 积分:9484 威望:0 精华:1 注册:2010/7/21 14:20:00
  发帖心情 Post By:2016/7/18 16:16:00 [只看该作者]

求助大师帮忙

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/7/18 17:10:00 [只看该作者]


 

参考这个

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=62475


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/19 0:55:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1316 积分:9484 威望:0 精华:1 注册:2010/7/21 14:20:00
  发帖心情 Post By:2016/7/19 11:34:00 [只看该作者]

原来还有这么简单的,呵呵
谢谢

 回到顶部