vbs版块人气不足　为增加人气　再问一个解决方法

vbs版块人气不足　为增加人气　再问一个
vbs 如何判断网页是否能打开？

就是打开某网页时，等很久都打不开，最后出来　找不到服务器　或无法显示网页



[解决办法]
1.就用location来判断:

VBScript code

Set oIE = CreateObject("InternetExplorer.Application")    oIE.Visible = 1    oIE.Navigate "www.baidu.com"        Do        WScript.Sleep 200    Loop Until Not oIE.Busy And oIE.ReadyState = 4        WScript.Echo oIE.Document.location