找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 56496|回复: 63

XP盗版变正版

[复制链接]
发表于 2007-12-29 21:13:03 | 显示全部楼层 |阅读模式
首先,新建个文本文件,输入下面这些:
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,\"-\",\"\") &#39;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,绝对没问题!
发表于 2008-1-17 20:41:26 | 显示全部楼层
多么好的软件啊!怎么没人顶?谢谢楼主!收藏了。
回复

使用道具 举报

发表于 2008-1-18 14:25:11 | 显示全部楼层
好使吗?
回复

使用道具 举报

发表于 2008-1-21 10:23:44 | 显示全部楼层
主要怕出事.
回复

使用道具 举报

 楼主| 发表于 2008-1-21 16:38:59 | 显示全部楼层
回复

使用道具 举报

发表于 2008-1-22 18:03:49 | 显示全部楼层
我去验证拉,是正版
回复

使用道具 举报

发表于 2008-1-24 12:05:19 | 显示全部楼层
使用盗版的朋友不妨试试。应该可以帮到你!!
回复

使用道具 举报

发表于 2008-1-25 10:28:23 | 显示全部楼层
我用了咋不成呢
回复

使用道具 举报

发表于 2008-1-26 10:37:55 | 显示全部楼层
好东西,今天公司里三台电脑的盗版标志全部搞没了,谢谢楼主了,
回复

使用道具 举报

发表于 2008-2-11 12:47:12 | 显示全部楼层
这篇文章写的好,是真实可用
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

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