- 威望
- 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 K: |* y- H7 c" E) g过几天微软公司就要正式 进行打击盗版的活动了,在这里,介绍一个方法让大家躲开,并且盗版变正版,保证可行。. s3 Q. U* @' e# W o$ z3 ~
8 H7 H8 |# w: f$ e有个让人讨厌的正版验证补丁(俗称五角星) 。
S- x& O. a; k0 S# |今天,我就叫大家怎样通过他的验证。
5 q1 ?3 r0 j5 D& ?& Z9 }首先,在桌面上创建一个txt文档(好像这玩意啥也能干啊!) ; T9 D: W1 P! {* a2 V
打开,在里面输入:
( Q+ O3 F( j8 J7 FON ERROR RESUME NEXT
( N$ f. P4 U+ i q" N- @, D! o6 w0 ^! W. ~ N
Dim VOL_PROD_KEY 1 {5 p7 _3 ]1 e/ q% S5 `5 T
if Wscript.arguments.count<1 then
$ N2 Y7 U* [7 EVOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY") 8 i# Y7 m1 H! k4 k" A4 J
if VOL_PROD_KEY="" then ' S( P8 S" Z+ Z; d( C! H6 |
Wscript.quit ' M% B }0 R+ v$ q
end if
) g! n* ~% Y; ]( F6 S9 T& \9 qelse 8 Q" V9 H6 e. L/ y
VOL_PROD_KEY = Wscript.arguments.Item(0)
$ A: Z3 \" d* q" }end if 4 D4 a$ I l# S- k6 b
- |" y) X2 E ^7 r L I# pVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
" t3 m6 O9 w, X: \5 U* l* L, G O U" |5 |$ s8 u' Z. e3 Z1 v4 }
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") ! s9 V* G* C# U0 K
4 z- E6 \$ `# s9 q2 {result = Obj.SetProductKey (VOL_PROD_KEY)
. I6 o) v$ Q8 E+ T
% O" T b- n. c8 a5 F/ E3 Kif err = 0 then
8 U$ e$ f3 _& L+ d! FWscript.echo "恭喜您,xp是正版的了@pple!"
" F' _; |, ?4 h/ r" N: ~$ cend if # u2 h; R# Q5 c @; ^9 K
! v* ?' M4 J& j7 r4 s. G/ V8 [
if err <> 0 then
% ]( W1 c& H* V: b6 f6 A% L' t) }1 @Wscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。" r3 }$ Y/ C- N4 H" a) I
Err.Clear
( ]7 f3 z. z j5 z9 k- A) `end if L2 g; Y! N( ?( K
L8 H; G- k. w7 ~' w$ b) k$ U1 p5 l
Next ; x& b) K% S3 Y
7 f# Y" z# W5 c7 H
保存,关闭(包括next啊) , Y. w# _3 g; ~0 K# r3 N4 J) r5 ~
把文件名替换成key.vbs % C2 b. E; B, m% c
如果变成这样:
! x8 M9 C; U5 F' |! O% N就算成功了,等等,有些同志问了,为什么我改变名字会出现双后缀情况呢?(自己解决)
- s0 b: i" L1 Z. r回到正题,创建好文件双击,确定。 ' U" H5 I5 }4 N3 A
好了,赶快去验证吧!
6 x3 L" L) { @% E/ }! D; E验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn
: o& p. u. K; n2 E
- X1 K6 I( l6 N m不会搞的也可以直接下载附件,解压后双击就可以了。 |
|