必威体育Betway必威体育官网
当前位置:首页 > IT技术

AutoIt3自动化脚本安装常用软件

时间:2019-08-06 13:12:08来源:IT技术作者:seo实验室小编阅读:51次「手机版」
 

autoit3

文章目录

IDE环境

在这里,提供一个中文AutioIt3 汉化版地址 :http://www.autoitx.com/ 。觉得不好用,请自行搜索 “autoit3” 获取

常用软件

序号 软件名称 软件描述 版本号 函数跳转
01 Google Chorme 谷歌浏览器,浏览网页 v71.0.3578.98 _Install_Chrome()
02 Aliim 阿里买家版,淘宝购物用 v9.12.05C _Install_Aliim()
03 BaiduNetdisk 百度网盘,网络存储 v5.7.2 _Install_BaiduNetdisk()
04 Dingtalk 钉钉,办公软件 v4.5.11.13 _Install_DingTalk()
05 EditPlus 文本编辑器 v3.60.870_SC _Install_EditPlus()
06 Firefox 火狐浏览器,浏览网页用 v64.0_18.5.0.0 _Install_Firefox()
07 KuGou 酷狗音乐播放器,听歌曲的 v8.2.75.20951 _Install_KuGou()
08 YouDaoDict 网易有道词典,词典工具 v6.3.69.8341 _Install_YouDaoDict()
09 NotepadPlus 文本编辑器 v7.6.1 _Install_NotepadPlus()
10 SogouPinyin 搜狗拼音输入法 v9.2.0.2745 _Install_SogouPinyin()
11 QQChat 腾讯QQ聊天工具 v8.9.2.20760 _Install_QQChat()
12 QQMusic QQ音乐播放器,听歌曲的 v16.33.0.0 _Install_QQMusic()
13 QQPlayer QQ影音播放器,播放视频 v3.9.936 _Install_QQPlayer()
14 TimChat Tim办公聊天 v2.2.8 _Install_TimChat()
15 WeChat 微信聊天工具 v2.6.6.1000 _Install_WeChat()
16 WeWork 微信企业版聊天工具 v2.7.0.1558 _Install_WeWork()
17 WinRaR 解压缩工具 v5.61.0.0 _Install_WinRaR()

所有函数综合

#comments-start
	version: 1.0
	author: LINKSINKE
	date: 2018/12/29 19:34 - 2019/01/19 18:02
	describe: 软件自动执行脚本 autorunsoft-v1.0.au3
#comments-end

; 1.共计17款软件自动化执行自定义安装
; 2.需要注意谷歌浏览器不能自定义安装路径
; 3.如果不指定安装路径,则会使用软件默认安装路径
Func RunAll()
	_Install_Chrome(); 安装路径无法自定义
	; 例如我将阿里买家这款软件安装到D盘叫mysoft文件夹下
	_Install_Aliim("D:\mysoft")
	; _Install_Aliim()
	_Install_BaiduNetdisk()
	_Install_DingTalk()
	_Install_EditPlus()
	_Install_Firefox()
	_Install_KuGou()
	_Install_YouDaoDict()
	_Install_NotepadPlus()
	_Install_SogouPinyin()
	_Install_QQChat()
	_Install_QQMusic()
	_Install_QQPlayer()
	_Install_TimChat()
	_Install_WeChat()
	_Install_WeWork()
	_Install_WinRaR()
EndFunc   ;==>RunAll

Google Chrome浏览器安装 v71.0.3578.98

; Google Chrome浏览器安装 v71.0.3578.98
Func _Install_Chrome()
	Run("D:\package\softs\71.0.3578.98_chrome64_stable_windows_installer.exe")
EndFunc   ;==>_Install_Chrome

阿里旺旺买家版 v9.12.05C

