//测试程序:打开百度搜索,获取第一条结果的链接并访问
dim iRet = ""
dim bRet = ""
dim hWeb = ""
dim 链接=""
dim 元素={"wnd":[{"cls":"Chrome_RenderWidgetHostHWND"}],"html":{"tagName":"A","attrMap":{"parentid":"1"},"index":0}}//指定元素最少特征
dim 首页="https://www.baidu.com/s?ie=utf-8&f=8&rsv_bp=1&rsv_idx=1&tn=baidu&wd=uibot&rsv_pq=8660124100066275&rsv_t=c527%2Fh9Jjcjj%2FLUDigJm7Cc8coJvIk4YyRwHAXTv4%2BC66GVNdvY%2FA8G5T7c&rqlang=cn&rsv_enter=1&rsv_sug3=4&rsv_sug1=4&rsv_sug7=101"
hWeb = WebBrowser.Create("chrome",首页,10000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200,"sBrowserPath":"","bChromeUnsafe":false})
TracePrint(hWeb)
//打开浏览器,运行指定网页
delay 1000
#icon("@res:default.png")
bRet = UiElement.Exists(元素,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})//判定元素是否存在,保存为变量bret
If bRet=true
#icon("@res:dl1538m2-5tdj-3rco-cepg-r8sfg9827mhv.png")
链接 = UiElement.GetAttribute(元素,"href",{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})//目标元素连接属性使用“href”
TracePrint(链接)
iRet = WebBrowser.GoURL(hWeb,链接,true,[],30000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})//访问连接
Else
TracePrint("错误元素不存在")
End If