XP盗版改正版

游子.

盗版XP变正版的方法(网上转贴)
过几天微软公司就要正式 进行打击盗版的活动了，在这里，介绍一个方法让大家躲开，并且盗版变正版，保证可行。
( R4 R, ]/ u6 q8 L
1 A# }0 Z; k$ v0 l  x有个让人讨厌的正版验证补丁（俗称五角星） 。
) l& E8 N, S2 e5 X- G6 U今天，我就叫大家怎样通过他的验证。
6 o" {( a, E2 X) {/ [* @首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
, s& v( m( l$ U  M" Y打开，在里面输入：
$ w5 n6 l% U- z$ jON ERROR RESUME NEXT

Dim VOL_PROD_KEY
if 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
! X8 j; i, @( U& H$ b; xend if
' ~% M+ F: S* x& _( @4 helse
( J* `. B+ Z5 X' H$ EVOL_PROD_KEY = Wscript.arguments.Item(0)
3 g8 j- g1 q! C% _end if

& l: u- u0 u8 q, K* kVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
! b) ^$ O3 h  U. O4 L0 G: U9 E
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
/ g  X( @% Q0 o( |5 `  R3 C3 D& d5 D' Y
8 u( j* D/ p! x5 B3 ~result = Obj.SetProductKey (VOL_PROD_KEY)

6 f% ~9 W: X" mif err = 0 then
Wscript.echo "恭喜您，xp是正版的了@pple！"
end if
9 r' _4 q; l+ R  |) w( F; M
6 `. y7 U# [: L. L) u5 O) n5 Q( {# Wif err <> 0 then
Wscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
Err.Clear
end if

% Z/ N4 j, n0 [0 o" z, L) aNext

保存，关闭(包括next啊）
把文件名替换成key.vbs
如果变成这样：
/ m; Z. |! D- R' J& k( D7 b就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
) q- h, X: W4 j, O7 g/ `回到正题，创建好文件双击，确定。
( S3 K. R& K" v6 N( Z" c* k) ]$ x( |" G好了，赶快去验证吧！
6 ~1 P% }2 F" N( [3 V验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn
. ~3 Q3 h. x& @' [6 Y# a2 }/ i
不会搞的也可以直接下载附件，解压后双击就可以了。

木棉花

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