yamhpsxn 发表于 2010-1-12 18:09:02

QQ2009 sp6自动安装脚本

$TITLE="腾讯QQ2009 安装向导"
run("QQ2009SP6.exe")
WinWait($TITLE,"欢迎使用腾讯QQ2009")
WinActivate($TITLE,"欢迎使用腾讯QQ2009")
Send("{Space}")
Send("!N")

WinActivate($TITLE,"请选择自定义安装选项与快捷方式选项")
ControlClick ($TITLE,"请选择自定义安装选项与快捷方式选项","Button8")
ControlClick ($TITLE,"请选择自定义安装选项与快捷方式选项","Button9")
ControlClick ($TITLE,"请选择自定义安装选项与快捷方式选项","Button10")
ControlClick ($TITLE,"请选择自定义安装选项与快捷方式选项","Button11")
ControlClick ($TITLE,"请选择自定义安装选项与快捷方式选项","Button7")
ControlClick ($TITLE,"请选择自定义安装选项与快捷方式选项","Button2")
;MsgBox(4096, "标题", "确认", 1)
;Send("!N")

WinActivate($TITLE,"请选择安装路径")
ControlClick ($TITLE,"请选择安装路径","Button8")
ControlClick ($TITLE,"请选择安装路径","Button2")

WinWait($TITLE,"安装完成")
WinActivate($TITLE,"安装完成")
ControlClick ($TITLE,"安装完成","Button6")
ControlClick ($TITLE,"安装完成","Button8")
ControlClick ($TITLE,"安装完成","Button9")
ControlClick ($TITLE,"安装完成","Button7")
Send("!f")
;删除快捷启动栏及启动项快捷方式
FileDelete (@AppDataDir&"\Microsoft\Internet Explorer\Quick Launch\QQ游戏.lnk")
FileDelete (@StartupDir&"\腾讯QQ.lnk")
EXIT

719931662 发表于 2010-3-13 19:26:58

Run ("QQ2009SP6.exe")
WinWaitActive ("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009")
;等待指定窗口被激活后再执行下面的命令
ControlCommand ("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009","Button1","Check","")
;选中
ControlClick ("腾讯QQ2009 安装向导","欢迎使用腾讯QQ2009","Button3","left","1")
;向指定控件发送鼠标点击命令
WinWaitActive ("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项")
;等待指定窗口被激活后再执行下面的命令
ControlCommand ("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button8","UnCheck","")
;选空
ControlCommand ("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button9","UnCheck","")
;选空
ControlCommand ("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button10","UnCheck","")
;选空
ControlCommand ("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button11","UnCheck","")
;选空
ControlClick ("腾讯QQ2009 安装向导","请选择自定义安装选项与快捷方式选项","Button2","left","1")
;向指定控件发送鼠标点击命令
ControlSetText("腾讯QQ2009 安装向导","请选择安装路径","Edit1","D:\Program Files\Tencent\QQ")
;修改指定控件的文本
ControlClick ("腾讯QQ2009 安装向导","请选择安装路径","Button2","left","1")
;向指定控件发送鼠标点击命令
WinWaitActive ("腾讯QQ2009 安装向导","安装完成")
;等待指定窗口被激活后再执行下面的命令
ControlCommand ("腾讯QQ2009 安装向导","安装完成","Button6","UnCheck","")
;选空
ControlCommand ("腾讯QQ2009 安装向导","安装完成","Button8","UnCheck","")
;选空
ControlCommand ("腾讯QQ2009 安装向导","安装完成","Button9","UnCheck","")
;选空
ControlCommand ("腾讯QQ2009 安装向导","安装完成","Button7","UnCheck","")
;选空
ControlClick ("腾讯QQ2009 安装向导","安装完成","Button2","left","1")
;向指定控件发送鼠标点击命令

asdc 发表于 2010-3-14 17:29:07

不错，全自动了。

hnkaspersky 发表于 2010-3-19 10:00:14

不错，全自动了。

fightx 发表于 2010-3-19 19:53:20

最新的2010 参考这个试试 谢谢
页: [1]
查看完整版本: QQ2009 sp6自动安装脚本