欢迎来到 KartTv - 跑跑卡丁车视频论坛

您似乎还没加入我们的论坛社区,因此目前对于您查看论坛的所有帖子讨论内容会有所限制。加入我们的免费论坛社区您将能发表主题,提出问题,与论坛其他成员讨论问题,并且能私下和其他成员沟通,参与民意调查,了解我们论坛的关于跑跑的各种知识,获得我们的独家资料和其他许多特殊功能。注册会员是快速,简单,并且完全免费的,所以,请您马上加入我们的论坛社区吧。

如果您在注册过程中或者帐户登录中有任何问题,请与我们联系。QQ(车队、视频)QQ(网站、合作)
打印

想让你的盗版的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.txt
把文本TXT格式改VBS
运行key.vbs
好了到微软去验证吧

TOP

沙发自己  呵呵
我自己试了  我的成功变成正版的了

[ 本帖最后由 qq573249937 于 2008-7-22 23:02 编辑 ]

TOP

一天不练车...就一天没长进........

TOP

盗版的没出过啥问题啊```

TOP

真假
Song For You~LinkinPark丶~

TOP

我是盗版的好像
我不晓得可以用不

TOP

你当比尔盖茨傻呃。。。
没那么简单就把盗版微软弄成正版的吧

TOP

这是我在论坛里面看过的最无聊的帖子

TOP

ps:原版永远没有修改版好用,也没有修改版稳定,更没有修改版顺畅

TOP

还有一点要提醒的,替换cd key后,你的windows有可能会用不了

想试试的朋友请考虑清楚了,一切后果自己承担~!

TOP


不必那么认真吧。
这个脚本并不是适用于所有的XP版本。
这年头建议用修改版。各方面都比原版的强

TOP

盖茨也退休了,就是不想再跟盗版战斗

TOP

就这么简单

TOP