- 威望
- 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变正版的方法(网上转贴)
J) n5 [; \. n+ h) t. q0 ?% _过几天微软公司就要正式 进行打击盗版的活动了,在这里,介绍一个方法让大家躲开,并且盗版变正版,保证可行。
5 x, I9 I: n" T; C2 B5 k8 I( i4 d8 I+ T0 C1 u4 m& V! x
有个让人讨厌的正版验证补丁(俗称五角星) 。
) `5 M7 n) m, F$ h6 w/ n今天,我就叫大家怎样通过他的验证。 , C2 i: B4 {4 k
首先,在桌面上创建一个txt文档(好像这玩意啥也能干啊!) 2 X; C, u& W2 V+ n. z
打开,在里面输入:
+ x7 [6 A, d1 m1 {' R# ]ON ERROR RESUME NEXT
U0 s! w& h- x7 S5 _' G" j8 L) H
! Z f4 W, w* o0 Q4 ?3 @$ hDim VOL_PROD_KEY / G0 E$ q3 q7 {% @/ u3 G
if Wscript.arguments.count<1 then 3 ^, K0 e! F Y# B4 X( B
VOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
3 n. k w% g( B# Zif VOL_PROD_KEY="" then
7 X a9 W5 `: j. uWscript.quit
6 X2 Q( y. ~- U0 n4 s2 fend if
) U6 j* X$ ?, Belse ! k S% \/ d9 E% k5 H
VOL_PROD_KEY = Wscript.arguments.Item(0)
: z2 ]3 I6 J) n) {9 \end if - V/ b- K) H6 O
$ S) ~0 T# t3 y0 w+ e
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
n2 b. N/ X7 _9 _; j W5 V8 X/ b; n; ]
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
* g, `" c) i, D0 W- u' ^) `. m
: V: N2 W: u: rresult = Obj.SetProductKey (VOL_PROD_KEY) ( b2 r* I7 a: I$ t2 ^& C1 v# f) F, l6 \
* c: w9 n) C& i* ~+ Y( _$ p# G
if err = 0 then
; r# X3 S; Z/ u. W" L! gWscript.echo "恭喜您,xp是正版的了@pple!"
C. [. [1 W0 k5 Z- a" z; {end if
6 B8 Q5 x1 Y. a) q/ X9 t+ i
) b, A5 d/ ^0 Z7 cif err <> 0 then - R. R7 h1 N" U
Wscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。"
+ F: Z6 J; ?# i B3 n2 @4 Q- \9 RErr.Clear
9 a9 x2 a8 _6 P- c' g# L, ~0 Fend if
) ]5 n; o4 F5 ?6 o: i9 p; `, e3 y# Q, F9 i% f4 k
Next 6 I h" f5 N0 a% d" A8 v' u: X* w
$ D6 O0 Z& @, ?8 Q保存,关闭(包括next啊)
# U: M6 z" A+ A" R把文件名替换成key.vbs
) p3 |$ d" N, H0 D7 ~. _5 w: ^如果变成这样:
; [* E: c! L! p& g9 j就算成功了,等等,有些同志问了,为什么我改变名字会出现双后缀情况呢?(自己解决)
" s; ]- M: ]% j回到正题,创建好文件双击,确定。
" ~4 {" T' I* S5 j% F好了,赶快去验证吧! 2 V/ R0 ]; G) B# f C' ^
验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn & m+ _ G0 n! b2 O7 W: B
6 z' R! W3 d' J% G1 r3 L0 e* Y
不会搞的也可以直接下载附件,解压后双击就可以了。 |
|