AutoIT 实现Firefox下载
生活随笔
收集整理的這篇文章主要介紹了
AutoIT 实现Firefox下载
小編覺(jué)得挺不錯(cuò)的,現(xiàn)在分享給大家,幫大家做個(gè)參考.
Firefox下載的完整代碼：
Func IsVisible($handle);WinGetState: 2 = Window is visibleIf BitAND(WinGetState($handle), 2) ThenReturn 1ElseReturn 0EndIf EndFunc ;==>IsVisible;firefox下載 Func _DownloadFile()AutoItSetOption("WinTitleMatchMode", 2);WinWaitActive("正在打開(kāi) test.zip","", 15);If WinActivate("正在打開(kāi) test.zip", "") ThenLocal $handle = WinGetHandle("正在打開(kāi) test.zip")Send("!s")Send("{enter}")WinWaitActive("輸入要保存的文件名…","")If(WinActivate("輸入要保存的文件名…","")) ThenControlSetText("", "", "[CLASS:Edit; INSTANCE:1]", "D:\auto.zip")ControlClick("", "","[CLASS:Button; TEXT:保存(&S)]");Returns an array of matching window titles and handles.Local $var = WinList()For $i = 1 To $var[0][0]; Only display visble windows that have a titleIf $var[$i][0] <> "" And IsVisible($var[$i][1]) Then;MsgBox(0, "Details", "Title=" & $var[$i][0] & @LF & "Handle=" & $var[$i][1])If $var[$i][0]=="輸入要保存的文件名…" And $var[$i][1] <> $handle Then;MsgBox(64,"hello","have sub Window!!!")Send("!y")EndIfEndIfNextEndIfelseReturn FalseEndIfExitEndFunc _DownloadFile()
轉(zhuǎn)載于:https://www.cnblogs.com/yangxia-test/p/3974797.html
總結(jié)
以上是生活随笔為你收集整理的AutoIT 实现Firefox下载的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。
