|
- 帖子
- 7765
- 积分
- 21514
- 管庄币
- 9 元
- 注册时间
- 2008-8-20
- 最后登录
- 2016-6-8
|
如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号
3 \6 u% T+ r0 M! ]; [; r( c# h U" Z
新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS
/ G0 V# F6 h6 D4 \, Y" O* j. L1 J: R3 m" ?% J5 B5 F
主要功能可以修改安装时的序列号.
6 }' y% G( A* z. K- g0 y4 F: J- k& X" q* F; {
'
7 Q6 o l9 }6 L+ h: O' WMI Script - ChangeVLKey.vbs
( [6 y1 a- G7 ?3 B3 k) r' + s- R/ l3 @/ f+ F m) a& J
' This script changes the product key on the computer (XP SP1 SP2 2003)
* K* G2 W7 _7 u' / ]3 \* s' H9 ~/ U7 i
' Made by zyling.
" Y, y+ e8 G$ J& Z) T. b) N'*************************************************************************** . y9 m2 c9 M0 V4 }: ^- J3 a
6 d1 Y' t$ D/ o3 {) D oON ERROR RESUME NEXT
; Q: Q' e @ O( p3 w
) m+ |( K" [; h4 F* oDim VOL_PROD_KEY
+ a/ l- a# }8 }! x3 m- w! _if Wscript.arguments.count<1 then
& T0 N: K* X1 `* y) E9 z3 M# \0 \VOL_PROD_KEY=InputBox("使用说明(OEM版无效)："&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号，复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK)：","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ")
1 y" K3 j' [' c3 b* _6 X+ Xif VOL_PROD_KEY="" then ! d' q: f. B4 _( i3 x: _
Wscript.quit
+ x5 s) B0 ^5 u/ H/ jend if
( r8 C F! D7 g: t( q% S5 e# Relse
9 A) Y: ]# H1 v, F# \/ a [4 i4 O. kVOL_PROD_KEY = Wscript.arguments.Item(0)
5 e: I+ M* `9 n; m( N, x6 Yend if
6 C$ m$ _" W, L9 [2 x5 `: Q. w+ S2 R
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any 8 {; e) {0 i( U# \- K# E
9 ~2 c" M6 W& n- Q) k4 [
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") f0 Q @4 K; E/ ]1 O" b: k( Y
2 i8 N( H4 P5 b! ]2 b2 {; `
result = Obj.SetProductKey (VOL_PROD_KEY) ) h. N$ a0 Z- n! O
& O7 e2 |4 e" X
if err = 0 then
6 Z( F) `: Z/ v$ `Wscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。" 3 [- Z% s* B9 t) F1 G1 H
end if
+ q I* b2 _* K" d/ ]& E2 G: s1 {# o* k2 \" i8 o
if err <> 0 then ! U: x! i" X) W' l
Wscript.echo "修改失败！请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。" 4 x1 j: U/ T4 e4 b$ {- U; K5 N* C
Err.Clear ( G7 W0 g, n/ m
end if ! N3 k/ a( e" l, e
; f! q7 c% U0 p- M+ X6 YNext |
|
发表于 2009-1-8 13:03
|