- 威望
- 33
- 在线时间
- 14 小时
- 金币
- 41
- 贡献
- 0
- 存款
- 0
- 最后登录
- 2009-10-23
- 注册时间
- 2008-4-24
- 帖子
- 35
- 精华
- 0
- 积分
- 57
- 阅读权限
- 20
- UID
- 784
 
- 威望
- 33
- 在线时间
- 14 小时
- 金币
- 41
- 贡献
- 0
- 存款
- 0
- 最后登录
- 2009-10-23
- 注册时间
- 2008-4-24
- 帖子
- 35
- 精华
- 0
- 积分
- 57
- 阅读权限
- 20
- UID
- 784
|
盗版XP变正版的方法(网上转贴)
- L8 E% y' R0 L" N过几天微软公司就要正式 进行打击盗版的活动了,在这里,介绍一个方法让大家躲开,并且盗版变正版,保证可行。
1 k; D$ u: I- R3 T; l ^7 O7 P% N& D A, q5 e# N9 J
有个让人讨厌的正版验证补丁(俗称五角星) 。
. n5 U, t' Q/ M! B N8 r& B今天,我就叫大家怎样通过他的验证。
" r Z( ~) g) Z3 c2 l首先,在桌面上创建一个txt文档(好像这玩意啥也能干啊!) 1 i9 Q& }7 |% i" p
打开,在里面输入: 2 [( w6 b# r, a5 A3 ^: G+ N/ U
ON ERROR RESUME NEXT
# u6 ], [) w/ R4 e! i0 Z& L0 M6 l! C
Dim VOL_PROD_KEY
) P/ D% _% ^2 a9 Y' I+ }' Y# hif Wscript.arguments.count<1 then
! }# K6 x J* P- l6 r: UVOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
% E* k5 O0 a c Y4 O$ d2 Dif VOL_PROD_KEY="" then
5 {0 n. G( v5 ~4 ^% uWscript.quit + U/ u( Z5 s: v. F. s* a# N
end if ) Q: z6 M/ l# p5 R
else
5 i$ a( }4 w* W4 `& o lVOL_PROD_KEY = Wscript.arguments.Item(0) ( y X- |4 X' }8 K+ {- s
end if ! I' {4 l5 b) u2 k7 X- I4 L+ t
9 c, b4 o; U# H+ Q' u& S7 o3 s9 IVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any 6 H; u. s2 v, C- [0 X U) j
8 T4 e/ M+ M) \% Y+ y( v' |1 ~7 h
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
% g) N0 f. C/ c# j; e; e S+ {6 v& B$ }8 B U9 d3 v
result = Obj.SetProductKey (VOL_PROD_KEY) " w0 b) l- ~8 x! v4 z
" q0 ~7 N% O6 u7 ~6 z# ^
if err = 0 then
) V; b0 R. b8 b/ P, z: N" h2 EWscript.echo "恭喜您,xp是正版的了@pple!" 0 x0 H. M; k$ L v) H
end if 6 ?8 W- k7 @0 r5 `
9 A/ u+ E; f$ pif err <> 0 then
8 B1 B5 K% @; R% t; S6 f! ^ `Wscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。" 2 a: ^6 d: t' u3 ?! J$ S
Err.Clear x. ? a2 T; Q2 E, }( E" E
end if ( z, ^$ k- ~% w) r+ O
, d* b, e: z% ?Next
& X. e2 q0 g; f* l- B+ c0 a! E, v4 [0 ]- I# g! j0 O
保存,关闭(包括next啊) 4 r3 n7 f9 B \2 r
把文件名替换成key.vbs
1 m, J# x9 t/ @$ T* ~( f如果变成这样: % b# s o! _/ a/ Y% l! p
就算成功了,等等,有些同志问了,为什么我改变名字会出现双后缀情况呢?(自己解决) . V# P- H8 @" _
回到正题,创建好文件双击,确定。 ; H c* O/ v z+ S) t4 F# b
好了,赶快去验证吧! ) W. m% B$ l* j1 m* b/ [& R# z
验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn ) { r) d' }! w7 z, U3 d
8 f/ T9 E8 w; l+ x5 p不会搞的也可以直接下载附件,解压后双击就可以了。 |
|