XP盗版改正版

游子.

盗版XP变正版的方法(网上转贴)
, X4 ~, J4 o7 m' U# {; H' z5 ~过几天微软公司就要正式 进行打击盗版的活动了，在这里，介绍一个方法让大家躲开，并且盗版变正版，保证可行。
: J& |6 h* q6 r' @7 N: h5 d6 K
有个让人讨厌的正版验证补丁（俗称五角星） 。
" o  a9 }3 G& e  Y$ Q4 {& V今天，我就叫大家怎样通过他的验证。
! G' M! `: J$ y  d# i首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
打开，在里面输入：
ON ERROR RESUME NEXT
; s2 O- Q9 l  [9 q. N7 J
Dim VOL_PROD_KEY
0 n" h' m7 ]1 m" P9 O5 j- zif Wscript.arguments.count<1 then
/ D0 K; T+ f9 q$ ]5 MVOL_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
' G& p4 ]+ {' T+ V2 XWscript.quit
. C( h; Q4 W8 z% K. \$ e" l- x4 zend if
, e" `) e5 `, c7 C9 w; O" T8 D) Melse
VOL_PROD_KEY = Wscript.arguments.Item(0)
end if

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

5 I) _  m' m/ p% ~6 ^3 tfor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
; C& W, a5 t- P7 U; k
result = Obj.SetProductKey (VOL_PROD_KEY)

if err = 0 then
0 K; ?5 Y( W  @" d- g- u; dWscript.echo "恭喜您，xp是正版的了@pple！"
end if

9 e/ w! S& t, |& w1 c/ Dif err <> 0 then
0 A8 V: S9 w% t* K/ sWscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
3 D% n) _' n! e" Q4 m* O6 dErr.Clear
9 Z) @# }  X' C% M4 Rend if
, |- v0 H; O9 {* d
  J4 a% }) {: KNext
) B. Z; ?; G3 D7 p; V5 S3 _7 k
# U  T& c# p, n* _$ v# r+ N  r; ]保存，关闭(包括next啊）
+ H. K6 a& Z# n' `2 D6 [把文件名替换成key.vbs
/ J5 p/ @* f! p4 c8 N, b如果变成这样：
就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
回到正题，创建好文件双击，确定。
+ Y+ G  p! A+ T" b好了，赶快去验证吧！
验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn

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

木棉花

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