autoit对WinRAR无效，请各位帮忙！

jevonleen

请大家帮我看看以下代码：

Run("wrar380stp.exe","",@SW_HIDE)
WinWaitActive("WinRAR 3.80 简体中文版","目标文件夹")
WinMove("WinRAR 3.80 简体中文版","",-500,-500,200,200)
Send("{enter}")
WinWait("WinRAR 简体中文版安装","关联文件")
WinWaitActive("WinRAR 简体中文版安装","关联文件")
WinMove("WinRAR 简体中文版安装","",-500,-500,200,200)
Send("{enter}")
WinWait("WinRAR 简体中文版安装","WinRAR 已经成功地安装")
WinWaitActive("WinRAR 简体中文版安装","WinRAR 已经成功地安装")
Send("{enter}")
FileCopy ("rarreg.key","C:\Program Files\WinRAR\rarreg.key")

为何WinMove,@SW_HIDE不起作用？

sxd

把文件发一下呢

ZEROBOYS

@@~基本上，我建議先善用靜默參數，再使用Autoit 補不足之處
以下是我設計收藏...請笑納
（優勢結合註冊機，且改版易，僅要註冊機相容，可以無限升級）
#NoTrayIcon
ToolTip("安裝中，請稍待...",0,0,"亞空間-工作室",1)
RunWait("regedit /s Sn-Key.reg")
RunWait("SETUP.exe /S")
Sleep(2000)
run("key.exe")
WinWait("CORE keygen/patch")
ControlSetText("","","Edit1","亞空間-工作室")
ControlClick("","","Button1")
WinWait("Success")
ControlClick("","","Button1")
WinClose("CORE keygen/patch")
;~ 刪除-備份檔
$path=@ProgramFilesDir&("\WinRAR")
FileDelete($path&"\RAR.exe.bak")
FileDelete($path&"\UnRAR.exe.bak")
FileDelete($path&"\WinRAR.exe.bak")
exit

wwcbjs

呵呵！和我一样

rolaka

其实 可以用没有延迟的循环短时间疯狂搜窗口 然后设为隐藏

好像winrar的窗体是后期创建的 不受标记影响..

sanhen

rarreg.key放在Winrar.exe安装程序的目录，它安装的时候会自拷贝的，完成注册的。

jevonleen

加上静默参数，脚本暂停，无法安装，为何？能不能教教我！AutoIT脚本加上安装程序静默安装参数能修改安装路径和避免安装其它捆绑的插件吗？请各位高手指教！

 run("wrar380stp.exe /s")
WinWaitActive("WinRAR 3.80 简体中文版","目标文件夹")
Send("{enter}")
WinWait("WinRAR 简体中文版安装","关联文件")
WinWaitActive("WinRAR 简体中文版安装","关联文件")
Send("{enter}")
WinWaitActive("WinRAR 简体中文版安装","WinRAR 已经成功地安装")
Send("{enter}")

[ 本帖最后由 jevonleen 于 2009-4-1 03:00 编辑 ]

ZEROBOYS

To jevonleen
您本末導致了，當你加上靜默時，基本上一行跑完，程式早安裝完畢了
(除非您不是使用原裝WinRAR的安裝檔)
事後的窗口等待與窗口激活? 一輩子等不到........窗口出現

至於WinRAR 應該從來沒捆綁任何插件吧？
還有一個關鍵...您沒事下 搬移視窗參數的目的為何？
一下子 WinWait 一下子 WinWaitActive
整體語法不夠精簡與漂亮，且不是建議使用Send("{enter}") 這類語法...

一個邏輯考量為 會使用Autoit 打包軟體者，早晚會使用軟體安裝器，一次安裝大量軟體...
所以您一開始的設計走向，要多運用控件參數，避免被其他程式衝突...

補充～靜默時，是否能轉向目錄，這部份要實驗，沒有絕對性....（您可以想安裝於D槽吧？）

[ 本帖最后由 ZEROBOYS 于 2009-4-1 09:16 编辑 ]