- 威望
- 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变正版的方法(网上转贴)
, o( o- U* l8 Y( r3 W8 u9 @过几天微软公司就要正式 进行打击盗版的活动了,在这里,介绍一个方法让大家躲开,并且盗版变正版,保证可行。
* g$ k0 C2 ]* E3 y" o; G9 X* `$ t, y3 E0 q" p
有个让人讨厌的正版验证补丁(俗称五角星) 。 ! z1 ?2 W1 W+ }0 M4 X# R
今天,我就叫大家怎样通过他的验证。 : f+ C' i2 t6 x1 U1 I a7 n
首先,在桌面上创建一个txt文档(好像这玩意啥也能干啊!)
8 z4 s* ?, {9 E) X! M0 p打开,在里面输入:
" @6 Q& Y: e& U' S. DON ERROR RESUME NEXT 8 r; n4 I4 D0 W( e" _
2 x; l/ n& @4 T* S3 [6 I
Dim VOL_PROD_KEY
; C% v2 }- m: w4 C* |if Wscript.arguments.count<1 then
6 G) B8 Y5 Y& v' s5 V' n8 dVOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
3 f' c, F4 c, Vif VOL_PROD_KEY="" then
! x' o8 z' h+ V' C% |9 z9 W: Z/ iWscript.quit
. y+ P7 l! W. _; u- c! Z9 _end if
( S3 i! ]: l9 k$ ]1 Nelse + D4 c7 K* J2 D% i
VOL_PROD_KEY = Wscript.arguments.Item(0) . W7 ^% E0 V. I% h( q1 r
end if
! ]: [/ d0 J& z/ |* M. @& W$ P6 ^! V
" {* z* u% h2 q& h5 c: q3 c5 W zVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any ; O; ^) o; D# x0 z& W5 w
& G9 X+ t& F) F
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") * }; I( U4 Q* H+ M
: j8 O7 g4 `4 e. i: w1 K z2 R
result = Obj.SetProductKey (VOL_PROD_KEY) , g" C* e" U4 ^; S; d
4 Y: j8 t8 B0 G1 r7 `
if err = 0 then
3 R. I: D5 Q Q9 T0 H! IWscript.echo "恭喜您,xp是正版的了@pple!" ' l* V6 @' n& @+ H
end if
0 l) ~5 z3 S3 {+ F
& v* h% i: ~. q, n- _if err <> 0 then
4 D+ ~4 U) {* o! y# qWscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。"
: {! C( ^% ^8 J! d8 o5 fErr.Clear ! v, r* e F' c8 Q3 ]
end if ) E+ c0 z0 U+ c1 }
. e1 \* L. c- ^Next
* u' v( B* P T. e# e" X& U6 M7 M
5 @5 t: J s! N3 s K保存,关闭(包括next啊)
& ~8 \" @* @3 g把文件名替换成key.vbs : w! _7 H& r4 v% J9 \% H
如果变成这样:
, Z/ l& [+ X8 v5 J就算成功了,等等,有些同志问了,为什么我改变名字会出现双后缀情况呢?(自己解决)
" X: @+ L1 j( d/ Q4 V回到正题,创建好文件双击,确定。 ) H7 m% @/ q+ E W" c/ N8 T
好了,赶快去验证吧! ) }# O7 C2 N; n1 f4 g5 F& `
验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn ; B* Q" a! `; r: \& c/ L! o/ O" V
, F# h- G, Q2 u不会搞的也可以直接下载附件,解压后双击就可以了。 |
|