lovenoms 发表于 2010-6-20 14:16:56

为什么我的QQ2010自动安装脚本最后一步不能自动点击完成。

每次都是在最后一步停住了,帮忙看看代码哪里出了问题。
Run ("QQ2010.exe")
WinWait("腾讯QQ2010 安装向导","欢迎使用腾讯QQ2010")
If Not WinActive("腾讯QQ2010 安装向导","欢迎使用腾讯QQ2010") Then WinActivate("腾讯QQ2010 安装向导","欢迎使用腾讯QQ2010")
WinWaitActive ("腾讯QQ2010 安装向导","欢迎使用腾讯QQ2010")
;等待指定窗口被激活后再执行下面的命令
ControlCommand ("腾讯QQ2010 安装向导","欢迎使用腾讯QQ2010","Button1","Check","")
;选中
Send("{ALTDOWN}n{ALTUP}")

WinWait("腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项")
If Not WinActive("腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项") Then WinActivate("腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项")
WinWaitActive ("腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项")
ControlCommand ("腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项","Button9","UnCheck","")
;选空 安装QQ工具栏及中文搜搜
ControlCommand ("腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项","Button10","UnCheck","")
;选空 安装QQ拼音输入法
Send("{ALTDOWN}n{ALTUP}")

WinWait("腾讯QQ2010 安装向导","请选择安装路径")
If Not WinActive("腾讯QQ2010 安装向导","请选择安装路径") Then WinActivate("腾讯QQ2010 安装向导","请选择安装路径")
WinWaitActive ("腾讯QQ2010 安装向导","请选择安装路径")
ControlSetText("腾讯QQ2010 安装向导","请选择安装路径","Edit1","D:\Program Files\Tencent\QQ")
;修改指定控件的文本
Send("{ALTDOWN}i{ALTUP}")
;向指定控件发送鼠标点击命令

WinWait("腾讯QQ2010 安装向导","安装完成", 360)
If Not WinActive("腾讯QQ2010 安装向导","安装完成") Then WinActivate("腾讯QQ2010 安装向导","安装完成")
WinWaitActive ("腾讯QQ2010 安装向导","安装完成")
;等待指定窗口被激活后再执行下面的命令
ControlCommand ("腾讯QQ2010 安装向导","立即运行腾讯QQ2010","Button6","UnCheck","")
;选空 立即运行腾讯QQ2010
ControlCommand ("腾讯QQ2010 安装向导","开机时自动启动腾讯QQ2010","Button8","UnCheck","")
;选空 开机时自动启动腾讯QQ2010
ControlCommand ("腾讯QQ2010 安装向导","设置腾讯网为主页","Button9","UnCheck","")
;选空 设置腾讯网为主页
ControlCommand ("腾讯QQ2010 安装向导","显示新特性","Button7","UnCheck","")
;选空 显示新特性
Sleep(1000)
Send("{ALTDOWN}f{ALTUP}")

失忆男孩 发表于 2010-6-20 23:18:17

回复 1# lovenoms


    我试了一下 可以退出啊?你那里不可以退出吗?

失忆男孩 发表于 2010-6-20 23:23:16

回复 2# 失忆男孩


    我把安装路径改了在C盘 可以自动完成 不过好像全部都装了,什么QQ音乐、QQ软件管理之类德~
要不楼主你试试改下路径看看可行不?
页: [1]
查看完整版本: 为什么我的QQ2010自动安装脚本最后一步不能自动点击完成。