顽固不化 发表于 2008-6-13 21:03:02

影音先锋自动安装脚本

;影音先锋自动安装脚本
;2008.4.10 顽固不化
;
SplashTextOn("****警告****","    自动安装过程中请勿进行键盘与鼠标的操作,否则,自动安装会崩溃!",120,80,10,10)
Run("yyxf.exe")
WinWaitActive("安装 - 影音先锋","欢迎使用")
Send("!n")
WinWaitActive("安装 - 影音先锋","许可协议")
Send("!a""!n")
WinWaitActive("安装 - 影音先锋","选择目标位置")
send("!n")
if winactive("文件夹存在") Then
    send("!y")
EndIf
WinWaitActive("安装 - 影音先锋","选择组件")
Send("!n")
WinWaitActive("安装 - 影音先锋","准备安装")
Send("!i")
winwaitclose("安装 - 影音先锋","正在安装")
WinWaitActive("http://yyxfplayer.com")
Send("!{F4}")
WinActivate ("安装 - 影音先锋","安装向导完成")
WinWaitActive("安装 - 影音先锋","安装向导完成")
Send("{space}""!f")

TrayTip("提示", "影音先锋自动安装第二版", 30, 1)
Run("YYXF.exe")
WinWaitActive("安装 - 影音先锋", "欢迎使用")
$WinHD = WinGetHandle("安装 - 影音先锋", "欢迎使用")
ControlClick($WinHD, "", "TButton1")
WinWaitActive($WinHD, "许可协议")
ControlClick($WinHD, "", "TRadioButton1")
ControlClick($WinHD, "", "TButton2")
WinWaitActive($WinHD, "选择目标位置")
ControlClick($WinHD, "", "TButton3")
WinWaitActive($WinHD, "选择组件")
ControlClick($WinHD, "", "TButton3")
WinWaitActive($WinHD, "准备安装")
ControlClick($WinHD, "", "TButton3")
TrayTip("", "", "")
While 1
        If WinExists("http://yyxfplayer.com/", "链接") Then
                WinClose("http://yyxfplayer.com/", "链接")
                ExitLoop
        EndIf
WEnd
WinWaitActive($WinHD, "向导完成")
WinActivate($WinHD,"向导完成")
Send("{space}")
ControlClick($WinHD, "向导完成", "TButton3")

[ 本帖最后由 顽固不化 于 2008-7-31 11:21 编辑 ]

lxz 发表于 2008-7-30 07:20:17

顽固不化的东西,要好好收藏.

bsplin 发表于 2008-7-31 19:42:04

智能化的处理，很好很强大！

jiamei521 发表于 2008-10-14 12:19:11

收藏收藏收藏收藏

收藏收藏收藏收藏收藏收藏

netbandit 发表于 2008-12-4 08:41:36

如果更改安装目录的话还需要添加什么语句？

linweifan 发表于 2008-12-4 15:58:20

学习啊，:face (29):

番茄 发表于 2008-12-4 20:28:27

原帖由 netbandit 于 2008-12-4 08:41 发表 http://www.autoitx.com/images/common/back.gif
如果更改安装目录的话还需要添加什么语句？

WinWaitActive("安装 - 影音先锋","选择目标位置")
ControlSetText("安装 - 影音先锋","选择目标位置","Edit1", "D:\Program Files\影音先锋")

wangjinxian 发表于 2008-12-5 09:28:37

一直想学自动安装，就是学不会，苦恼

wuluck 发表于 2008-12-6 13:37:42

好东西，学习一下，学会就爽了

fuchengwu 发表于 2012-6-7 11:21:35

楼主很棒！

a7602177 发表于 2012-6-25 15:08:52

谢谢楼主了

a7602177 发表于 2012-6-25 15:13:10

谢谢楼主了
页: [1]
查看完整版本: 影音先锋自动安装脚本