只有数组或字典类型才能被索引

段桂友 2021-9-7 1183

各位大哥大姐  求求  帮忙 看看最后一步下载文件(图片为什么 不能保存 )报错 只有数组或字典类型才能被索引

------------------------

Dim temp = ""

Dim dRet = ""

Dim 下载两码 = ""

Dim 文件名称 = ""

Dim sRet = ""

Dim 健康码行程卡图片地址 = ""

Dim 网址 = ""

Dim 申请人网址 = ""

Dim iRet = ""

Dim objExcelWorkBook = ""

Dim arrayRet = ""

Dim hWeb = ""

Dim arrayData = ""

hWeb = WebBrowser.Create("uibotbrowser","网址链接",30000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"sBrowserPath":"","sStartArgs":""})

#icon("@res:4tk0e6ct-d3j6-8t0p-1807-6tmskvbfuf2r.png")

Window.Show({"wnd":[{"cls":"Chrome_WidgetWin_0","title":"UiBot浏览器","app":"uibotBrowser"}]},"max")

Delay(1000)

申请人网址 = UiElement.DataScrap({"html":{"attrMap":{"id":"task-content","tag":"DIV"},"index":0,"tagName":"DIV"},"wnd":[{"app":"uibotBrowser","cls":"Chrome_WidgetWin_*","title":"*"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}]},{"Columns":[{"props":["url"],"selecors":[{"className":"priority_entry","index":1,"prefix":"","tag":"div","value":"div:nth-child(1)"},{"className":"priority_content clearfix","index":0,"prefix":">","tag":"div","value":"div.priority_content.clearfix"},{"index":0,"prefix":">","tag":"div","value":"div"},{"className":"task-label task-item-name task-item-name-default large-device","index":0,"prefix":">","tag":"div","value":"div.task-label.task-item-name.task-item-name-default.large-device"},{"className":"","index":0,"prefix":">","tag":"p","value":"p"},{"className":"","index":0,"prefix":">","tag":"a","value":"a"}]}],"ExtractTable":0},{"objNextLinkElement":"","iMaxNumberOfPage":5,"iMaxNumberOfResult":-1,"iDelayBetweenMS":1000,"bContinueOnError":False})

Delay(1000)

For Each 网址 In 申请人网址

    

    TracePrint(网址)

    #icon("@res:g3nuruqs-63er-9lrp-2t44-u8ludgd8dt2l.png")

    iRet = WebBrowser.GoURL(hWeb,网址[0],True,{"wnd":[{"cls":"Chrome_WidgetWin_*","title":"*","app":"uibotBrowser"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":{"tagName":"DIV","attrMap":{"tag":"DIV","id":"security-indicator","ubtitle":"true"},"index":0}},30000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200})

    Delay(1000

上传的附件:
最新回复 (4)
  • 1ee 2021-9-10
    2

    iRet = WebBrowser.GoURL(hWeb,网址,True,{"wnd":[{"cls":"Chrome_WidgetWin_*","title":"*","app":"uibotBrowser"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":{"tagName":"DIV","attrMap":{"tag":"DIV","id":"security-indicator","ubtitle":"true"},"index":0}},30000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200})

  • zxh_501552 2021-9-14
    3
    处理了没有?我也是同样的问题
  • 果子哩 2021-9-14
    4
    代码没贴全,麻烦提供一下完整的代码
  • 段桂友 2022-2-6
    5

    谢谢


返回
发新帖