QQ2011官方Bata2自动安装~~小试牛刀

sunnday · 发表于 2011-5-2 16:12:52

本帖最后由 sunnday 于 2011-5-16 08:16 编辑

$Teet="腾讯QQ2011 安装向导"
$Teet2="请选择安装路径"
$Teet3=""
$Teet4="欢迎使用腾讯QQ2011"
$Teet5="我已阅读并同意软件许可协议和青少年上网安全指引"
$Teet6="请选择自定义安装选项与快捷方式选项"
$Teet7="安装完成"
ShellExecute("QQ2011.exe","",@ScriptDir,"open")

TrayTip("正在安装程序","安装过程请勿安装其他软件",5,1)
WinWait($Teet,$Teet4)
WinActivate($Teet,$Teet4)
ControlClick($Teet,$Teet5,"Button1")
ControlClick($Teet,$Teet4,"[CLASS:Button; INSTANCE:3]")

WinWait($Teet,$Teet6)
WinActivate($Teet,$Teet6)
ControlClick($Teet,$Teet6,"[CLASS:Button; INSTANCE:9]")
ControlClick($Teet,$Teet6,"[CLASS:Button; INSTANCE:12]")
ControlClick($Teet,$Teet6,"[CLASS:Button; INSTANCE:17]")
ControlClick($Teet,$Teet6,"[CLASS:Button; INSTANCE:7]")
ControlClick($Teet,$Teet6,"[CLASS:Button; INSTANCE:2]")

WinWait($Teet,$Teet2)
WinActivate($Teet,$Teet2)
ControlSetText($Teet,$Teet3,"Edit1","d:\Program Files\Tencent\QQ")
ControlClick($Teet,$Teet2,"[CLASS:Button; INSTANCE:7]")
ControlClick($Teet,$Teet2,"[CLASS:Button; INSTANCE:2]")

WinWait($Teet,"正在提取安装文件")
WinWaitClose($Teet,"正在提取安装文件")
While 1
If ControlGetHandle($Teet,$Teet7,"Button6") Then ExitLoop
WEnd
ControlClick($Teet,$Teet7,"Button6")
ControlClick($Teet,$Teet7,"Button8")
ControlClick($Teet,$Teet7,"Button9")
ControlClick($Teet,$Teet7,"Button7")
ControlClick($Teet,$Teet7,"Button2")

ProcessClose("QQ2011.exe")

贴了

最近刚接触AU3自己做的自动安装脚本小试牛刀吧
如果有哪里做的不好的还希望大家谅解毕竟是小菜嘛呵呵
有错误还请大家及时指正

wsfda · 发表于 2011-5-2 16:28:21

这种源码建议直接贴出来，下载要20金币，看的人会少之又少

sunnday · 发表于 2011-5-2 16:35:51

回复 1# sunnday

哦

lpxx · 发表于 2011-5-2 16:49:21

很多人都是从自动安装入门的，恭喜，下载就不下了，费钱。

tryhi · 发表于 2011-5-2 17:00:35

为表示支持，我下载了

yinbinly · 发表于 2011-5-2 20:17:58

楼主直接贴出来吧，不然我感觉不会有人花钱下载看的

sunnday · 发表于 2011-5-3 08:36:45

回复 4# lpxx

嗯嗯谢谢

sunnday · 发表于 2011-5-3 08:37:31

回复 5# tryhi

谢谢大哥哦有问题的话请及时指出来

chainmart · 发表于 2011-5-3 19:36:42

到头来还是没贴～

zhusheng8701 · 发表于 2011-5-4 00:52:36

呵呵。。。论坛下载的钱太贵，这种帖子的代码一般没有人下载的。呵呵

sunnday · 发表于 2011-5-4 14:58:03

回复 9# chainmart

不知道怎么贴

sunnday · 发表于 2011-5-4 18:47:58

回复 9# chainmart

不知道乍贴

wzhen1210 · 发表于 2011-5-8 19:38:00

不帖出来还真的就会没有人看的。

wsfda · 发表于 2011-5-8 19:58:41

编辑帖子，高级模式，选择源码，就可以了

meteor0330 · 发表于 2011-5-9 00:01:16

下载太贵了！！唉！穷人呀！

		自动登录	找回密码
密码			加入

[原创] QQ2011官方Bata2自动安装~~小试牛刀

本帖子中包含更多资源