; 阿里旺旺买家版 v9.12.05C
Func _Install_Aliim($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\AliIM2018_taobao(9.12.05C).exe"); 运行安装程序
	WinWaitActive("阿里旺旺安装"); 激活向导窗口
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClick("left", 482, 418, 2); 第一次点击是获取路径选择,第二次点击是输入焦点获取
		Send("^a" & $dir); 路径输入
		MouseClick("left", 520, 82); 返回(收起自定义选项)
	EndIf
	MouseClick("left", 460, 325); 开始安装
	Sleep(ceiling(TimerDiff($hTimer)) * 2); 在运行完安装程序,打开第2个程序之间所消耗的时间x2倍,来等待主程序的出现
	Local $handleID = WinWaitActive("[CLASS:StandardFrame]"); 激活主程序用以获取句柄信息
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_Aliim
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

百度网盘 v5.7.2

; 百度网盘 v5.7.2
Func _Install_BaiduNetdisk($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\baidu_Netdisk_v5.7.2.exe"); 运行安装程序
	WinWaitActive("[title:安装百度网盘; CLASS:DuiHostWnd]"); 激活向导窗口
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClick("left", 270, 328); 输入焦点获取
		Send("^a" & $dir); 路径输入
	EndIf
	MouseClick("left", 270, 250); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer)) * 2); 在运行完安装程序,打开第2个程序之间所消耗的时间x2倍,来等待主程序的出现
	Local $handleID = WinWaitActive("[CLASS:DuiHostWnd]"); 激活主程序用以获取句柄信息
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_BaiduNetdisk
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

钉钉 v4.5.11.13

; 钉钉 v4.5.11.13
Func _Install_DingTalk($dir = "")
	Run("D:\package\softs\DingTalk_v4.5.11.13.exe"); 运行安装程序
	WinWaitActive("[CLASS:#32770; TITLE:钉钉 安装]", "欢迎使用“钉钉”安装向导"); 激活向导窗口
	Send("!n"); 下一步
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		Send("^a" & $dir); 路径输入
	EndIf
	Send("!n"); 开始安装
	WinWaitActive("钉钉 安装", "正在完成“钉钉”安装向导"); 激活完成窗口
	Send("^r^f"); 安装后不自动运行,同时也关闭窗口
EndFunc   ;==>_Install_DingTalk
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

EditPlus编辑器 v3.60.870_SC

; EditPlus编辑器 v3.60.870_SC
Func _Install_EditPlus($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Run("D:\package\softs\EditPlus_v3.60.870_SC.exe"); 运行安装程序
	WinWaitActive("EditPlus 3", "欢迎使用 EditPlus 3 安装向导"); 激活向导窗口
	Send("!n!n"); 下一步
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		Send($dir); 路径输入
	EndIf
	Send("!n!n"); 下一步
	MouseClick("left", 64, 190); 建立桌面快捷方式
	Send("!n!i"); 进行安装
	WinWaitActive("EditPlus 3", "EditPlus 3 安装向导完成"); 激活完成窗口
	Send("!{SPACE}!f"); 关闭完成窗口
	WinWaitActive("授权协议", "EditPlus 版本 3 许可协议"); 激活协议窗口
	Send("!y"); 同意协议
	WinClose("EditPlus"); 关闭主窗口,也就是EditPlus的工作环境
EndFunc   ;==>_Install_EditPlus
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Firefox浏览器 v64.0_18.5.0.0

; Firefox浏览器 v64.0_18.5.0.0
Func _Install_Firefox($dir = "")
	Run("D:\package\softs\Firefox Setup 64.0_v18.5.0.0_x64.exe"); 运行安装程序
	WinWaitActive("Mozilla Firefox 安装", "欢迎使用 Mozilla Firefox 安装向导"); 激活安装窗口
	Send("!n!c!n"); 下一步
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		Send("^a^c" & $dir); 路径输入
	EndIf
	Send("!n!n!n!i"); 开始安装
	WinWaitActive("Mozilla Firefox 安装", "完成 Mozilla Firefox 安装向导"); 激活完成窗口
	Send("!l!f"); 安装后不自动运行,同时也关闭窗口
EndFunc   ;==>_Install_Firefox
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

酷狗音乐播放器 v8.2.75.20951

; 酷狗音乐播放器 v8.2.75.20951
Func _Install_KuGou($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\kugou_v8.2.75.20951.exe"); 运行安装程序
	WinWaitActive("酷狗音乐安装程序", "酷狗用户服务协议"); 激活向导窗口
	MouseClick("left", 48, 346); 展开自定义安装
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClick("left", 292, 246); 输入焦点获取
		Send("^a" & $dir); 路径输入
	EndIf
	MouseClick("left", 329, 290); 是否设为默认播放器(不设置成默认播放器)
	MouseClick("left", 215, 330); 进行安装
	Sleep(Ceiling(TimerDiff($hTimer)) * 4); 在运行完安装程序,打开第2个程序之间所消耗的时间x4倍,来等待主程序的出现
	MouseClick("left", 23, 205); 关闭开机自启动
	MouseClick("left", 23, 235); 不显示酷狗音乐云盘
	MouseClick("left", 23, 265); 不安装腾讯视频
	MouseClick("left", 287, 333); 立即体验
	Local $handleID = WinWaitActive("[CLASS:kugou_ui]"); 激活主程序用以获取句柄信息
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_KuGou
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

有道词典 v6.3.69.8341

; 有道词典 v6.3.69.8341
Func _Install_YouDaoDict($dir = "")
	Opt("MouseCoordMode", 0); 激活窗口的相对坐标
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\netease_dict_v6.3.69.8341.exe"); 运行安装程序
	WinWaitActive("有道词典6.3 安装", "已阅读并认可"); 激活向导窗口
	MouseClick("left", 560, 380, 1); 展开自定义安装
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClick("left", 268, 430); 输入焦点获取
		Send("^a" & $dir); 路径输入
	EndIf
	MouseClick("left", 185, 470); 取消开机自启动
	MouseClick("left", 280, 285); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer))); 在运行完安装程序,打开第2个程序之间所消耗的时间,来等待主程序的出现
	Local $handleID = WinWaitActive("[CLASS:#32770]"); 激活主程序用以获取句柄信息
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_YouDaoDict
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Notepad++编辑器 v7.6.1

