XP盗版改正版

游子.

盗版XP变正版的方法(网上转贴)
过几天微软公司就要正式 进行打击盗版的活动了，在这里，介绍一个方法让大家躲开，并且盗版变正版，保证可行。
. b; q2 n8 J" U
有个让人讨厌的正版验证补丁（俗称五角星） 。
今天，我就叫大家怎样通过他的验证。
& L8 m: R& f! j* K1 g3 _首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
打开，在里面输入：
ON ERROR RESUME NEXT
9 C" L, q& m  I; B
6 X/ i( r" I( b5 P; u( l, l3 o! qDim VOL_PROD_KEY
$ U# ~' D: y1 M) p  ^0 Z4 w$ }; aif Wscript.arguments.count<1 then
3 u! n  Y. L& Q  b8 pVOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
if VOL_PROD_KEY="" then
/ i" ~, M6 H1 s7 @' PWscript.quit
end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
end if
8 @" f; o: M7 P+ t! X6 V: @& E
# a0 I/ t, W8 i$ UVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
2 b5 E' t5 D5 U9 d$ @
result = Obj.SetProductKey (VOL_PROD_KEY)

if err = 0 then
Wscript.echo "恭喜您，xp是正版的了@pple！"
, p4 J- x$ k5 |6 C) B" [9 O% Gend if
/ {, i. e. l, A% j8 T4 c' o! U
9 T2 ^( m7 r+ }2 H7 l5 o' d. {1 r4 c1 k' Iif err <> 0 then
/ o! a+ M8 C* J7 j: ?" x: ?1 WWscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
. E7 m  |$ X- o" _6 Y2 z- s9 i& tErr.Clear
) `4 H$ b" V8 i8 ^; O, H/ C8 qend if
/ Z; z, ~' Y! d7 O  {( {$ w8 M
- e  D' |% _! i2 \. T7 uNext
$ a9 i* m' z# p; R* u
保存，关闭(包括next啊）
5 C( h# S! n: [把文件名替换成key.vbs
+ g# O4 e$ s, G+ o7 F: ]: i如果变成这样：
- z- g. E9 y/ G8 x就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
回到正题，创建好文件双击，确定。
好了，赶快去验证吧！
$ ~& V5 l- B+ i$ d' h" q( n  h8 v验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn
' L/ i1 ^: N" ?; S# j
不会搞的也可以直接下载附件，解压后双击就可以了。

木棉花

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