- 威望
- 33
- 在线时间
- 14 小时
- 金币
- 41
- 贡献
- 0
- 存款
- 0
- 最后登录
- 2009-10-23
- 注册时间
- 2008-4-24
- 帖子
- 35
- 精华
- 0
- 积分
- 86
- 阅读权限
- 10
- UID
- 784

- 金币
- 41
- 贡献
- 0
- 威望
- 33
- 最后登录
- 2009-10-23
- 帖子
- 35
- 积分
- 86
- UID
- 784
|
盗版XP变正版的方法(网上转贴)0 J! J" e% y$ S$ Y8 e# e) w
过几天微软公司就要正式 进行打击盗版的活动了,在这里,介绍一个方法让大家躲开,并且盗版变正版,保证可行。* `+ [" u9 J' @; G
% X4 a# p4 n; g0 i3 h7 L
有个让人讨厌的正版验证补丁(俗称五角星) 。
) T: _5 @6 X- Z4 b w今天,我就叫大家怎样通过他的验证。
0 V$ I$ b0 |. T+ K# ], O# S首先,在桌面上创建一个txt文档(好像这玩意啥也能干啊!) * I7 C8 _$ m* ]# g" I* t" H
打开,在里面输入: & F) g7 a4 f M4 B6 y; o
ON ERROR RESUME NEXT
; Y( h% j* _2 Y3 Y
8 \6 R: ]6 {0 k9 \0 }5 \Dim VOL_PROD_KEY " A- `* n& j) s+ ?- A8 V* t
if Wscript.arguments.count<1 then
. |- z! L; t8 `* m( |VOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
- N! U; L; H D# mif VOL_PROD_KEY="" then . G+ K9 o, ?% Q+ r5 G& L
Wscript.quit / H: g+ c6 d- u% O. s% W U }( F
end if
6 y8 b, {( D% k6 {2 i" lelse , C1 ~7 a+ i T) L
VOL_PROD_KEY = Wscript.arguments.Item(0) 5 A p0 \9 h% n9 \9 O
end if
/ I& u7 }! l A* v, F0 D0 Y4 |# _8 V
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
4 m5 Y5 |2 V S# t, u1 s
! P' F' N0 M; y! ^$ u3 xfor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
U! B) ^/ Y& B2 Z+ Y8 [
" |' ^* \+ Q1 o8 U; ? n# {result = Obj.SetProductKey (VOL_PROD_KEY) ' a) ?: d+ [+ z! I+ C' x6 I) @
% m1 l8 [+ i& ?$ n2 ~1 {) o. S' P( U
if err = 0 then
; E4 ?+ A! y1 j: C" P, N2 x0 rWscript.echo "恭喜您,xp是正版的了@pple!"
; b+ j4 e# O1 m, X# Q) a6 Q; rend if
) Z/ U& y+ I. l; `1 @4 z" v- m1 W
$ t1 s) b. |5 b2 t, m$ m: Mif err <> 0 then
# R# I# h' g( ]/ C) t* MWscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。" 4 d% t5 z4 d& z0 ^5 U
Err.Clear % U4 j# |1 y, b! \9 t
end if
% h$ L2 w+ k# W2 P
# q$ `, R6 D6 `) R/ ~Next
9 Z# X$ y j" N: _' t9 x: c6 d! |9 H+ N5 r
保存,关闭(包括next啊) ) u) ?$ t: h+ k4 @2 S
把文件名替换成key.vbs
5 z) W% L$ t! {2 t如果变成这样: + G o4 A' {; B
就算成功了,等等,有些同志问了,为什么我改变名字会出现双后缀情况呢?(自己解决)
( P8 R( Q, e1 g+ {* r T9 \回到正题,创建好文件双击,确定。 " x6 D! B4 M7 S
好了,赶快去验证吧!
* @4 [7 W1 K: _9 G: D2 y验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn
1 F2 `) |) q! S/ r& X; [; D6 M8 ~
不会搞的也可以直接下载附件,解压后双击就可以了。 |
|