; Notepad++编辑器 v7.6.1
Func _Install_NotepadPlus($dir = "")
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\npp.7.6.1.Installer.x64.exe"); 运行安装程序
	WinWaitActive("Installer Language", "Please select a language."); 激活向导窗口
	Send("{ENTER}!n!i"); 语言默认,下一步,同意协议
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		Send("^a" & $dir); 路径输入
	EndIf
	Send("!n");下一步
	Local $hWnd = WinWaitActive("Notepad++ v7.6.1 安装"); 获取当前窗口的句柄信息
	Local $hControl = ControlGetHandle($hWnd, "", "[CLASS:SysTreeView32; instance:1]"); 获取TreeView的空间句柄信息
	ControlTreeView($hWnd, "", $hControl, "Check", "#4"); 选择需要的功能
	Send("{SPACE}!n"); 选中需要的功能,下一步
	Local $hWnd2 = WinWaitActive("[CLASS:#32770; INSTANCE:1]"); 获取当前窗口父级控件的句柄信息
	Local $hControl2 = ControlGetHandle($hWnd2, "", "[CLASS:Button; INSTANCE:4]"); 获取在桌面上创建图标按钮的句柄信息
	ControlClick($hWnd2, "", $hControl2, "left"); 在桌面上创建快捷方式图标
	Send("!i"); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer))); 在运行完安装程序,打开第2个程序之间所消耗的时间,来等待主程序的出现
	WinWaitActive("Notepad++ v7.6.1 安装", "正在完成 Notepad++ v7.6.1 安装向导"); 激活完成窗口
	Send("!r!f"); 不自动运行,安装完成
EndFunc   ;==>_Install_NotepadPlus
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

搜狗拼音输入法 v9.2.0.2745

