安全基地 » 性能优化 » XP盗版变正版

baobaobruse 发表于 2007-5-11 13:35

XP盗版变正版

[img]http://www.hxhack.com/bbs/images/post/emotion/10.gif[/img]XP盗版变正版首先，新建个文本文件，输入下面这些：

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("Powered By [url=http://www.cnbeta.com/][color=#2f5fa1]www.cnbeta.com[/color][/url]"&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，绝对没问题！ [img]http://www.hxhack.com/bbs/images/post/smile/default/smile.gif[/img]

恶魔之子 发表于 2007-5-11 13:48

看不太懂啊。。。。。。。。。。。。。

杰子 发表于 2007-5-11 18:42

哦
偶有一个
谢谢

leitiannu 发表于 2007-5-16 22:47

是不是装IE7时能通过验证，就能通过微软的验证。我通过了。

术凡 发表于 2007-5-18 19:05

晕..这东西早有了...

weidi621 发表于 2007-5-18 19:35

好使不？？？

恶魔 发表于 2007-5-18 20:32

晕倒！！aa

孤独一剑 发表于 2007-5-25 11:07

看了就要回帖．我试试　

菜梗 发表于 2007-5-25 11:49

???怎么弄啊？我看不懂啊

dnegsi 发表于 2007-7-6 19:33

怎么验证!

2589 发表于 2007-7-21 12:40

学习会了谢拉

加加 发表于 2007-11-18 23:03

看不懂啊，不知行不行呢？请高手说袢细点:lol

加加 发表于 2007-11-25 21:10

看不懂啊，有没有人可以说祥细点啊。

sbvtgo 发表于 2008-3-27 14:40

晕倒了！！！！

416896401 发表于 2008-4-13 15:52

显示“没有在该机执行Windows脚本宿主的权限。请与系统管理员联系。”

弹出这个窗口这么办？“没有在该机执行Windows脚本宿主的权限。请与系统管理员联系。”

fe5013 发表于 2008-6-13 18:29

我是菜鸟，没看明白。

dengjinhu 发表于 2008-7-4 14:40

有点弄不懂，还是谢谢楼主

落叶飘飘 发表于 2008-10-8 15:47

是不是真的啊?有用吗?我可是新手啊.

查看完整版本: XP盗版变正版