AU3源码腾讯QQ2010 自动安装脚本

风一样的男孩

1. Dim $a = "腾讯QQ2010 安装向导"
3. TrayTip($a,$a & "正在进行安装，不要进行操作，以免出现错误！",5,2)
5. Run("QQ2010Beta.exe")
7. WinWait($a,"欢迎使用腾讯QQ2010")
8. WinActivate($a,"欢迎使用腾讯QQ2010")
9. ControlClick($a,"欢迎使用腾讯QQ2010","Button1")
11. Send ("!N")
13. WinWait($a,"自定义安装选项")
14. WinActivate($a,"自定义安装选项")
16. ControlClick($a,"自定义安装选项","Button9")
17. ControlClick($a,"自定义安装选项","Button10")
18. ControlClick($a,"自定义安装选项","Button11")
20. Send("!n")
22. WinWait($a,"请选择安装路径")
23. WinActivate($a,"请选择安装路径")
25. Send ("!I")
28. WinWait($a,"安装完成")
29. WinActivate($a,"安装完成")
30. ControlClick($a,"安装完成","Button6")
31. ControlClick($a,"安装完成","Button8")
32. ControlClick($a,"安装完成","Button9")
33. ControlClick($a,"安装完成","Button7")
34. Send ("!f")

复制代码