; 搜狗拼音输入法 v9.2.0.2745
Func _Install_SogouPinyin($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\sogou_pinyin_92a.exe"); 运行安装程序
	WinWaitActive("搜狗输入法 9.2正式版 安装", "搜狗输入法 9.2正式版 安装"); 激活向导窗口
	MouseClick("left", 523, 356); 展开自定义安装
	MouseClick("left", 143, 443); 取消查看最新特性
	MouseClick("left", 25, 443); 关闭运行向导设置
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClickDrag("left", 424, 402, 0, 0); 拖拽鼠标以达到ctrl+a的效果
		Send("^a" & $dir); 路径输入
		MouseClick("left", 100, 40); 重获焦点
	EndIf
	MouseClick("left", 305, 278); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer)) * 2); 在运行完安装程序,打开第2个程序之间所消耗的时间x2倍,来等待主程序的出现
	Local $hWnd = WinWaitActive("搜狗输入法 9.2正式版 安装 ", "安装完毕");
	MouseClick("left", 202, 203); 不自动安装搜狗浏览器
	MouseClick("left", 202, 233); 不自动安装wps offic
	MouseClick("left", 322, 203); 不自动安装腾讯视频
	MouseClick("left", 322, 233); 不设置搜狗导航为默认首页
	MouseClick("left", 292, 339); 立即体验
EndFunc   ;==>_Install_SogouPinyin
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

腾讯QQ聊天 v8.9.2.20760

; 腾讯QQ聊天 v8.9.2.20760
Func _Install_QQChat($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\tencent_qq_v8.9.2.20760.exe"); 运行安装程序
	WinWaitActive("腾讯QQ安装向导", "立即安装"); 激活向导窗口
	MouseClick("left", 574, 457); 展开自定义选项
	MouseClick("left", 121, 498); 关闭开机自启动
	MouseClick("left", 121, 558); 消息记录存储到我的文档
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClickDrag("left", 430, 432, 115, 432); 拖拽鼠标以达到ctrl+a的效果
		Send($dir); 路径输入
	EndIf
	MouseClick("left", 338, 345); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer))); 在运行完安装程序,打开第2个程序之间所消耗的时间,来等待主程序的出现
	WinWaitActive("腾讯QQ安装向导", "完成安装"); 激活完成安装窗口
	Local $hTimer2 = TimerInit(); 设置程序运行初始时间
	ControlClick("腾讯QQ安装向导", "", 224, "left"); 完成安装
	Local $handleID = WinWaitActive("[CLASS:TXGuiFoundation]"); 激活主程序用以获取句柄信息
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_QQChat
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

QQ音乐播放器 v16.33.0.0

; QQ音乐播放器 v16.33.0.0
Func _Install_QQMusic($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\tencent_qqmusic_v16.33.0.0.exe"); 运行安装程序
	WinWaitActive("QQMusicInstallerWndName"); 激活向导窗口
	MouseClick("left", 514, 400); 展开自定义安装
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClick("left", 428, 325); 输入焦点获取
		Send("^a" & $dir); 路径输入
	EndIf
	MouseClick("left", 305, 369); 设置为默认播放器
	MouseClick("left", 471, 369); 设置开机不启动
	MouseClick("left", 514, 400); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer))); 在运行完安装程序,打开第2个程序之间所消耗的时间,来等待主程序的出现
	Local $handleID = WinWaitActive("[CLASS:QQMusicinstallerClassName]"); 激活主程序用以获取句柄信息
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_QQMusic
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

QQ影音视频播放器 v3.9.936

; QQ影音视频播放器 v3.9.936
Func _Install_QQPlayer($dir = "")
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\tencent_qqplayer_v3.9.936.exe"); 运行安装程序
	WinWaitActive("QQ影音3.9安装", "欢迎使用“QQ影音3.9”安装向导"); 激活向导窗口
	Send("!n!i"); 进入下一步并同意安装协议
	Local $hWnd = WinWait("QQ影音3.9安装", "", 10); 获取当前窗体句柄信息
	Local $hControl = ControlGetHandle($hWnd, "", "[CLASS:SysTreeView32; INSTANCE:1]"); 获取TreeView控件句柄信息
	ControlTreeView($hWnd, "", $hControl, "Select", "#1"); 功能选中
	Send("{SPACE}!n"); 全选所有,进下一步
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		Send($dir); 路径输入
	EndIf
	Send("!i"); 开始安装
	WinWaitActive("QQ影音3.9安装", "安装选项"); 激活安装后完要出现的窗口
	Local $bControl = ControlGetHandle($hWnd, "安装腾讯视频,海量高清视频免费看", "[CLASS:Button; INSTANCE:4]"); 获取button按钮控件句柄信息
	ControlClick($hWnd, "", $bControl, "left"); 取消安装腾讯视频
	Send("!n"); 进入下一步
	WinActive("QQ影音3.9安装", "正在完成“QQ影音3.9”安装向导"); 激活完成窗口
	Send("!r!f"); 不自动运行,安装完成
