找回密码
 加入
搜索
查看: 3442|回复: 3

[原创] 7-Zip V9.14 Beta (zhfi汉化)最新版自动安装代码

[复制链接]
发表于 2010-6-10 23:13:12 | 显示全部楼层 |阅读模式
本帖最后由 jiaxinfu 于 2010-6-10 23:16 编辑

好久没有弄AU3了,看到7-ZIP有了更新,随手写个自动安装代码,没有什么技术可言
只提供给新手学习,直接贴出代码。我不像别人打包或出售呵呵。。。
run("7-Zip V9.14 Beta .exe")
WinWait("7-Zip 9.14","欢迎使用“7-Zip 9.14 Ansi 汉化版”安装向导")
If Not WinActive("7-Zip 9.14","欢迎使用“7-Zip 9.14 Ansi 汉化版”安装向导") Then WinActivate("7-Zip 9.14","欢迎使用“7-Zip 9.14 Ansi 汉化版”安装向导")
WinWaitActive("7-Zip 9.14","欢迎使用“7-Zip 9.14 Ansi 汉化版”安装向导")
Send("{ALTDOWN}N{ALTUP}")
WinWait("7-Zip 9.14","许可证协议")
If Not WinActive("7-Zip 9.14","许可证协议") Then WinActivate("7-Zip 9.14","许可证协议")
WinWaitActive("7-Zip 9.14","许可证协议")
Send("{ALTDOWN}I{ALTUP}")

WinWait("7-Zip 9.14","选择安装位置")
If Not WinActive("7-Zip 9.14","选择安装位置") Then WinActivate("7-Zip 9.14","选择安装位置")
WinWaitActive("7-Zip 9.14","选择安装位置")
Send("{ALTDOWN}N{ALTUP}")
WinWait("7-Zip 9.14","选择组件")
If Not WinActive("7-Zip 9.14","选择组件") Then WinActivate("7-Zip 9.14","选择组件")
WinWaitActive("7-Zip 9.14","选择组件")
Send("{ALTDOWN}N{ALTUP}")

WinWait("7-Zip 9.14","程序设置")
If Not WinActive("7-Zip 9.14","程序设置") Then WinActivate("7-Zip 9.14","程序设置")
WinWaitActive("7-Zip 9.14","程序设置")
Send("{ALTDOWN}I{ALTUP}")
WinWait("7-Zip 9.14","设置首页为 www.114la.com 网址导航")
If Not WinActive("7-Zip 9.14","设置首页为 www.114la.com 网址导航") Then WinActivate("7-Zip 9.14","设置首页为 www.114la.com 网址导航")
WinWaitActive("7-Zip 9.14","设置首页为 www.114la.com 网址导航")
ControlClick("7-Zip 9.14","设置首页为 www.114la.com 网址导航","Button4")
Send("{ALTDOWN}F{ALTUP}")
ProcessClose("7-Zip V9.14 Beta .exe") ;这里是直接关闭,其实不用也行,因为上面有了“F”关闭键呵呵
发表于 2010-6-12 17:00:34 | 显示全部楼层
支持楼主的奉献精神,新手学习了~
发表于 2013-9-21 13:43:41 | 显示全部楼层
精神上支持一下
发表于 2014-8-15 13:17:19 | 显示全部楼层
如果安裝過一後~
再Run此腳本就行不通了。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-3-19 12:17 , Processed in 0.072760 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表