vbs　判断　网页打不开,该怎么解决

vbs　判断　网页打不开


Set Wshell=WScript.CreateObject("WScript.Shell")
Set ie= WScript.CreateObject("InternetExplorer.Application")
ie.visible=true
ie.navigate "http://www.cccbaidu.com"
While ie.Busy
wscript.sleep 200
Wend
if ie.ReadyState <> 4 then
wshell.popup "打不开",3
ie.quit
wscript.quit
else
wshell.popup "打得开",3
ie.quit
wscript.quit
end if

哪不对呢？

------解决方案--------------------------------------------------------
你还真够执着的，开3个贴问。