论坛 › 已解决问题区 › 【已解决】暴风影音2011最新版安装过不去？

zhangchongzhi 发表于 2011-4-13 12:21:59

【已解决】暴风影音2011最新版安装过不去？

本帖最后由 zhangchongzhi 于 2011-10-19 12:09 编辑

到最后要下个Real插件老过不去，还有后面的去掉软件的勾也不行？？
#cs #ce 注的那段。。#RequireAdmin
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=Storm2011.exe|-1
#AutoIt3Wrapper_outfile=stormsetup.exe
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****


$title="安装 暴风影音 2011"

Run("Storm2011.exe")

;欢迎
WinWait($title,"欢迎安装 暴风影音 2011")
Send("!n")

;许可证协议
WinWait($title,"许可证协议")
Send("!i")

;选择组件和需要创建的快捷方式
WinWait($title,"选择组件和需要创建的快捷方式")
Send("{down 2},{right},{down 2},{space}")
Send("!n")

;选择安装位置
WinWait($title,"选择安装位置")
ControlSetText($title,"选择安装位置","Edit1","C:\Program Files\StormII\")
Send("!n")

;免费的百度工具栏
WinWait($title,"免费的百度工具栏")
ControlCommand($title,"安装百度工具栏","Button4","UnCheck")
Send("!i")

#cs
;选择需要下载的播放组件
If ControlGetText($title,"选择需要下载的播放组件","Static8")="选择需要下载的播放组件" Then
        WinActivate($title,"选择需要下载的播放组件")
        Send("!n")
        ;暴风影音推荐软件
        WinWait($title,"暴风影音推荐软件")
                ControlCommand($title,"360杀毒永久免费版","Button4","UnCheck")
                ControlCommand($title,"安装快车（FlashGet）","Button5","UnCheck")
                ControlCommand($title,"酷狗音乐","Button6","UnCheck")
                ControlCommand($title,"傲游浏览器3.0","Button7","UnCheck")
        Send("!n")
EndIf
#ce

;暴风影音 安装完成
WinWait($title,"暴风影音 安装完成")
ControlCommand($title,"运行 暴风影音 2011","Button4","UnCheck")
ControlClick($title,"完成(&F)","Button2","left",1)

Exit

zhangchongzhi 发表于 2011-4-13 12:49:44

http://autoitx.com/forum.php?mod=viewthread&tid=18392&from=favorites
看到这个帖子，先试试了。

zhangchongzhi 发表于 2011-4-13 13:31:13

本帖最后由 zhangchongzhi 于 2011-4-18 13:02 编辑

这个先试试。问个问题:selectendselect   和if endif 返回值不一样？？？下面的select行，if就不行。。
#RequireAdmin
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=Storm2011.exe|-1
#AutoIt3Wrapper_outfile=stormsetup.exe
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****


$title="安装 暴风影音 2011"

Run("Storm2011.exe")

;欢迎
WinWait($title,"欢迎安装 暴风影音 2011")
Send("!n")

;许可证协议
WinWait($title,"许可证协议")
Send("!i")

;选择组件和需要创建的快捷方式
WinWait($title,"选择组件和需要创建的快捷方式")
Send("{down 2},{right},{down 2},{space}")
Send("!n")

;选择安装位置
WinWait($title,"选择安装位置")
ControlSetText($title,"选择安装位置","Edit1","C:\Program Files\StormII\")
Send("!n")

;免费的百度工具栏
WinWait($title,"免费的百度工具栏")
ControlCommand($title,"安装百度工具栏","Button4","UnCheck")
Send("!i")

While WinExists($title,"暴风影音 安装完成")=0
      select
                CaseWinExists($title,"选择需要下载的播放组件")=1
                        WinActivate($title,"选择需要下载的播放组件")
                        Send("!n")
                        ;暴风影音推荐软件
                        WinWait($title,"暴风影音推荐软件")
                        ControlCommand($title,"360杀毒永久免费版","Button4","UnCheck")
                        ControlCommand($title,"安装快车（FlashGet）","Button5","UnCheck")
                        ControlCommand($title,"酷狗音乐","Button6","UnCheck")
                        ControlCommand($title,"傲游浏览器3.0","Button7","UnCheck")
                        Send("!n")
                CaseWinExists($title,"暴风影音推荐软件")=1
                        WinActivate($title,"暴风影音推荐软件")
                        ControlCommand($title,"360杀毒永久免费版","Button4","UnCheck")
                        ControlCommand($title,"安装快车（FlashGet）","Button5","UnCheck")
                        ControlCommand($title,"酷狗音乐","Button6","UnCheck")
                        ControlCommand($title,"傲游浏览器3.0","Button7","UnCheck")
                        Send("!n")
      EndSelect
Wend

#cs
While 1
                If   WinExists($title,"选择需要下载的播放组件")=1 Then
                        WinActivate($title,"选择需要下载的播放组件")
                        Send("!n")
                        ;暴风影音推荐软件
                        WinWait($title,"暴风影音推荐软件")
                        ControlCommand($title,"360杀毒永久免费版","Button4","UnCheck")
                        ControlCommand($title,"安装快车（FlashGet）","Button5","UnCheck")
                        ControlCommand($title,"酷狗音乐","Button6","UnCheck")
                        ControlCommand($title,"傲游浏览器3.0","Button7","UnCheck")
                        Send("!n")
                ElseIf   WinExists($title,"暴风影音推荐软件")=1 Then
                        WinActivate($title,"暴风影音推荐软件")
                        ControlCommand($title,"360杀毒永久免费版","Button4","UnCheck")
                        ControlCommand($title,"安装快车（FlashGet）","Button5","UnCheck")
                        ControlCommand($title,"酷狗音乐","Button6","UnCheck")
                        ControlCommand($title,"傲游浏览器3.0","Button7","UnCheck")
                        Send("!n")
                EndIf      
Wend
#ce
;暴风影音 安装完成
WinWait($title,"暴风影音 安装完成")
ControlCommand($title,"运行 暴风影音 2011","Button4","UnCheck")
ControlClick($title,"完成(&F)","Button2","left",1)

Exit

夜猫猫 发表于 2012-7-22 18:57:34

学习一下.....

查看完整版本: 【已解决】暴风影音2011最新版安装过不去？