XP盗版改正版

游子.

盗版XP变正版的方法(网上转贴)
8 v+ g8 [0 p% y, F过几天微软公司就要正式 进行打击盗版的活动了，在这里，介绍一个方法让大家躲开，并且盗版变正版，保证可行。
5 ~! {' z0 x6 W1 m
有个让人讨厌的正版验证补丁（俗称五角星） 。
7 ^8 v, u: _; h& y今天，我就叫大家怎样通过他的验证。
# `( T! E( ]; c( m$ K6 {7 [首先，在桌面上创建一个txt文档（好像这玩意啥也能干啊！）
: _6 T# j, f' K: f$ I# N/ x打开，在里面输入：
2 d% S3 J7 Z8 Y0 I! r- V- r) ION 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
; m" T. g$ O% [% |1 l+ IWscript.quit
end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
+ @2 p" y. J5 s" }4 ~end if

. O2 m& ]7 u, w- m! L, V" J4 Y; IVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
) O- G! X: P; d7 b- |( K% k, F
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")

result = Obj.SetProductKey (VOL_PROD_KEY)
; T' S% ^$ ~& g& `" ?, @3 C
  N2 H0 T8 \# {% F: _" N+ D6 U7 l/ X* sif err = 0 then
1 |/ c+ o; j& ^3 X" wWscript.echo "恭喜您，xp是正版的了@pple！"
9 F4 K* s* U7 E3 D3 ^$ ^end if

if err <> 0 then
/ I$ g+ u5 J7 G8 ZWscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
Err.Clear
$ U1 f6 l' d3 K# Pend if

  J: z  ~; L7 Z' P) ^3 _Next
' J1 {; s, f. Y
1 p) y6 U4 c4 A保存，关闭(包括next啊）
把文件名替换成key.vbs
9 q& @& {2 C( S! U( {+ k如果变成这样：
就算成功了，等等，有些同志问了，为什么我改变名字会出现双后缀情况呢？(自己解决）
1 ~' D4 F2 l/ S回到正题，创建好文件双击，确定。
; ^. n+ I- h! A3 l# I好了，赶快去验证吧！
验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn
* ?  v) T; |0 d; k9 c6 x) t5 t& K7 g
不会搞的也可以直接下载附件，解压后双击就可以了。

木棉花

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