XP盗版改正版

游子.

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

( i8 i! @+ h7 G6 {2 x有个让人讨厌的正版验证补丁（俗称五角星） 。
今天，我就叫大家怎样通过他的验证。
首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
打开，在里面输入：
! ^2 K1 d) O# T# Y8 R* K8 z- P  LON ERROR RESUME NEXT

Dim VOL_PROD_KEY
: {, O0 t3 Q1 Q* e  Kif Wscript.arguments.count<1 then
; {. X( Z- o4 j$ I* RVOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
( x4 k1 n  o+ Y5 ?if VOL_PROD_KEY="" then
; ?; N1 Z, y9 d1 zWscript.quit
end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
  Y3 Q1 I: C( r; u9 s/ M& v2 [end if
- Y- x5 l5 |3 ^
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
; Z" W9 Z' [6 W3 Y+ f4 _
result = Obj.SetProductKey (VOL_PROD_KEY)
  w& m# c' C, |
if err = 0 then
Wscript.echo "恭喜您，xp是正版的了@pple！"
end if
+ x- P/ ]& c7 R5 Q; _
if err <> 0 then
! i+ I# G* u2 E; a7 K& c# hWscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
4 R; j8 ?& Z; z) N- J3 T2 XErr.Clear
end if

Next

5 s8 H( D0 T! ?0 P保存，关闭(包括next啊）
' A& O: R3 {0 {2 f9 l  U把文件名替换成key.vbs
7 a. _. L6 c  K  j) p1 j如果变成这样：
9 S/ S+ W) C" N% m; z. H就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
6 u' Q# T0 E2 O0 r2 h回到正题，创建好文件双击，确定。
+ s# R4 v% g  x8 v好了，赶快去验证吧！
/ y% P" D( A0 C/ U3 \# ~4 i验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn
1 B! Q2 t- p4 T: i- c9 Q
不会搞的也可以直接下载附件，解压后双击就可以了。

木棉花

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