XP盗版改正版

游子.

盗版XP变正版的方法(网上转贴)
过几天微软公司就要正式 进行打击盗版的活动了，在这里，介绍一个方法让大家躲开，并且盗版变正版，保证可行。

: r/ @' G* ?; O4 s) v2 H有个让人讨厌的正版验证补丁（俗称五角星） 。
; h8 K: g$ M7 G* Z今天，我就叫大家怎样通过他的验证。
) b$ p5 E2 E4 }首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
/ v* s8 k, l$ f: {) k打开，在里面输入：
) L9 C5 F9 ^4 `# F3 ^ON ERROR RESUME NEXT

* J5 z+ p6 l  j2 J4 ]" IDim VOL_PROD_KEY
3 Z, D! @" N& l, b% ^  w6 Wif Wscript.arguments.count<1 then
1 O( }; X2 v  Y& L# _$ F6 UVOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
5 X0 p) _5 c7 ~if VOL_PROD_KEY="" then
+ G. k1 b9 l6 T/ g5 `& _Wscript.quit
$ i6 N* @$ J- _$ m0 U( qend if
else
5 |% f  K+ d4 y( y" eVOL_PROD_KEY = Wscript.arguments.Item(0)
end if

VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
3 j$ J5 g" Z8 _  s
' N2 y& {7 l+ _) n  W7 \/ {for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
, ?. F+ i6 s  e3 B0 s
result = Obj.SetProductKey (VOL_PROD_KEY)

if err = 0 then
% a0 ~8 c+ }9 a5 w# P$ M& zWscript.echo "恭喜您，xp是正版的了@pple！"
- ]/ R- q+ X8 C9 X  S1 yend if

6 Q! E, s9 R) p3 Q$ Nif err <> 0 then
* m7 j5 h$ i1 z' P4 ^0 u7 XWscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
7 T% A1 g. |* K& l. k) A; NErr.Clear
$ G4 V' R% F3 B, L& k/ L: }9 z4 Y, {4 jend if

7 K  t8 o* W5 NNext
/ f( h$ o1 v3 p
保存，关闭(包括next啊）
把文件名替换成key.vbs
如果变成这样：
: Q3 }# Y, U. F就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
回到正题，创建好文件双击，确定。
9 c' T2 R- y8 `3 y- n; t好了，赶快去验证吧！
验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn

不会搞的也可以直接下载附件，解压后双击就可以了。

木棉花

你班归但，竟敢使盗版货讲，我几用几蚊纸就买回左正版的XP系统，已通过正版验证！！！:loveliness: