返回列表 回复 发帖

[技巧] 把盗版windows变成正版(不用重启,进注册表之类的)

这是我在网上看到的
所以复制过来与大家分享
整个过程也是超级简单,只需按几个键
好了,废话少说,进入正题:
首先,新建个文本文件,按CTRL+C,CTRL+V把下面的这些复制进去:

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("Powered 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验证


这个按键精灵也可以弄 ,我把脚本也发下来,只需把下面这些添加脚本进去就OK了



[General]
Description=把你的盗版Windows变成正版
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=0
Number=1
[CallBack]
OnSetup=
[Comment]
Content====通用脚本===.
【功能说明】.
微软太黑了,一份Windows XP居然要卖1000多。不像按键精灵的价格这么平易近人:).
这个神奇的脚本可以把你的盗版Windows瞬间变成正版,而且能通过目前微软的各种校验。绝对绿色!无副作用!.
我们一起鄙视微软,支持按键精灵吧,啊哈哈哈哈哈哈…….
.
【使用说明】.
这个脚本内置了XP VLK版本的序列号,你也可以在自定义栏里输入你认为好用的序列号。.
直接运行脚本即可。.
.
【作者介绍】.
搜思壮
.
【制作日期】.
2007.4.29
[Script]
Dim VOL_PROD_KEY
UserVar VOL_PROD_KEY="MRX3F-47B9T-2487J-KWKMF-RPWBY" 输入你的Windows序列号,OEM版无效。默认为 XP VLK
If VOL_PROD_KEY=""
EndScript
EndIf
VBSBegin
    VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","")
    For each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
    result = Obj.SetProductKey (VOL_PROD_KEY)
    If err = 0 then
    MessageBox "OK!去微软验证吧!"
    end if
    If err <> 0 then
    MessageBox "替换失败!输入的 CD-KEY 与当前的版本不匹配。"
    Err.Clear
    end if
    Next
VBSEnd
我的已经是正的拉!
返回列表