Dim 服务内容=""
Dim 监理委托=""
Dim 设计物料清单=""
For i = 0 To 18 Step 2
Mouse.Action({"html":{"tagName":"a","attrMap":{"css-selector":"body>div>ul>li>a"},"index":i +2},"wnd":[{"app":"chrome","cls":"Chrome_WidgetWin_1","title":"*"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":100,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"uia","bMoveSmoothly":False})
Delay(800)
#icon("@res:5c6gu12h-kml7-dsj1-8je5-pjvl7u9emfr7.png")
设计物料清单 = UiElement.Exists({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"A","parentid":"tabLIList","aaname":"设计物资清单"}]},{"bContinueOnError":False,"iDelayAfter":1,"iDelayBefore":1})
#icon("@res:bmedo88o-hpuo-9ddi-mkkb-ugo6cd902a78.png")
监理委托 = UiElement.Exists({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"INPUT","id":"btnConfirm"}]},{"bContinueOnError":False,"iDelayAfter":1,"iDelayBefore":1})
#icon("@res:d3p4jr1q-f5lq-ittq-c6fo-u9f3b8t0fm4b.png")
服务内容 = UiElement.Exists({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"INPUT","id":"btnReSelect"}]},{"bContinueOnError":False,"iDelayAfter":1,"iDelayBefore":1})
If 服务内容=True
#icon("@res:2e3k459k-fe28-jt40-9hkg-87ejjsbq6mp4.png")
Mouse.Action({"wnd":[{"app":"chrome","cls":"Chrome_WidgetWin_1","title":"服务委托结果管理 - Powered By Pmis - Google Chrome"}],"ctrl":[{"role":"ROLE_SYSTEM_PANE","name":"服务委托结果管理 - Powered By Pmis - Google Chrome"},{"role":"ROLE_SYSTEM_PANE","name":"Google Chrome"},{"role":"ROLE_SYSTEM_PAGETAB","name":"服务委托结果管理 - Powered By Pmis"},{"role":"ROLE_SYSTEM_PUSHBUTTON","name":"关闭"}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":100,"iDelayBefore":100,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"uia","bMoveSmoothly":False})
Else
If 监理委托=True
#icon("@res:ed46nsj3-o1f8-e84m-n82m-4vf26ki8ficm.png")
Mouse.Action({"wnd":[{"app":"chrome","cls":"Chrome_WidgetWin_1","title":"服务委托结果管理 - Google Chrome"}],"ctrl":[{"role":"ROLE_SYSTEM_PANE","name":"服务委托结果管理 - Google Chrome"},{"role":"ROLE_SYSTEM_PANE","name":"Google Chrome"},{"role":"ROLE_SYSTEM_PAGETAB","name":"服务委托结果管理"},{"role":"ROLE_SYSTEM_PUSHBUTTON","name":"关闭"}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":100,"iDelayBefore":100,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate","bMoveSmoothly":False})
Else
If 设计物料清单=True
#icon("@res:ujone2ld-689a-0htk-ejb5-glqh0b6fqi6i.png")
Mouse.Action({"wnd":[{"app":"chrome","cls":"Chrome_WidgetWin_1","title":"新增工作量签证 - Google Chrome"}],"ctrl":[{"role":"ROLE_SYSTEM_PANE","name":"新增工作量签证 - Google Chrome"},{"role":"ROLE_SYSTEM_PANE","name":"Google Chrome"},{"role":"ROLE_SYSTEM_PAGETAB","name":"新增工作量签证"},{"role":"ROLE_SYSTEM_PUSHBUTTON","name":"关闭"}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":100,"iDelayBefore":100,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate","bMoveSmoothly":False})
Else
#icon("@res:hsbnp5de-4m2t-lgal-np0s-mvlvh3s01299.png")
Mouse.Action({"wnd":[{"app":"chrome","cls":"Chrome_WidgetWin_1","title":"开箱验货监理确认 - Google Chrome"}],"ctrl":[{"role":"ROLE_SYSTEM_PANE","name":"开箱验货监理确认 - Google Chrome"},{"role":"ROLE_SYSTEM_PANE","name":"Google Chrome"},{"role":"ROLE_SYSTEM_PAGETAB","name":"开箱验货监理确认"},{"role":"ROLE_SYSTEM_PUSHBUTTON","name":"关闭"}]},"left","click",1000,{"bContinueOnError":True,"iDelayAfter":100,"iDelayBefore":100,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate","bMoveSmoothly":False})
End If
End If
End If
Next
请教下大神,为什么我程序里面每次间隔判断的运行时间都要十几秒呢?有什么办法可以减少吗?
