等待网页加载

命令说明

等待当前加载的页面加载完成

命令原型

iRet = WebBrowser.WaitPage(hWeb,arrElement,iTimeOut,optionArgs)

命令参数

参数	必选	类型	默认值	说明
hWeb	True	expression	hWeb	使用 WebBrowser.Create 或 WebBrowser.Bind 命令返回的浏览器句柄字符串
arrElement	True	decorator	{}	当页面加载完后，判断是否存在指定的元素，不填写则不进行任何元素判断并返回0；另支持传入元素数组来判断多个元素是否都存在，都存在则返回1，若任意一个元素不存在时则返回0
iTimeOut	True	number	60000	等待页面加载的超时时间，超过这个时间则判定为网页加载失败，默认为 60000 毫秒（60秒）
bContinueOnError	False	boolean	False	指定即使活动引发错误，自动化是否仍应继续。该字段仅支持布尔值（True，False）。默认值为False
iDelayAfter	False	number	300	执行活动后的延迟时间（以毫秒为单位）。默认时间为300毫秒
iDelayBefore	False	number	200	活动开始执行任何操作之前的延迟时间（以毫秒为单位）。默认的时间量是200毫秒

返回结果

iRet，将命令运行后的结果赋值给此变量。

运行实例

/*********************************等待网页加载***************************************
命令原型：
    WebBrowser.WaitPage(hWeb,arrElement,iTimeOut,optionArgs)
入参：
    hWeb--浏览器对象
    bWait--是否等待网页加载完毕后命令才返回
    arrElement--判断是否存在指定的元素
    iTimeOut--等待页面加载的超时时间
    bContinueOnError--错误后是否继续
    iDelayAfter--执行后延时
    iDelayBefore--执行前延时
出参:
    iRet--命令运行返回结果
注意事项：
    使用谷歌内核的浏览器首次使用需要安装扩展并启用扩展
    需要打开浏览器后才能使用   
*********************************************************************************/
Dim hWeb,iRet
//启动IE浏览器并打开百度首页
hWeb = WebBrowser.Create("ie","www.baidu.com",30000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200,"sBrowserPath":"","sStartArgs":""})
//加载微博url
iRet = WebBrowser.GoURL(hWeb,"weibo.com",true,{},30000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
//等待页面加载,并返回指定的元素是否存在
iRet = WebBrowser.WaitPage(hWeb,{"wnd":[{"cls":"IEFrame","title":"*","app":"iexplore"},{"cls":"Internet Explorer_Server"}],"html":[{"aaname":"热门微博","tag":"SPAN"}]},60000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
//在调试栏输出返回值(0,1)
TracePrint(iRet)

可视化样例