跳到主要内容

读取网页源码

命令说明

读取当前页面的网页源代码(HTML),读取的代码和网页源文件有区别,如果网页是JS构建的,则读取的代码包含了渲染后的完整HTML结构树

命令原型

sRet = WebBrowser.GetHTML(hWeb,optionArgs)

命令参数

参数必选类型默认值说明
hWebTrueexpressionhWeb使用 WebBrowser.Create 或 WebBrowser.Bind 命令返回的浏览器句柄字符串
bContinueOnErrorFalsebooleanFalse指定即使活动引发错误,自动化是否仍应继续。该字段仅支持布尔值(True,False)。默认值为False
iDelayAfterFalsenumber300执行活动后的延迟时间(以毫秒为单位)。默认时间为300毫秒
iDelayBeforeFalsenumber200活动开始执行任何操作之前的延迟时间(以毫秒为单位)。默认的时间量是200毫秒

返回结果

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

运行实例

/*********************************读取网页源码***************************************
命令原型:
WebBrowser.GetHTML(hWeb,optionArgs)
入参:
hWeb--浏览器对象
bContinueOnError--错误后是否继续
iDelayAfter--执行后延时
iDelayBefore--执行前延时
出参:
sRet--将命令运行后的结果赋值给此变量
注意事项:
使用谷歌内核的浏览器首次使用需要安装扩展并启用扩展
需要打开浏览器后才能使用
*********************************************************************************/
Dim hWeb,bRet
//启动IE浏览器并打开百度首页
hWeb = WebBrowser.Create("ie","www.baidu.com",30000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200,"sBrowserPath":"","sStartArgs":""})
//在调试栏输出浏览器对象
TracePrint(hWeb)
//打开URL
iRet = WebBrowser.GoURL(hWeb,"https://laiye.com/download?source=product-process-creator-banner",false,{},30000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
//获取网页源码
sRet = WebBrowser.GetHTML(hWeb,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
//打印源码
TracePrint(sRet)

可视化样例