|
 
- 帖子
- 7765
- 积分
- 21514
- 管庄币
- 9 元
- 注册时间
- 2008-8-20
- 最后登录
- 2016-6-8
|
如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号
6 Y; u8 Y2 r$ ]7 }( Y/ }+ O, L$ \) w% l8 h! h/ X) p5 D" Y
新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS ' N& R% ~2 z, g. m, x
( ]& W" A( \& l6 S! s! t! k主要功能可以修改安装时的序列号.
8 N" O1 r" b1 L3 p, Y5 c" b( o
7 h+ K! S! o& O" H3 \' & j8 m+ ~' f5 J. k
' WMI Script - ChangeVLKey.vbs " X% r- A1 \! g- P* K5 T
' $ C" B: }* Y& j
' This script changes the product key on the computer (XP SP1 SP2 2003) ' z1 f! |2 f# i! A4 C0 C1 a! \
' 5 p! I' e9 X' u. X: {9 n
' Made by zyling. , a" ^5 u; X7 Z- S
'*************************************************************************** ; M1 ^. g9 |6 ?/ F3 \$ D, n
3 s* J- J8 E1 B( B; t
ON ERROR RESUME NEXT
5 @0 a+ u- e1 q5 @0 `1 Q, Y: j# p5 f; k. h. S* u7 X1 r9 g9 a* n
Dim VOL_PROD_KEY Z8 _6 k6 q8 @/ i2 |) i
if Wscript.arguments.count<1 then 4 _8 ^2 ~' e& K7 X3 h. {; \
VOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ") - G' q `- q* p, v
if VOL_PROD_KEY="" then
3 |( i; z% T: CWscript.quit
+ @- A0 h1 b7 u1 Aend if
/ }9 ^% \5 V. z5 L7 {else
% a$ ]* D6 Y- `: s9 X1 XVOL_PROD_KEY = Wscript.arguments.Item(0)
+ }+ T# b* E9 f) x t* P# _, R0 w' nend if N/ B! Q, u! [) k" |3 S2 E
% W$ L0 Q4 J9 x& KVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any ( E- S+ U! x4 |# x
2 g9 _0 x0 q: `* O$ l" v- p2 s
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
3 @( H$ |* B/ r$ H' W
4 t3 l J& k2 b. |1 K; K9 c" u4 Cresult = Obj.SetProductKey (VOL_PROD_KEY)
" D' F; F1 z. X" O O% \
4 A$ u |' I ?7 u, Q6 {' `& yif err = 0 then " M6 B8 e# l+ d0 H
Wscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。" 3 l1 T' @0 x, J/ U7 N0 K
end if
! S% L' e$ v& }9 Q
( {- d' u& \/ t% lif err <> 0 then
: t& x2 A6 W9 p: DWscript.echo "修改失败!请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。" 9 h/ P; F! a* p+ H g& T0 e/ s
Err.Clear
* f: F* c% Z$ q( }2 ]: Rend if * a4 H9 j( d% c$ d, N6 x
2 e8 W. [7 ?$ v- u# h" P P7 e/ ENext |
|