|
- 帖子
- 7765
- 积分
- 21514
- 管庄币
- 9 元
- 注册时间
- 2008-8-20
- 最后登录
- 2016-6-8
|
如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号
- o4 a1 j, A; E" d& G# R' {
7 M, H D: V; u9 o* X新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS + ]6 x* K# ] F& ]. c, n
& ]. U m6 e7 m& u1 ?/ g( h# Z主要功能可以修改安装时的序列号. & o. {3 i6 s5 f, @$ x
6 I$ D- b8 N: _$ w( g4 J' R'
b& h& \, P) i# \' O0 F$ t' WMI Script - ChangeVLKey.vbs
3 ^% U/ T! x- @'
" R1 X7 V+ @0 l' This script changes the product key on the computer (XP SP1 SP2 2003) 0 n k. G4 \0 ~7 }$ B6 r
' 8 C* @ }3 ^) I& A$ |) c3 J) B; b0 m
' Made by zyling.
# s! I; S0 ]/ B# J4 C+ m9 _6 _'***************************************************************************
5 ]) R# w( L" D5 N0 Q! e7 t8 l7 L9 `, i" Q8 D
ON ERROR RESUME NEXT
; J& ~# T0 h0 U; x2 S$ B4 T! Q# @: M( j4 v: H1 W$ c
Dim VOL_PROD_KEY
% `3 h. ^3 v! R# o Nif Wscript.arguments.count<1 then
* z/ o0 |- l0 f; w8 qVOL_PROD_KEY=InputBox("使用说明(OEM版无效)："&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号，复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK)：","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ")
9 p) p/ \) S% J( h" h) h' Tif VOL_PROD_KEY="" then % F) ?8 `, H# a" [2 Y, z
Wscript.quit
8 m" V; M, ^& _* @; ^end if
+ G2 v, O9 |' w. V* H1 m! k" celse
: T3 p; r2 I3 w5 FVOL_PROD_KEY = Wscript.arguments.Item(0) % |' b7 ?6 B* |5 [
end if
9 @% r' J% a8 f% |9 H* k
" C6 U8 Y+ g6 ]# q, J+ H3 i& ~& {VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any * I+ B) L# ?3 [8 C9 \* [# u
8 ^: {6 s+ ]' ~; P) [! ]" a
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") % j$ T: N( t0 k' f# l9 J# G
" H+ k1 y- u4 f+ ]0 S
result = Obj.SetProductKey (VOL_PROD_KEY)
( i: y8 h& p! V. z. t3 y7 u- i) O, Y- }
if err = 0 then
- q( H2 N" o3 s( E$ _8 ^: GWscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。" * c( g9 y8 z( v; ?; j
end if 5 p' c5 F7 G4 @3 H4 T2 ~
! l0 }% D7 h7 ^
if err <> 0 then
7 R! e" l2 _9 `, V' ^Wscript.echo "修改失败！请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。" ' J7 Y7 p8 C, O& i. R1 D
Err.Clear
* l0 O0 P( q) y! [; ^- \ j8 x% nend if
, I( k' f0 B8 s. x: _0 m
% `/ Y/ I+ [1 S6 ENext |
|
发表于 2009-1-8 13:03
|