|
- 帖子
- 7765
- 积分
- 21514
- 管庄币
- 9 元
- 注册时间
- 2008-8-20
- 最后登录
- 2016-6-8
|
如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号
7 Q( B1 I, g3 O' s1 J; p/ `) z9 _" I' A S! v* n; K
新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS 9 _6 u7 [8 l+ x1 d2 K1 q9 i+ z
7 {/ G' l& v0 ^( R: U, z主要功能可以修改安装时的序列号. 1 j- E) _( r9 t8 n$ L6 d& W
6 O* N1 ~" ^; B6 v' . u% e$ o1 F/ a2 F
' WMI Script - ChangeVLKey.vbs
( M3 ?' W& Z9 _: c. N5 t& H4 U' / ?( l6 C) ^; G/ q+ \
' This script changes the product key on the computer (XP SP1 SP2 2003) ' z7 H8 j7 Y8 x
' 2 P H' b7 j% h8 c) }
' Made by zyling. 1 U1 q! I3 E9 \9 l2 M
'*************************************************************************** % r& i" i; D. V( o2 _8 G& R2 L5 J. `! W
& l$ S% s; Q1 G1 V
ON ERROR RESUME NEXT ; n3 @: W% `8 d2 F4 u1 Y
$ ]2 H! q; q. B0 I1 p' c) L4 sDim VOL_PROD_KEY
2 j4 M) q/ I6 D$ Xif Wscript.arguments.count<1 then / e# n& f6 M; b' f! j
VOL_PROD_KEY=InputBox("使用说明(OEM版无效)："&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号，复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK)：","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ")
( ?: j/ S. L ~+ [4 p3 `& Cif VOL_PROD_KEY="" then 0 F5 K% s$ t6 r. W
Wscript.quit
) A2 u3 a% p( O2 u+ Z2 m" c6 ]end if + n+ b1 C2 \5 O | N
else 7 Y( `- m' ]4 q, E9 Z
VOL_PROD_KEY = Wscript.arguments.Item(0)
% I' @3 n! E) R0 i* Kend if $ q; b% E0 e5 r0 Q; S' g# o' n
- I! |2 u3 G2 K7 t4 q) b( @2 PVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any - b8 Y; @2 Z. P) W. j6 c" P
3 n1 }) \' x2 O7 h' K. ofor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") 1 ]* `! A4 t% T5 Y: j& P8 J0 ]
m- C* ]6 n# f1 z' H/ l3 Gresult = Obj.SetProductKey (VOL_PROD_KEY) ; R. d' W8 Z! {' o
1 |; P% I% B$ s
if err = 0 then 2 W* d( n$ ~' k
Wscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。"
& j! U: Q9 o9 } V9 d+ k" V8 Dend if
0 k$ A! R0 U* p9 T+ l/ }3 g9 b N3 K0 k
if err <> 0 then 3 q s6 F8 K5 ?" ~
Wscript.echo "修改失败！请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。" $ T+ k* U1 C6 ~0 m! a0 a8 R
Err.Clear ( U2 s% l- Z3 O2 \
end if
3 o8 ]; u/ [/ @: }2 T& m/ h% U
# D, p: W$ v! G8 f% ?& A4 BNext |
|
发表于 2009-1-8 13:03
| 