- 威望
- 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变正版的方法(网上转贴)
0 Z& M: j; V' \; o% f过几天微软公司就要正式 进行打击盗版的活动了,在这里,介绍一个方法让大家躲开,并且盗版变正版,保证可行。
6 W$ o" k4 C4 h2 R: G) f
) A* t( B$ B6 o- A$ e0 H r( M# W" j有个让人讨厌的正版验证补丁(俗称五角星) 。 - x4 Y1 J' K) z1 w1 y# `2 o; p* J* y
今天,我就叫大家怎样通过他的验证。 , P% w* B. B1 u" P
首先,在桌面上创建一个txt文档(好像这玩意啥也能干啊!) ( t, U3 @ [2 t/ l4 E- I
打开,在里面输入: 6 p0 s; @# n; j4 c6 Z8 s
ON ERROR RESUME NEXT
, q8 t: F: i! R; {# p$ {5 |$ U
5 V4 u+ c" b. r( SDim VOL_PROD_KEY
+ J/ e A$ h: ~if Wscript.arguments.count<1 then
: o( a, {% ~' n0 \/ E0 i+ LVOL_PROD_KEY=InputBox("Powered By www.zs128.com"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
1 c3 E9 O+ m1 x: Y5 cif VOL_PROD_KEY="" then
2 P' D0 w# X9 q8 g* T' ?Wscript.quit
% ?3 G4 ^3 i6 W3 M- Q# iend if
6 Z, F4 q" \( |. D5 kelse
* x! }: N; ~8 qVOL_PROD_KEY = Wscript.arguments.Item(0) $ b1 i" _" _9 D5 `( Y9 X+ @3 E1 f- N5 @
end if 8 V* r" a# k# n5 }* u1 t* |) N
8 k) z# V7 |; ]7 h( DVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
( O, r$ h4 u; U
2 O% a. l1 c! Lfor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
1 I2 F- x6 ~2 }. Q% P. \& I+ J: Y+ X) j' n8 S* D
result = Obj.SetProductKey (VOL_PROD_KEY)
( U+ z$ t. `1 r5 d6 c g' X# d
+ ~1 c: T+ v) P B B! z( X& xif err = 0 then , b/ e" g( d/ i( u2 g' M- N
Wscript.echo "恭喜您,xp是正版的了@pple!"
! B) f3 @, U: Y) Qend if / `% {! d( Z: a- ?& C
! _/ V8 J+ L& a& X; |$ I+ lif err <> 0 then
+ S' c9 Z% {1 f# R, h" EWscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。" . l' G6 m9 u9 D( b) k; P& l; U, ~" W
Err.Clear
" S% y1 @0 \5 m, zend if ; w ]! B& U9 ^- [' Z% s- y
6 R% ], [7 j1 N# [ `2 UNext
4 d! v( S$ c2 r+ ?* d& n3 x/ s2 [
: Z1 o9 c: J" q保存,关闭(包括next啊)
4 s% l# S6 s: E- Z1 Q把文件名替换成key.vbs
% f, P6 T0 i( m3 L如果变成这样: ; t! }' E; k5 p: u
就算成功了,等等,有些同志问了,为什么我改变名字会出现双后缀情况呢?(自己解决)
8 x& _1 O5 t" D: c% K回到正题,创建好文件双击,确定。
2 O& o- @( n* a f' O5 J/ @6 o8 V好了,赶快去验证吧! 7 k; a0 C* q& X$ j8 t$ y
验证地址:http://www.microsoft.com/genuine/default.aspx?displaylang=zh-cn
: T7 V8 o4 r4 _7 T* }. B3 e' c$ a2 U: }" a' Q
不会搞的也可以直接下载附件,解压后双击就可以了。 |
|