EndFunc   ;==>_Install_QQPlayer
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

腾讯Tim聊天 v2.2.8

; 腾讯Tim聊天 v2.2.8
Func _Install_TimChat($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\tencent_tim_v2.2.8.exe"); 运行安装程序
	Local $hWnd = WinWaitActive("腾讯TIM安装向导", "立即安装"); 获取当前窗体句柄信息
	Local $hControl = ControlGetHandle($hWnd, "默认安装", "[CLASS:Button; INSTANCE:6]"); 获取默认安装按钮控件句柄信息
	ControlClick($hWnd, "", $hControl, "left"); 展开自定义安装
	Local $hControl2 = ControlGetHandle($hWnd, "开机自动启动", "[CLASS:Button; INSTANCE:10]"); 获取开机自动启动按钮控件句柄信息
	ControlClick($hWnd, "", $hControl2, "left"); 开机不自动启动
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClickDrag("left", 443, 420, 112, 420); 拖拽鼠标以达到ctrl+a的效果
		Send($dir); 路径输入
	EndIf
	Local $hControl3 = ControlGetHandle($hWnd, "立即安装", "[CLASS:Button; INSTANCE:3]"); 获取立即安装按钮控件句柄信息
	ControlClick($hWnd, "", $hControl3, "left"); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer))); 在运行完安装程序,打开第2个程序之间所消耗的时间,来等待主程序的出现
	WinWaitActive("腾讯TIM安装向导", "立即使用"); 激活完成安装窗口
	Local $hControl4 = ControlGetHandle($hWnd, "立即使用", "[CLASS:Button; INSTANCE:8]"); 获取立即使用按钮控件句柄信息
	ControlClick($hWnd, "", $hControl4, "left"); 完成安装
	Local $handleID = WinWaitActive("TIM"); 激活默认打开的TIM登录窗口
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_TimChat
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

微信聊天 v2.6.6.1000

