JAVA 因简洁而美丽,因有效而动人 善待JAVA这颗种子的人,必将得到她的福荫

autoit -迅雷5安装

上一篇 / 下一篇  2009-10-18 16:25:18 / 个人分类:AutoIt

#requireadmin
#Region AutoIt3Wrapper 预编译参数(常用参数)
#AutoIt3Wrapper_icon=Thunder_5.9.5.990.exe
#AutoIt3Wrapper_outfile=Thunder_5.9.5.990_zd.exe
#AutoIt3Wrapper_Res_Description=迅雷下载 AU3自动安装
#AutoIt3Wrapper_Res_Description=迅雷下载 版本:5.9.5.990
#AutoIt3Wrapper_Res_LegalCopyright = 版权所有 (C) 2009_131738
#AutoIt3Wrapper_Res_Comment=脚本生成于:2009年 08月 21日
#EndRegion AutoIt3Wrapper 预编译参数设置完成
#comments-start __________________
Au3 版本:  3.3.1.0
脚本作者:  131738
        Email: wang420100@yahoo.cn
        QQ/TM:  909521335
脚本版本:  迅雷安装1.0
脚本功能: 自动安装: 迅雷下载
#comments-end 脚本开始____

;启动迅雷安装程序,安装包和脚本在同一目录下。
Run ( @ScriptDir & "\Thunder5.9.9.1118.exe" )                
WinWaitActive( "迅雷5 : 用户使用协议", "欢迎使用 迅雷5 安装向导" )        ;"标题与文本"按钮
ControlClick( "迅雷5 : 用户使用协议", "","Button2" )        ;"控件点击"按钮
WinWaitActive( "迅雷5: 安装选项", "选择附加任务" )         ;"标题与文本"按钮

;修改安装目录
ControlSetText ( "迅雷5: 安装选项", "选择附加任务", "Edit1", "D:\install\Xunlei")

;复选框,由于不是CheckBox形式所以只能用坐标定位的方法做。
$WinPosArray = WinGetPos ( "迅雷5: 安装选项" )
$TNewCheckListBoxArray = ControlGetPos ( "迅雷5: 安装选项", "", "SysTreeView321" )
$Width =   $WinPosArray[0] + $TNewCheckListBoxArray[0]
$Height =  $WinPosArray[1] + $TNewCheckListBoxArray[1]
MouseClick ( "left", $Width + 15  , $Height + 55  )        ;所有数字在弹出的调试脚本中手动调试
MouseClick ( "left", $Width + 15  , $Height + 71  )        ; 然后将数字结果写入本工具编辑框 + 号后面!
MouseClick ( "left", $Width + 15  , $Height + 86  )
MouseClick ( "left", $Width + 15  , $Height + 100  )
MouseClick ( "left", $Width + 15  , $Height + 117  )
ControlClick("迅雷5: 安装选项", "", "Button2")

;百度工具栏安装取消。
WinWaitActive  ( "安装:迅雷5",  "< 上一步(&P)" )        ;这一句是“路径修改”按钮自带的,不需要另外选择按钮!
ControlCommand ( "安装:迅雷5", "< 上一步(&P)", "Button4", "UnCheck", "" )
ControlClick("安装:迅雷5", "", "Button2")

;结束安装
WinWaitActive( "迅雷5: 安装完成", "迅雷5安装程序已完成安装" )        ;"标题与文本"按钮
ControlClick( "迅雷5: 安装完成", "","Button5" )        ;"控件点击"按钮
ControlClick( "迅雷5: 安装完成", "","Button6" )        ;"控件点击"按钮
ControlClick( "迅雷5: 安装完成", "","Button7" )        ;"控件点击"按钮
ControlClick( "迅雷5: 安装完成", "","Button2" )        ;"控件点击"按钮

;=================================================================================


TAG: AutoIt autoit

引用 删除 jh1opin4   /   2013-10-17 17:57:24
这个例子很不错
引用 删除 jh1opin4   /   2013-10-17 17:57:09
5
 

评分:0

我来说两句

Open Toolbar