AutoIt寫Office 2007單鍵安裝

Home Home

引用 | 編輯 virusee
2009-03-20 12:16

樓主
▼

下面是我的語法
在下面文字紅色的部分我有問題請教
MsgBox按下"否"之後，為什麼程式還是會繼續往下(執行Run)

;用進度條計算30秒後再開始動作
ProgressOn("準備安裝Office 2007", "請等候30秒", "0 ％ ")
For $i = 1 to 100 step 1
sleep(303)
ProgressSet( $i, $i & " ％ ")
Next
ProgressSet(100 , "完成", "完成")
sleep(500)
ProgressOff()

MsgBox(4, "請確定你的螢幕解析度", "本軟體僅能運行於1024x768")

;執行安裝程式
Run("E:\2007\Enterprise\setup.exe")
;把視窗至頂
WinSetOnTop("Microsoft Office Enterprise 2007", "", 1)
WinWaitActive("Microsoft Office Enterprise 2007")
;自動輸入序號
ControlSetText("Microsoft Office Enterprise 2007&quo ..

訪客只能看到部份內容，免費加入會員

引用 \| 編輯 rchockxm 2009-03-20 14:26	1樓 ▲ ▼
Msgbox 函式沒有判斷返回值當然是往下執行阿詳細請看說明檔... x0

引用 \| 編輯 virusee 2009-03-20 14:51	2樓 ▲ ▼
下面是引用 rchockxm 於 2009-03-20 14:26 發表的 : Msgbox 函式沒有判斷返回值當然是往下執行阿詳細請看說明檔... 我看他的範例 MsgBox(4096, "測試", "此對話框將會在10秒後自動消失", 10) 只有看到這個範例有返回值的例子嗎？ x0

引用 \| 編輯 rchockxm 2009-03-20 15:06	3樓 ▲ ▼
說明檔沒看仔細喔... If MsgBox(4, "Test", "This box will time out in 10 seconds", 10) = 7 Then Exit x2

引用 \| 編輯 SilentWorld 2009-03-20 15:06	4樓 ▲ ▼
複製程式 If MsgBox(4, "請確定你的螢幕解析度", "本軟體僅能運行於1024x768") == 6 Then ;你的安裝腳本 Else Exit EndIf x2

引用 \| 編輯 virusee 2009-03-20 16:11	5樓 ▲ ▼
感謝兩位的幫忙，我的問題已經解決了原來後面要加上then來動作 x0

引用 \| 編輯 threesecond 2009-03-22 11:40	6樓 ▲ ▼
我一直搞不懂，像 Office 這種原廠就提供自訂自動安裝的東西，為什麼還有人會捨近求遠去研究 Autoit 這種天書？是因為無聊沒事想挑戰自己的技術力嗎？ x1

引用 \| 編輯 hobbya 2009-07-24 14:37	7樓 ▲
下面是引用 threesecond 於 2009-03-22 11:40 發表的 : 我一直搞不懂，像 Office 這種原廠就提供自訂自動安裝的東西，為什麼還有人會捨近求遠去研究 Autoit 這種天書？是因為無聊沒事想挑戰自己的技術力嗎？就像燒菜，可以用不同的做法，作為興趣而言，沒有甚麼是無聊不無聊的。 x0