Dim 小说名 = Self.Input
Dim 没有结果
Dim 有多个结果
Dim 浏览器对象
Dim 搜索间隔少于30秒
浏览器对象 = WebBrowser.Create("ie","http://www.biquyun.com/",30000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
#icon("@res:g57js29c-uom2-2pu8-v5qd-e43894qk8bnu.png")
Window.Show({"wnd":[{"cls":"IEFrame","title":"笔趣阁_书友最值得收藏的网络小说阅读网 - Internet Explorer","app":"iexplore"}]},"show")
#icon("@res:qorokhre-v5bn-4dv2-33tr-17srdbj209v4.png")
Window.TopMost({"wnd":[{"cls":"IEFrame","title":"笔趣阁_书友最值得收藏的网络小说阅读网 - Internet Explorer","app":"iexplore"}]},true)
#icon("@res:g57js29c-uom2-2pu8-v5qd-e43894qk8bnu.png")
Window.Show({"wnd":[{"cls":"IEFrame","title":"笔趣阁_书友最值得收藏的网络小说阅读网 - Internet Explorer","app":"iexplore"}]},"max")
WebBrowser.WaitPage(浏览器对象,{"html":{"attrMap":{"id":"wd","tag":"INPUT"},"index":0,"tagName":"INPUT"},"wnd":[{"app":"iexplore","cls":"IEFrame","title":"*"},{"cls":"Internet Explorer_Server"}]},60000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
#icon("@res:qorokhre-v5bn-4dv2-33tr-17srdbj209v4.png")
Window.TopMost({"wnd":[{"cls":"IEFrame","title":"笔趣阁_书友最值得收藏的网络小说阅读网 - Internet Explorer","app":"iexplore"}]},false)
#icon("@res:fnn9acog-di6d-lk0v-uphc-9alhso22r3bj.png")
Keyboard.InputText({"html":{"attrMap":{"id":"wd","tag":"INPUT"},"index":0,"tagName":"INPUT"},"wnd":[{"app":"iexplore","cls":"IEFrame","title":"*"},{"cls":"Internet Explorer_Server"}]},小说名,true,10,10000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200,"sKeyModifiers":[],"sSimulate":"message"})
#icon("@res:cp6bb945-djdi-pm41-s712-sf38for0volq.png")
Mouse.Action({"html":{"attrMap":{"tag":"BUTTON"},"index":0,"tagName":"BUTTON"},"wnd":[{"app":"iexplore","cls":"IEFrame","title":"*"},{"cls":"Internet Explorer_Server"}]},"left","click",10000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":true,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate"})
Dialog.Notify("正在判断搜索结果", "UiBot", "0")
#icon("@res:89mmlp86-brf5-v0iq-lui9-gtndkm39qa6s.png")
没有结果 = Image.Exists({"wnd":[{"cls":"IEFrame","title":"笔趣阁_书友最值得收藏的网络小说阅读网 - Internet Explorer","app":"iexplore"}]},{"height":0,"width":0,"x":0,"y":0},@res"89mmlp86-brf5-v0iq-lui9-gtndkm39qa6s.png",0.9,10000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":true})
#icon("@res:ofkb7el1-1tta-dunu-u4q1-fedgv8q180f3.png")
有多个结果 = UiElement.Exists({"html":{"attrMap":{"aaname":小说名,"parentid":"nr","tag":"A"},"index":0,"tagName":"A"},"wnd":[{"app":"iexplore","cls":"IEFrame","title":"*"},{"cls":"Internet Explorer_Server"}]},{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
#icon("@res:ttbbircq-kcjq-ifcl-1qna-t6ejn3nkmrmg.png")
搜索间隔少于30秒 = UiElement.Exists({"html":{"attrMap":{"aaname":"出现错误!","tag":"DIV"},"index":0,"tagName":"DIV"},"wnd":[{"app":"iexplore","cls":"IEFrame","title":"*"},{"cls":"Internet Explorer_Server"}]},{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200})
if 没有结果
Dialog.MsgBox("没有找到小说"&小说名&",流程结束!","UiBot","0","1",0)
Delay(1000)
Exit
ElseIf 有多个结果
#icon("@res:default.png")
Mouse.Action({"html":{"attrMap":{"aaname":小说名,"parentid":"nr","tag":"A"},"index":0,"tagName":"A"},"wnd":[{"app":"iexplore","cls":"IEFrame","title":"*"},{"cls":"Internet Explorer_Server"}]},"left","click",10000,{"bContinueOnError":false,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":true,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate"})
ElseIf 搜索间隔少于30秒
Dialog.MsgBox("搜索间隔不能少于30秒,流程结束!","UiBot","0","1",0)
Delay(1000)
Exit
Else
End If