; 微信聊天 v2.6.6.1000
Func _Install_WeChat($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Opt("WinDetecthiddenText", 1); 指定是否让隐藏的窗口文本也能被窗口匹配函数检测.
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\tencent_wechat_v2.6.6.1000.exe"); 运行安装程序
	WinWait("微信安装向导"); 等待窗口出现
	Sleep(Ceiling(TimerDiff($hTimer)) * 2); 停止后面的操作,目的是让向导窗口出现
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClick("left", 273, 356); 展开更多选项
		MouseClick("left", 273, 428); 输入焦点获取
		Send("^a" & $dir); 路径输入
		MouseClick("left", 273, 356); 收起更多选项
	EndIf
	MouseClick("left", 270, 227); 开始安装
	WinWaitActive("微信安装向导"); 激活安装完成窗口
	MouseClick("left", 259, 277); 立即使用
	Local $handleID = WinWait("登录", "", 10); 激活默认打开的企业微信扫码窗口
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_WeChat
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

企业微信聊天 v2.7.0.1558

; 企业微信聊天 v2.7.0.1558
Func _Install_WeWork($dir = "")
	Opt("MouseCoordMode", 0); 设置激活窗口的相对坐标位置
	Opt("MouseClickDelay", 500); 设置鼠标点击次数的间隔时长为0.5s
	Local $hTimer = TimerInit(); 设置程序运行初始时间
	Run("D:\package\softs\tencent_WXWork_v2.7.0.1558.exe"); 运行安装程序
	Local $hWnd = WinWaitActive("企业微信 安装", "立即安装"); 获取当前窗体句柄信息
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		MouseClick("left", 314, 196); 输入焦点获取
		Send("^a" & $dir); 路径输入
	EndIf
	Local $hControl = ControlGetHandle($hWnd, "立即安装", "[CLASS:Button; INSTANCE:5]"); 获取立即安装按钮控件句柄信息
	ControlClick($hWnd, "", $hControl, "left"); 开始安装
	Sleep(Ceiling(TimerDiff($hTimer))); 在运行完安装程序,打开第2个程序之间所消耗的时间,来等待主程序的出现
	WinWaitActive("企业微信 安装", "安装成功"); 激活完成安装窗口
	Local $hControl2 = ControlGetHandle($hWnd, "立即使用", "[CLASS:Button; INSTANCE:3]"); 获取立即使用按钮控件句柄信息
	ControlClick($hWnd, "", $hControl2, "left"); 立即使用
	Local $handleID = WinWait("企业微信", "", 10); 激活默认打开的企业微信扫码窗口
	ProcessClose(WinGetProcess($handleID)); 杀死进程以达到关闭窗口的目的
EndFunc   ;==>_Install_WeWork
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

Winrar解压缩 v5.61.0.0

; WinRaR解压缩 v5.61.0.0
Func _Install_WinRaR($dir = "")
	Run("D:\package\softs\winrar_561scp_x64.exe"); 运行安装程序
	Local $hWnd = WinWaitActive("WinRAR 5.61", "by Alexander Roshal"); 获取当前窗口的句柄信息
	Local $hControl = ControlGetHandle($hWnd, "", "[CLASS:Edit; INSTANCE:1]"); 获取路径选择句柄信息
	If Not (StringIsSpace($dir)) Then; 是否为自定义安装目录
		ControlClick($hWnd, "", $hControl, "left"); 输入焦点获取
		Send("^a" & $dir); 路径输入
	EndIf
	Local $hControl2 = ControlGetHandle($hWnd, "安装", "[CLASS:Button; INSTANCE:2]"); 获取安装按钮句柄信息
	ControlClick($hWnd, "安装", $hControl2); 开始安装
	Local $hWnd2 = WinWait("WinRAR 简体中文版安装"); 获取安装后的设置窗口句柄信息
	Send("!a!t"); 文件关联类型是全部切换,层叠起来的上下文菜单(鼠标右键菜单会收缩起来)
	Local $hControl3 = ControlGetHandle($hWnd2, "确定", "[CLASS:Button; INSTANCE:31]"); 获取确认按钮句柄信息
	ControlClick($hWnd2, "确定", $hControl3); 确认设置
	Send("{SPACE}"); 关闭安装完成窗口
	Local $hWnd3 = WinWait("[TITLE:WinRAR; CLASS:CabinetWClass]", "", 10); 获取弹出的窗口句柄信息
	WinKill($hWnd3); 强制关闭弹出的窗口
EndFunc   ;==>_Install_WinRaR
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

相关阅读

LaTeX的下载安装及简易使用

前言 毕业论文中需要使用Ctex来写,但是之前完全没有接触过这个软件,所以就打算记录一下自己的学习过程。本来打算自己写一下相关

adobe reader安装失败提示错误代码150210该怎么办?

在安装Adobe Reader XI 的时候提示【Adobe Reader XI -Chinese Simplelified 安装完成之前被中断,错误代码150210】经了解同事之前

安装Linux Red Hat 6

 1. 网上下载镜像文件 rhel-server-6.2-i386-dvd.iso  2. VMware里面准备一个空的Red Hat 6的虚拟机。新建完成后修改配置,指定

新安装ubuntu,无法切换至root用户下

刚安装完成系统之后,我使用自己添加的用户进行登录,使用su - root命令切换至root用户时候。错误如下所示: $ su - root Password: 

u盘分区软件一键分区教程,可快速安装和还原系统

磁盘分区是把一个比较大的磁盘划分成几个或多个区的意思,每个分区之间互不影响,那么U盘分区要怎么分呢?小编用分区软件给

分享到:

栏目导航

推荐阅读

热门阅读