转一个破微软星星的贴，大家要顶啊！

pzdsh123 · 发表于 2007-7-8 17:20

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？快速注册

x

首先，新建个文本文件，输入下面这些：（直接复制到记事本就行）

ON ERROR RESUME NEXT

Dim VOL_PROD_KEY

if Wscript.arguments.count<1 then

VOL_PROD_KEY=InputBox("Powered By http://www.shufa.org/762.combeta.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")

if VOL_PROD_KEY="" then

[ 转自铁血社区 http://bbs.tiexue.net/ ]

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

[ 转自铁血社区 http://bbs.tiexue.net/ ]

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

[ 转自铁血社区 http://bbs.tiexue.net/ ]

Wscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"

Err.Clear

end if

李庆元 · 发表于 2007-7-8 17:55

em12

艺飞 · 发表于 2007-7-8 18:28

face9 face9 face9

pzdsh123 · 发表于 2007-7-8 19:02

原先我的也是星星提醒去注册，哈哈哈，在铁血发现了------哈哈哈哈哈哈哈哈哈哈哈哈哈哈哈，那个好啊em2 em2

一般人我不告诉他em14 em14

em5 em5

就是用盗版，怎么啦，我们的四大发明你们不都用啊

逸墨斋 · 发表于 2007-7-25 08:11

em2 em2

山中老人家 · 发表于 2007-8-14 14:07

em6 em6 em6 em4 em4 em14 em14 em22 em22 em24 em24 em24
不懂

张生 · 发表于 2007-10-6 12:56

em1 em1

春翔 · 发表于 2008-1-27 05:24

em2 em2

		自动登录	找回密码
密码			快速注册

正在浏览本主题的会员 - 0 在线 - 0 会员(0 隐身), 0 游客

转一个破微软星星的贴，大家要顶啊！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。