XP盗版改正版

游子.

盗版XP变正版的方法(网上转贴)
- g' u8 N" j! e过几天微软公司就要正式 进行打击盗版的活动了，在这里，介绍一个方法让大家躲开，并且盗版变正版，保证可行。
- N+ ]4 l6 _" Q2 T' a1 T
有个让人讨厌的正版验证补丁（俗称五角星） 。
今天，我就叫大家怎样通过他的验证。
首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
% Z8 s4 `7 e5 R' P" z打开，在里面输入：
ON ERROR RESUME NEXT
' \$ V! R! A3 ^# M" f$ ^: y: J, f5 o
% ~" b- ^  }$ C' g" [" }3 _5 TDim VOL_PROD_KEY
6 }; W* p$ {2 i7 ^; C5 pif Wscript.arguments.count<1 then
VOL_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
Wscript.quit
' Y5 e) H, Y; l1 D4 m. y' qend if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
: h& u: C" h0 T- d' H9 ~* Nend if

VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
0 e6 b2 Z, J# J( }
) o! h# M4 x2 C, \9 Z, l# Mresult = Obj.SetProductKey (VOL_PROD_KEY)

: h1 Y9 f  c  h: w/ g3 H2 M8 qif err = 0 then
% m" M4 X6 U6 s  V$ [' U0 m* L$ x) hWscript.echo "恭喜您，xp是正版的了@pple！"
/ M  \) Z# O# f' T" q( p- X( R; zend if
  i5 v* u3 z7 }' w
$ M" [- i/ `# ~! cif err <> 0 then
Wscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
# E$ l6 d4 \# @4 z" B- B" L! PErr.Clear
end if
+ o$ \$ N! E- ?' I9 h+ [7 T
4 w. h+ W) Q6 dNext

保存，关闭(包括next啊）
6 O; U" w6 z1 K4 w. R/ D1 T( E把文件名替换成key.vbs
如果变成这样：
7 ]0 x$ M1 ?2 P5 x/ O就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
9 \$ o& D/ \( G& T/ p: U回到正题，创建好文件双击，确定。
好了，赶快去验证吧！
% m  Y7 ]9 P2 A7 o验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn

0 x$ }: i( {" k. b$ s不会搞的也可以直接下载附件，解压后双击就可以了。

木棉花

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