XP盗版改正版

游子.

盗版XP变正版的方法(网上转贴)
过几天微软公司就要正式 进行打击盗版的活动了，在这里，介绍一个方法让大家躲开，并且盗版变正版，保证可行。
! f4 @1 H# E3 ~( }
有个让人讨厌的正版验证补丁（俗称五角星） 。
& W  Y2 e$ L, o7 F今天，我就叫大家怎样通过他的验证。
首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
" ~; u, j% S! C( ~打开，在里面输入：
ON ERROR RESUME NEXT

! Q+ J( `+ g$ eDim VOL_PROD_KEY
if Wscript.arguments.count<1 then
; R% H  F6 h" K/ U; O5 c# OVOL_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
8 s; ]0 w. ~# J" d) i4 P/ hWscript.quit
" A9 ~! x. I1 `end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
end if

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

for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

result = Obj.SetProductKey (VOL_PROD_KEY)
  G1 ^3 {' V5 w+ u
if err = 0 then
9 d' M0 Z: g6 S! w% @Wscript.echo "恭喜您，xp是正版的了@pple！"
end if
! W" e2 A# D' O/ ]6 @4 r
& S5 T( R+ {: u7 `5 h2 N- mif err <> 0 then
* r9 W0 w5 R! X4 XWscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
Err.Clear
* ]9 u* z/ a9 U* v; h3 W( tend if

% Z9 j6 \6 h+ k( H1 @+ U7 r: eNext
# T$ e+ ~/ @2 S6 r) I
保存，关闭(包括next啊）
4 ~7 N: z/ ^$ e2 U把文件名替换成key.vbs
如果变成这样：
6 G! z" z& [! _4 [就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
6 I1 D+ A0 g) H" `回到正题，创建好文件双击，确定。
好了，赶快去验证吧！
3 k/ b. n0 B* T; Q( [( W) h验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn

8 w. B+ m6 ?. F: U4 e. Y8 X; a不会搞的也可以直接下载附件，解压后双击就可以了。

木棉花

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