论坛 › 『 提问交流 』 › 程序维护&重新安装如何选择？

caoyuanyue 发表于 2008-10-28 15:43:39

程序维护&重新安装如何选择？

大家看看我的程序出错到哪里了？
软件安装后，再次安装会出现“程序修复”，所以搞了个选择，结果加入后，修复可以运行，重新安装的脚本不管用了

Run("chvoice_m.exe")

WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "欢迎使用 中文女声语音库 3.0 InstallShield Wizard")
Send("!N")

Select
        Case WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "程序维护")
        Send("!P")
        Send("!N")
        WinActivate("中文女声语音库 3.0 InstallShield Wizard", "已做好修复程序的准备")
        Send("!I")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", " InstallShield Wizard完成")
        Send("!F")
       

        Case WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "许可证协议")
        Send("!A")
        Send("!N")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "用户信息")
        Send("!N")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "已做好安装程序的准备")
        Send("!I")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", " InstallShield Wizard完成")
        Send("{TAB}")
        Send("{TAB}")
        Send("{SPACE}")
        Send("!F")
EndSelect
Exit

caoyuanyue 发表于 2008-10-29 08:58:13

不好意思，昨天自己找到原因了，发上来，已经解决
Run("chvoice_m.exe")

WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "欢迎使用 中文女声语音库 3.0 InstallShield Wizard")
Send("!N")

IfWinActive("中文女声语音库 3.0 InstallShield Wizard", "程序维护") Then
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "程序维护")
        Send("!P")
        Send("!N")
        WinActivate("中文女声语音库 3.0 InstallShield Wizard", "已做好修复程序的准备")
        Send("!I")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", " InstallShield Wizard完成")
        Send("!F")

ElseIf WinActive("中文女声语音库 3.0 InstallShield Wizard", "许可证协议") Then
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "许可证协议")
        Send("!A")
        Send("!N")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "用户信息")
        Send("!N")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", "已做好安装程序的准备")
        Send("!I")
        WinWaitActive("中文女声语音库 3.0 InstallShield Wizard", " InstallShield Wizard完成")
        Send("{TAB}")
        Send("{SPACE}")
        Send("!F")
EndIf
Run("register_m.exe")
WinWaitActive("中文女声语音库 3.0 [多机版] 注册程序", "shwinning")
ControlClick("中文女声语音库 3.0 [多机版] 注册程序","","Button1")
WinWaitActive("中文女声语音库 3.0 [多机版] 注册程序", "注册认证成功.")
ControlClick("中文女声语音库 3.0 [多机版] 注册程序","","Button2")
Exit

查看完整版本: 程序维护&重新安装如何选择？