QQ2008最新版自动安装源码

zxpcc · 发表于 2008-12-7 11:35:33

在论坛里找了前人的一些资料，现在把QQ2008最新版的自动安装源码放出来让大家帮测试一下，有问题还请大家帮忙指正一下！

RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\TBH")
run("QQ2008IIBeta1KB2.exe")
WinWaitActive("QQ2008II Beta1 安装","欢迎使用 QQ2008II Beta1 安装向导")
send("!i")
WinWaitActive("QQ2008II Beta1 安装","选定使用环境")
ControlClick("QQ2008II Beta1 安装","选定使用环境","[class:Button;INSTANCE:6]")
ControlClick("QQ2008II Beta1 安装","选定使用环境","[class:Button;INSTANCE:10]")
send("!n")
WinWaitActive("QQ2008II Beta1 安装 ","选定安装位置和组件")
ControlClick("QQ2008II Beta1 安装 ","选定安装位置和组件","[class:Button;INSTANCE:4]")
ControlClick("QQ2008II Beta1 安装 ","选定安装位置和组件","[class:Button;INSTANCE:5]")
ControlClick("QQ2008II Beta1 安装 ","选定安装位置和组件","[class:Button;INSTANCE:6]")
send("!n")
WinWaitActive("QQ2008II Beta1 安装","完成 QQ2008II Beta1 安装向导")
ControlClick("QQ2008II Beta1 安装","完成 QQ2008II Beta1 安装向导","[class:Button;INSTANCE:4]")
ControlClick("QQ2008II Beta1 安装","完成 QQ2008II Beta1 安装向导","[class:Button;INSTANCE:5]")
ControlClick("QQ2008II Beta1 安装","完成 QQ2008II Beta1 安装向导","[class:Button;INSTANCE:6]")
send("!f")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Tencent\TBH")
FileDelete(@ProgramsDir&"\启动\腾讯QQ.lnk")

wuluck · 发表于 2008-12-8 00:14:18

中文搜搜好像没有去掉呀

wuluck · 发表于 2008-12-8 00:20:28

多谢了，原来解决办法在最前面。谢拉

[ 本帖最后由 wuluck 于 2008-12-8 11:54 编辑 ]

gmll · 发表于 2008-12-9 08:14:22

不错的想法，谢谢楼主

wuluck · 发表于 2008-12-10 09:29:48

经过测试那个注册表键值只能使中文搜搜不出来，但是却变成了默认安装了。。。。。。。。。

xdfdnzhabo · 发表于 2008-12-10 19:55:06

支持论坛发展!支持楼主!!!坚持回贴!!回贴光荣!!!!!

acacac · 发表于 2008-12-15 10:24:45

思路蛮有意思的，顶了！

chineseshelley · 发表于 2008-12-16 07:35:07

呵呵……这个好用，收起来

wangjinxian · 发表于 2008-12-16 08:21:58

看了，受到了启发，感谢楼主。

笨笨℃ · 发表于 2008-12-20 12:10:14

原帖由 wuluck 于 2008-12-10 09:29 发表
经过测试那个注册表键值只能使中文搜搜不出来，但是却变成了默认安装了。。。。。。。。。

amway929 · 发表于 2008-12-22 15:21:48

如何才能够去掉中文搜索呢?

309968323 · 发表于 2008-12-27 04:43:35

能不能讲讲是怎么一个思路阿.?

zxpcc · 发表于 2008-12-28 10:37:38

楼上说的，搜搜还有，但是我没有找到。
是不是楼上的朋友原来装的没有卸载啊！

yyhc · 发表于 2009-2-23 17:21:42

经过测试那个注册表键值只能使中文搜搜不出来，但是却变成了默认安装了。。。。。。。。。

shijincun · 发表于 2009-3-21 09:47:47

是的.我开始是这样写的.希望有解决办法

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