autoit執(zhí)行自動升級程序

自動運行升級程序,輸入所需信息,中間記錄日志文件

參數(shù)1:升級程序膊毁,參數(shù)2:服務(wù)器IP,參數(shù)3:賬號基跑,參數(shù)4:密碼婚温, 參數(shù)5:日志文件


au3腳本詳情如下:

Local $log_file = FileOpen($CMDLine[5],1);追加寫

Local $temp_file = FileOpen("update.log",2);覆蓋寫

FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "運行軟件")

run($CMDLine[1])

Sleep(5000)

FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "輸入服務(wù)器IP")

WinWait("請輸入服務(wù)器IP地址","",10);等待輸入服務(wù)器IP地址窗口,不用WinWaitActive可能窗口不為激活狀態(tài)

If WinExists("請輸入服務(wù)器IP地址") Then;是否有輸入窗口

? ControlSetText("請輸入服務(wù)器IP地址","127.0.0.1","Edit1",$CMDLine[2]);輸入IP地址

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "點擊確定")

? ControlClick("請輸入服務(wù)器IP地址","確定(&K)","Button1");點擊確定

? Sleep(5000)

Else

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "未出現(xiàn)輸入IP框")

? Exit -1

EndIf

WinWait("服務(wù)器升級提示","",30);等待服務(wù)器升級提示窗口變成活動

FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "等待服務(wù)器升級提示窗口變成活動")

If WinExists("服務(wù)器升級提示") Then;是否有輸入窗口

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "服務(wù)器IP不通")

? FileWriteLine($log_file, ControlGetText("服務(wù)器升級提示","","[CLASS:Static; INSTANCE:1]"))

? ControlClick("服務(wù)器升級提示","確定","Button1");點擊確定

? Sleep(5000)

? Exit -1

EndIf

FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "等待輸入賬號密碼")

WinWait("請輸入web登陸帳號和密碼","",10);等待請輸入web登陸帳號和密碼窗口變成活動

If WinExists("請輸入web登陸帳號和密碼") Then;是否有輸入窗口

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "輸入賬號密碼")

? ControlSetText("請輸入web登陸帳號和密碼","","Edit1",$CMDLine[3]);輸入賬號

? ControlSetText("請輸入web登陸帳號和密碼","","Edit2",$CMDLine[4]);輸入密碼

? ControlClick("請輸入web登陸帳號和密碼","確定(&K)","Button1");點擊確定

? Sleep(5000)

Else

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "不用輸入賬號密碼")

EndIf

WinWait("請輸入web登陸帳號和密碼","",10);等待請輸入web登陸帳號和密碼窗口變成活動

If WinExists("請輸入web登陸帳號和密碼") Then;是否有輸入窗口

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "賬號密碼錯誤")

Else

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "賬號密碼正確")

EndIf

FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "等待失敗提示")

WinWait("服務(wù)器升級提示-升級失敗","",10);升級失敗提示

If WinExists("服務(wù)器升級提示-升級失敗") Then;服務(wù)器升級提示-升級失敗

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "升級失敗")

? FileWriteLine($log_file, ControlGetText("服務(wù)器升級提示-升級失敗","","[CLASS:Static; INSTANCE:1]"))

? ControlClick("服務(wù)器升級提示-升級失敗","","Button1");點擊確定

? Sleep(5000)

? Exit -1

Else

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "未找到服務(wù)器升級提示-升級失敗")

EndIf

FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "等待升級完成")

$i=1

While $i <= 100

? WinWait("服務(wù)器升級提示","",60);等待服務(wù)器升級提示窗口

? $handle = WinGetHandle("服務(wù)器升級提示")

? WinActivate($handle)

? If WinExists("服務(wù)器升級提示") Then;等待升級完成

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "升級完成")

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & ControlGetText($handle,"","[CLASS:Static; INSTANCE:1]"))

? FileWriteLine($log_file, ControlGetText($handle,"","[CLASS:Static; INSTANCE:1]"))

? ControlClick($handle,"","Button1");點擊是

? ExitLoop

? Exit 0

? Else

? FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "未找到服務(wù)器升級提示")

? EndIf

? $i=$i+1

WEnd

FileWriteLine($temp_file, @YEAR & "-" & @MON & "-" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & "升級失敗")

Exit -1

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市媳否,隨后出現(xiàn)的幾起案子栅螟,更是在濱河造成了極大的恐慌,老刑警劉巖篱竭,帶你破解...
    沈念sama閱讀 210,978評論 6 490
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件力图,死亡現(xiàn)場離奇詭異,居然都是意外死亡掺逼,警方通過查閱死者的電腦和手機吃媒,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 89,954評論 2 384
  • 文/潘曉璐 我一進店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來吕喘,“玉大人赘那,你說我怎么就攤上這事∈扌梗” “怎么了漓概?”我有些...
    開封第一講書人閱讀 156,623評論 0 345
  • 文/不壞的土叔 我叫張陵漾月,是天一觀的道長病梢。 經(jīng)常有香客問我,道長梁肿,這世上最難降的妖魔是什么蜓陌? 我笑而不...
    開封第一講書人閱讀 56,324評論 1 282
  • 正文 為了忘掉前任,我火速辦了婚禮吩蔑,結(jié)果婚禮上钮热,老公的妹妹穿的比我還像新娘。我一直安慰自己烛芬,他們只是感情好隧期,可當(dāng)我...
    茶點故事閱讀 65,390評論 5 384
  • 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著赘娄,像睡著了一般仆潮。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上遣臼,一...
    開封第一講書人閱讀 49,741評論 1 289
  • 那天性置,我揣著相機與錄音,去河邊找鬼揍堰。 笑死鹏浅,一個胖子當(dāng)著我的面吹牛嗅义,可吹牛的內(nèi)容都是我干的。 我是一名探鬼主播隐砸,決...
    沈念sama閱讀 38,892評論 3 405
  • 文/蒼蘭香墨 我猛地睜開眼之碗,長吁一口氣:“原來是場噩夢啊……” “哼!你這毒婦竟也來了凰萨?” 一聲冷哼從身側(cè)響起继控,我...
    開封第一講書人閱讀 37,655評論 0 266
  • 序言:老撾萬榮一對情侶失蹤,失蹤者是張志新(化名)和其女友劉穎胖眷,沒想到半個月后武通,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體,經(jīng)...
    沈念sama閱讀 44,104評論 1 303
  • 正文 獨居荒郊野嶺守林人離奇死亡珊搀,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點故事閱讀 36,451評論 2 325
  • 正文 我和宋清朗相戀三年冶忱,在試婚紗的時候發(fā)現(xiàn)自己被綠了。 大學(xué)時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片境析。...
    茶點故事閱讀 38,569評論 1 340
  • 序言:一個原本活蹦亂跳的男人離奇死亡囚枪,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出劳淆,到底是詐尸還是另有隱情链沼,我是刑警寧澤,帶...
    沈念sama閱讀 34,254評論 4 328
  • 正文 年R本政府宣布沛鸵,位于F島的核電站括勺,受9級特大地震影響,放射性物質(zhì)發(fā)生泄漏曲掰。R本人自食惡果不足惜疾捍,卻給世界環(huán)境...
    茶點故事閱讀 39,834評論 3 312
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望栏妖。 院中可真熱鬧乱豆,春花似錦、人聲如沸吊趾。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,725評論 0 21
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽论泛。三九已至揩尸,卻和暖如春,著一層夾襖步出監(jiān)牢的瞬間孵奶,已是汗流浹背疲酌。 一陣腳步聲響...
    開封第一講書人閱讀 31,950評論 1 264
  • 我被黑心中介騙來泰國打工, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留,地道東北人朗恳。 一個月前我還...
    沈念sama閱讀 46,260評論 2 360
  • 正文 我出身青樓湿颅,卻偏偏與公主長得像,于是被迫代替她去往敵國和親粥诫。 傳聞我的和親對象是個殘疾皇子油航,可洞房花燭夜當(dāng)晚...
    茶點故事閱讀 43,446評論 2 348