此页将介绍实现
WinZip 9 SR-1汉化版 的自动安装的方法。我们假定您已经掌握了在
HelloWorld 和
记事本(Notepad)指南中介绍的创建和运行AutoIt脚本的方法,并且懂得使用
AutoIt 窗口信息工具 来读取窗口标题及文字等信息。
这个版本的 WinZip 的安装程序总共有11个对话框是需要点击按钮(通常是
下一步(N))才能继续进行安装的。我们将要写的脚本很简单,就是要等待这些对话框出现然后点击适当的按钮即可。通常安装这类程序会有很多窗口的标题是一样的(WinZip 安装),因此我们必须使用窗口文字来判断不同的窗口。下面提供了每个对话框的截图,您可以点击这些图片来查看它们在
窗口信息工具 中显示的相应信息。
首先创建一个文件夹,复制WinZip的安装程序(
winzip90.exe)到此目录,新建一个名为
winzipinstall.au3 的脚本文件置于同一个文件夹之下。
![folder.png](https://i-blog.csdnimg.cn/blog_migrate/aeac88d82218dddbc2cda45f95d737a0.png)
现在我们将一步一步来讲解编写脚本自动安装程序的步骤。每个对话框的截图下都会有进行到该步骤的相应脚本代码(别忘了可以点击这些图片来查看它们在
窗口信息工具 中显示的相应信息)。此外您还可以查看我提供的
完整的脚本 以作参考。
第一行代码非常简单,我们要运行名为
winzip90.exe 的这个安装程序。因此此行脚本应该是这样的:
Run("winzip90.exe")
由于不是官方的英文原版,因此第一个显示的对话框将是汉化作者的声明(也就是广告,^_^):
![dialog0.png](https://i-blog.csdnimg.cn/blog_migrate/0692dd2a5f766ae57a41177afd8011a5.png)
很明显,要继续装WinZip的话就不能不按确定了。由上图可知 确定 这个按钮是默认按钮,因此我们先等待此信息框出现且处于激活状态然后发送 回车 键击动作即可。那么脚本代码就是下面这样了:
WinWaitActive("WinZip 9.0 SR-1 Build 6224 汉化版", "炎之川")
Send("{ENTER}")
Send("{ENTER}")
按下确定后第二个对话框将会弹出:
因此我们需要等待此窗口弹出且处于激活状态,接着要按第一个按钮(
S
etup),留意到该按钮名的S带有下划线,因此发送键击
ALT-s 即可点击它。那么脚本代码就是下面这样了:
WinWaitActive("WinZip Self-Extractor - instA.exe", "&Setup")
Send("!s")
Send("!s")
(别忘了可以点击这些图片来查看它们在
窗口信息工具 中显示的相应信息)
如无
意外,接着就会出现安装路径选择对话框:
我们需要等待该窗口变成活动窗口,然后如果您喜欢的话就可以按下回车表示接收此默认安装路径。那么脚本代码就应该是下面这样了:
WinWaitActive("WinZip 安装程序", "到下列文件夹")
Send("{ENTER}")
Send("{ENTER}")
但为了作更全面的示范,考虑到会有一些用户不喜欢它默认设置的安装路径,因此我们来做一个小小的修改,把路径改为自定义的。以D:\Program Files\WinZip为例,当然我们不需要也不应该按那个
浏览(B)... 按钮来定向到此目录,这样做实在是太麻烦而且不可靠,我们直接在它的编辑框中输入指定路径名即可;另外还要提醒一下,尽管程序为了方便用户已经令输入框成为可输入状态,也就是说可以通过发送键击动作直接输入路径名,但为了增强脚本的可靠性,我们还是使用窗口信息工具来获取该编辑框的名称(点击上面的图片即可查看),结果为Edit1,因此修改上面的脚本代码,变成下面这样:
WinWaitActive("WinZip 安装程序", "到下列文件夹")
ControlSetText("WinZip 安装程序", "到下列文件夹", "Edit1", "D:\Program Files\WinZip" )
Send("{ENTER}")
ControlSetText("WinZip 安装程序", "到下列文件夹", "Edit1", "D:\Program Files\WinZip" )
Send("{ENTER}")
接下来会出现的就是WinZip的功能介绍对话框:
请注意,此对话框的标题和前面的是完全一样的,都是
WinZip 安装 ——事实上几乎接下来的所有窗口都是使用这个标题!因此,为了准确区分这些窗口,我们还需要再加上一个窗口文字,同时要尽可能使用那些相对具有唯一性的文字。因此我们可选用
WinZip 的功能包括 这些文字。当窗口出现之后我们只要按下
ALT-n 键即可:
WinWaitActive("WinZip 安装", "WinZip 的功能包括")
Send("!n")
Send("!n")
接下来将会出现许可协议窗口:
等待该窗口出现然后按下
ALT-y 表示接收此协议:
WinWaitActive("许可协议")
Send("!y")
Send("!y")
接下来将会是有着类似风格的几个对话框,因此不再作详细的解释,每张图片下都会有进行到该步骤时相应的脚本代码:
WinWaitActive("WinZip 安装", "快速入门")
Send("!n")
Send("!n")
WinWaitActive("WinZip 安装", "在两种界面中进行切换")
Send("!c")
Send("!n")
Send("!c")
Send("!n")
WinWaitActive("WinZip 安装", "典型设置(推荐)(&E)")
Send("!e")
Send("!n")
Send("!e")
Send("!n")
WinWaitActive("WinZip 安装", "WinZip 需要与压缩文件格式进行关联")
Send("!n")
Send("!n")
这是安装程序的最后一个对话框。请注意,
完成 这个按钮没有定义热键——不过幸运的是它“正好”是该对话框的默认按钮,因此我们只需按下回车键即可选到它。如果不是这样的话,我们可能需要使用TAB键在各个控件之间进行切换,或者更好的方法是使用
ControlClick 函数。
WinWaitActive("WinZip 安装", "安装已完成")
Send("{ENTER}")
Send("{ENTER}")
安装完成后 WinZip 会自动启动:
等待WinZip的主窗口出现然后使用
WinClose 函数关掉它即可。
WinWaitActive("WinZip", "打开压缩文件")
WinClose("WinZip", "打开压缩文件")
WinClose("WinZip", "打开压缩文件")
为了使脚本更加可靠,我们还需要尽可能考虑各种意外的发生,比如该软件已经被用户安装好了,那么当在第二个对话框中按下
S
etup 这个按钮时将会出现意料之外的窗口:
很明显,既然程序已经被安装好了,我们就不必再进行后面的操作了,因此我们需要按下 取消 这个按钮或关闭此窗口皆可:
我想您肯定注意到了,上面的代码使用了If...Then表达式,同时还使用了 WinExists 函数,这段脚本的具体意思是:如果指定窗口存在则关闭该窗口。
关闭该窗口后会出现提示窗口:
很简单,关闭此窗口即可,安装程序将自动退出。
不过事情还不是那么简单,实际运行此脚本时会发现一个问题:如果程序已经安装过,则当然会出现上面的窗口,但是脚本却没有做我们希望它做的事情——关闭窗口。其实仔细研究就会知道,这个表达式只是进行一次即时的检测,由于时间过快,检测完窗口才出现,因此会造成脚本暂停,不能继续处理这个意外中断。或许您可能会想到不停地进行检测(也就是循环)来解决问题,其实不用这样做,使用 Adlib 函数即可解决,这个函数就是专门用来处理这些“意外”的(其实也相当于是循环,它默认是每隔250毫秒就调用自定义函数)。因此把上面的脚本修改为这样:
现在您可以查看 完整脚本 ——请注意,我把每个对话框的步骤分开并添加了注释部分,这样比较容易读懂而且方便将来进行修改(下一版本的WinZip大概也是只有轻微改动而已)。
![unexpected1.png](https://i-blog.csdnimg.cn/blog_migrate/4be15c447c6cfe7dcc7bc2f06c49b3f3.png)
很明显,既然程序已经被安装好了,我们就不必再进行后面的操作了,因此我们需要按下 取消 这个按钮或关闭此窗口皆可:
If
WinExists("WinZip Setup", "注册副本已安装")
Then
WinClose("WinZip Setup", "注册副本已安装")
;EndIf ;还需要添加下面的脚本才能结束此表达式
WinClose("WinZip Setup", "注册副本已安装")
;EndIf ;还需要添加下面的脚本才能结束此表达式
我想您肯定注意到了,上面的代码使用了If...Then表达式,同时还使用了 WinExists 函数,这段脚本的具体意思是:如果指定窗口存在则关闭该窗口。
关闭该窗口后会出现提示窗口:
![unexpected2.png](https://i-blog.csdnimg.cn/blog_migrate/ad01634ad81cc7197c33310e6544429d.png)
很简单,关闭此窗口即可,安装程序将自动退出。
WinWaitActive("WinZip 安装程序", "软件没有成功安装")
WinClose("WinZip 安装程序", "软件没有成功安装")
WinClose("WinZip 安装程序", "软件没有成功安装")
不过事情还不是那么简单,实际运行此脚本时会发现一个问题:如果程序已经安装过,则当然会出现上面的窗口,但是脚本却没有做我们希望它做的事情——关闭窗口。其实仔细研究就会知道,这个表达式只是进行一次即时的检测,由于时间过快,检测完窗口才出现,因此会造成脚本暂停,不能继续处理这个意外中断。或许您可能会想到不停地进行检测(也就是循环)来解决问题,其实不用这样做,使用 Adlib 函数即可解决,这个函数就是专门用来处理这些“意外”的(其实也相当于是循环,它默认是每隔250毫秒就调用自定义函数)。因此把上面的脚本修改为这样:
AdlibEnable("end")
Func end()
If WinExists("WinZip Setup", "注册副本已安装") Then
WinClose("WinZip Setup", "注册副本已安装")
WinWaitActive("WinZip 安装程序", "软件没有成功安装")
WinClose("WinZip 安装程序", "软件没有成功安装")
Exit
EndIf
EndFunc
;AdlibDisable() ;在脚本的最后位置添加此行
Func end()
If WinExists("WinZip Setup", "注册副本已安装") Then
WinClose("WinZip Setup", "注册副本已安装")
WinWaitActive("WinZip 安装程序", "软件没有成功安装")
WinClose("WinZip 安装程序", "软件没有成功安装")
Exit
EndIf
EndFunc
;AdlibDisable() ;在脚本的最后位置添加此行
现在您可以查看 完整脚本 ——请注意,我把每个对话框的步骤分开并添加了注释部分,这样比较容易读懂而且方便将来进行修改(下一版本的WinZip大概也是只有轻微改动而已)。
大功告成!现在运行一下
winzipinstaller.au3 这个脚本吧,您会看到WinZip将在很短的时间之内被安装好!在此页使用的技术也可用来实现大多数程序的自动化安装。
下面给各位读者一个小小的练习题吧,请尝试再编写一次这个脚本,但不要使用 Send 函数(它会向激活窗口发送键击动作),试试用
ControlClick 函数吧,这会令脚本更加可靠。在此之前您或许应该熟读关于
控件(Controls) 的说明。
0
收藏
转载于:https://blog.51cto.com/rikky/190729