打开记事本 将下面的代码复制进去
复制内容到剪贴板
代码:
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验证
