|
把此段代码保存为*.vbs,运行后输入正版序列号,可过任何微软验证,很简单! C; k% R$ U+ v- H
' / ]2 x. _9 J4 Q% \" @% Q9 [6 h
' WMI Script - ChangeVLKey.vbs
: K" W& c! P5 e: i: L'
4 a6 x s7 K+ y' This script changes the product key on the computer (XP SP1 SP2 2003)/ r3 P3 x/ f @0 F: z3 R: y& U5 B
'
x) ?; e1 L8 y/ H n' Made by ythggyth.2 l/ e, x- _* d7 D8 A- \4 _( u! q
'***************************************************************************' Z( a; k' u% n9 d4 d5 V) [
* g6 x& f: l; }3 J' z- A# c" s
ON ERROR RESUME NEXT% b! v2 L3 s2 W1 e) k4 V. Y
! a. Y! o- d; |' p4 e$ yDim VOL_PROD_KEY5 ~" y3 k( n, F; M0 s
if Wscript.arguments.count<1 then$ s! R9 T- w1 E* n
VOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&" 本脚本程序将修改当前 Windows 的序列号。请选择一个微软授权正版Windows 的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","Windows序列号更换工具","在此输入序列号")5 W2 J4 N8 B: S9 j0 w- X8 `" U
if VOL_PROD_KEY="" then" x Y9 N! ]# ^- j! o
Wscript.quit# M b: t" W0 U7 c0 N! Y
end if; ]0 r/ C2 u/ f
else
) O6 `/ M( C' _; r X9 SVOL_PROD_KEY = Wscript.arguments.Item(0)
+ R8 ?/ @) m. m, e+ Uend if4 z$ r1 a4 C# d2 r
6 _% {) S5 O6 z0 k1 L" k- XVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any3 x/ f0 o$ |% D7 e6 k. V0 n+ R* K& y
6 N- k. H# k* q4 x1 ~' g9 c4 @for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")4 |: p' D0 K9 ~
6 M# V$ Q& L+ G2 T; O0 l, V
result = Obj.SetProductKey (VOL_PROD_KEY)
& [8 F% L$ f0 T6 V/ i9 J/ i" X
+ m z3 a. _) Wif err = 0 then3 O7 p3 t- ], A2 ]6 t
Wscript.echo "序列号改完啦!。看一下系统属性。"+ h$ H9 Q: b, H: E2 w
end if1 q* c; G1 Y2 [" N
. f, r4 z* g( T+ w' u
if err <> 0 then1 `+ B v( h" n+ c
Wscript.echo "不对!你把序列号弄错了。"
+ g) O/ V& b$ RErr.Clear- q D. }" ~) N9 k: V
end if
/ N1 W* u& x7 M; C( Z3 h+ n/ K1 W$ u4 J5 V1 k
Next + R% O# F2 ^. e0 {- m
1 Q. E, K/ T, W9 f% I
Windows XP Pro SP2 VLK 微软授权正版序列号) O7 h( f; f, Z4 }* d7 Q6 q/ h
HH7VV-6P3G9-82TWK-QKJJ3-MXR96 640( z) P5 l' E& d
F4297-RCWJP-P482C-YY23Y-XH8W3 640
U% h, h$ h# S5 s; [2 G- eMRX3F-47B9T-2487J-KWKMF-RPWBY 6404 t: ^8 Y2 |, [
QC986-27D34-6M3TY-JJXP9-TBGMD 640 |
|