#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" ) ;"控件点击"按钮
;=================================================================================