|
把此段代码保存为*.vbs,运行后输入正版序列号,可过任何微软验证,很简单
' f+ C7 Y, F) w4 M3 w% d% O6 z' ) J8 j$ i6 g- v2 Z
' WMI Script - ChangeVLKey.vbs# a7 X) V2 Y* b3 X$ w4 z: z) Q
'0 }/ ]8 \! v/ [" b6 `5 |( S
' This script changes the product key on the computer (XP SP1 SP2 2003)* _: L f3 s9 \- Q$ w
'+ M! M* z2 g1 o! P! O
' Made by ythggyth.
. I1 _9 ?$ l5 W& }2 G( k'***************************************************************************
( A+ _0 W, u \# K1 Y- p3 g$ l" G4 B- {/ `* L4 p
ON ERROR RESUME NEXT* B* M+ @" |$ H" }0 f$ p0 c) J( N
% U: y% [" P; B) h5 x& a1 VDim VOL_PROD_KEY
F: i; r% H& V) Fif Wscript.arguments.count<1 then
3 M: ~, r2 ~ ^7 ^3 v/ PVOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&" 本脚本程序将修改当前 Windows 的序列号。请选择一个微软授权正版Windows 的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","Windows序列号更换工具","在此输入序列号")
0 z% {& \2 `* C& t6 U$ C2 ?) jif VOL_PROD_KEY="" then
: D( X% X5 f1 A* Y% w: A) bWscript.quit
. B+ ^+ t: F4 L4 e }8 r Wend if
8 E% J9 Q- s k3 k0 belse
* ^( R6 B! l) C: H$ AVOL_PROD_KEY = Wscript.arguments.Item(0)
/ N8 T" |* M% V8 x$ Cend if6 [" J( I) \& `, S! G7 G
6 s+ N1 Y; P4 ~; e% X- g
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
1 p6 o: X$ D# z. X" |
1 H/ w' L Z3 ~+ o# vfor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
5 x) V& r, E" l) x8 s! a! l( f2 U: ?9 T
result = Obj.SetProductKey (VOL_PROD_KEY)
* ]0 q7 T1 Z* x& J' A4 A" @ W2 E$ o2 h+ n; u9 u0 q
if err = 0 then9 T4 A5 q7 l8 K, D
Wscript.echo "序列号改完啦!。看一下系统属性。"/ Z8 s. b$ |6 q1 q7 |; m+ _
end if
$ s! `- r5 F+ q/ N; w5 h& Q* v8 y5 ~ w
if err <> 0 then# _0 b9 t& m3 d c9 |* c$ _) \
Wscript.echo "不对!你把序列号弄错了。"
D! L+ y/ q6 X, X0 v2 PErr.Clear
& J, p8 S' Y# _7 Q5 H% D) send if3 J8 G8 q% D! e8 F# G9 k# Z
( D! N j1 t6 i2 X5 sNext 2 M- }: Y! a9 R9 ~# [& f
- l( M9 O6 Q+ J9 cWindows XP Pro SP2 VLK 微软授权正版序列号# B4 \+ h' W' n& z& O" J
HH7VV-6P3G9-82TWK-QKJJ3-MXR96 640
7 k- ~( w" k8 [9 a8 Y/ v2 MF4297-RCWJP-P482C-YY23Y-XH8W3 640
- a6 p$ O) x2 e' {" O5 H6 YMRX3F-47B9T-2487J-KWKMF-RPWBY 640
7 N _7 A' ]: H5 s1 D: k1 cQC986-27D34-6M3TY-JJXP9-TBGMD 640 |
|