找回密码
 注册加入
查看: 2318|回复: 5

想让XP盗版变正版的话进来看看

[复制链接]

3109

主题

2万

回帖

13万

积分

管理员

运营总监

积分
137321

帅哥勋章诚信商家歙县志愿者

发表于 2008-9-11 21:00 | 显示全部楼层 |阅读模式
想让XP盗版变正版的话进来看看
XP盗版变正版不是梦想哦

首先创建个文本文件。。输入这些:

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("owered By www.cnbeta.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
if VOL_PROD_KEY="" then
Wscript.quit
end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
end if

VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

result = Obj.SetProductKey (VOL_PROD_KEY)

if err = 0 then
Wscript.echo "OK!去微软验证吧!"
end if

if err <> 0 then
Wscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。"
Err.Clear
end if

Next

然后将以上文本保存为key.vbs 双击执行或右击按安装即可通过XP验证

验证变成正版XP后安装IE7和微软的其他狗屎垃圾工具绝对不是问题

注意!!!那些代码里的魔鬼头表情其实是个p字大家复制的时候记得加上哦
【歙县论坛 贴贴必回】 欢迎网友们加入,群策群力,把我们的论坛越办越好。

96

主题

7419

回帖

18万

积分

超级版主

积分
186154

罐水天才奖帅哥勋章起早贪黑奖爱心天使奖

发表于 2008-9-11 21:16 | 显示全部楼层
我刚好有这个问题,管用吗?
【歙县论坛 贴贴必回】 欢迎网友们加入,群策群力,把我们的论坛越办越好。

76

主题

6152

回帖

4073

积分

榜眼

混世

积分
4073

罐水天才奖活动参与奖帅哥勋章起早贪黑奖爱心天使奖

发表于 2008-9-11 22:03 | 显示全部楼层
谁先试用下再告诉俺,呵呵。
【歙县论坛 贴贴必回】 欢迎网友们加入,群策群力,把我们的论坛越办越好。

76

主题

6152

回帖

4073

积分

榜眼

混世

积分
4073

罐水天才奖活动参与奖帅哥勋章起早贪黑奖爱心天使奖

发表于 2008-9-11 22:03 | 显示全部楼层
南岸,你先用,用好了告诉我,
【歙县论坛 贴贴必回】 欢迎网友们加入,群策群力,把我们的论坛越办越好。

96

主题

7419

回帖

18万

积分

超级版主

积分
186154

罐水天才奖帅哥勋章起早贪黑奖爱心天使奖

发表于 2008-9-11 22:25 | 显示全部楼层
一时晕了,这个文本文件是用word吗?
【歙县论坛 贴贴必回】 欢迎网友们加入,群策群力,把我们的论坛越办越好。

8

主题

376

回帖

187

积分

秀才

积分
187

新人进步奖帅哥勋章

发表于 2008-9-15 22:16 | 显示全部楼层
还有一个办法可以让盗版通过微软认证
华威电脑主营:联想台式机、笔记本、华硕、戴尔笔记本、组装机、办公耗材、网络布线、监控安防、单位维护
您需要登录后才可以回帖 登录 | 注册加入

本版积分规则

QQ|手机版|歙县论坛主站|歙县论坛-歙县老百姓值得信赖的网络平台 ( 皖ICP备14023110号-2 |34102102000101 )

GMT+8, 2024-6-11 18:46

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表