huangguolian 发表于 2009-2-13 17:24:54

QQ2009最新版 自动安装（源码）

Run(@ScriptDir&"QQ2009.exe")

WinWait("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009")   
WinWaitActive("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009")
ControlCommand("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009", "Button1", "Check")   ;打上钩 我已阅读并同意软件许可协议和青少年上网安全指导
Send("!n")

WinWait("腾讯QQ2009 安装向导","请选择使用环境与查杀木马设置")
WinWaitActive("腾讯QQ2009 安装向导","请选择使用环境与查杀木马设置")
Send("!n")

WinWait("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项")
WinWaitActive("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项")
ControlCommand("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项", "Button9", "UnCheck")   ;去掉 将浏览器的首页设置为QQ.com 钩
Send("!n")

WinWait("腾讯QQ2009 安装向导","请选择安装路径")
WinWaitActive("腾讯QQ2009 安装向导","请选择安装路径")
Send("!i")

WinWait("腾讯QQ2009 安装向导","安装完成")
WinWaitActive("腾讯QQ2009 安装向导","安装完成")
ControlCommand("腾讯QQ2009 安装向导","安装完成", "Button8", "UnCheck")   ;去掉 开机时启动腾讯QQ2009 钩
Send("!f")
Send("{enter}")

[ 本帖最后由 huangguolian 于 2009-2-13 17:28 编辑 ]

holygg0123 发表于 2009-2-17 09:08:42

我也写了一个：
run("QQ2009Beta_chs.exe")
winwaitactive("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009")
controlcommand("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009","Button1","uncheck","")
controlclick("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009","Button3")
winwaitactive("腾讯QQ2009 安装向导","请选择使用环境与查杀木马设置")
controlclick("腾讯QQ2009 安装向导","请选择使用环境与查杀木马设置","Button2")
winwaitactive("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项")
controlcommand("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button9","uncheck","")
controlcommand("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button7","uncheck","")
ControlClick("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button2")
winwaitactive("腾讯QQ2009 安装向导","请选择安装路径")
controlsettext("腾讯QQ2009 安装向导","请选择安装路径","Edit1","D:TencentQQ2009")
controlclick("腾讯QQ2009 安装向导","请选择安装路径","Button2")
winwaitactive("腾讯QQ2009 安装向导","安装完成")
controlcommand("腾讯QQ2009 安装向导","安装完成","Button6","uncheck","")
controlcommand("腾讯QQ2009 安装向导","安装完成","Button7","uncheck","")
controlcommand("腾讯QQ2009 安装向导","安装完成","Button8","uncheck","")
controlclick("腾讯QQ2009 安装向导","安装完成","Button2")

xrbenbeba 发表于 2009-2-17 09:23:07

没什么事 溜达

qq1244521 发表于 2009-2-20 00:07:24

:face (13): 这么多命令我得学到什么时候 支持 我喜欢现成的
但是我更喜欢自己编出来的 有空可以教教我么？ 我连AU3是什么我都不知道有机会学会么？

wjs3325120 发表于 2009-7-14 12:56:38

只为学习而来

xtlikang 发表于 2009-7-16 20:40:07

好东西，不过我比较爱自己写，虽然现在不会，但是以后会的，顶你们下

493517530 发表于 2009-7-25 10:42:56

额 对我来说还是很难 初学者

djxdjxdjx 发表于 2009-8-1 22:46:35

都很简单哟!!!!

djxdjxdjx 发表于 2009-8-1 22:46:41

都很简单哟!!!!

yinbinly 发表于 2011-5-2 10:57:19

貌似使用软件写出来的
页: [1]
查看完整版本: QQ2009最新版 自动安装（源码）