管庄首页 | 管庄资讯 | 房屋租售 | 活动聚会 | 求职招聘 | 常营商铺 | 常营论坛 | 联系站长
返回列表 发帖

修改Windows 2003序列号

修改Windows 2003序列号

如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号% V" V: b, }6 }; L
9 K! d1 q! x& g* L( x' E8 y- v
新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS
1 P6 b" U& O$ i' y6 W
0 _7 j% T1 C. U% P# j8 l. k主要功能可以修改安装时的序列号.
! B8 o+ K' m8 R& t, {- k/ d% H* y- X1 U1 _+ ?
'  # h2 h+ }6 |* n2 r+ c
' WMI Script - ChangeVLKey.vbs
5 o5 ^; h. z8 S0 x'
' ?5 G. g' h! T: ?2 x: F  b' This script changes the product key on the computer (XP SP1 SP2 2003)
+ y; f7 K' [  w) Z$ `3 s5 W  o'
! C4 H' E* v* G9 _6 I' Made by zyling.
1 T8 k2 H0 X. q' M1 R2 l) d0 Z'*************************************************************************** ! t' u2 m- a* k% Z2 C

6 D" q+ q* C/ @2 _ON ERROR RESUME NEXT - U: s) U, i/ |) I5 q& o2 }

. l1 D8 d" e# Q8 @Dim VOL_PROD_KEY
$ T  l' ^% S0 C" Bif Wscript.arguments.count<1 then
6 B/ Y  F% w" Q2 }" KVOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ")
5 c5 E+ w- t( Y, ^: a7 y+ D4 lif VOL_PROD_KEY="" then
" `" t) F" b' }# [" J, }3 @7 tWscript.quit $ D" `) h/ a( d; l
end if + a  s0 K: D, j
else . x' V+ }! {4 w5 v
VOL_PROD_KEY = Wscript.arguments.Item(0) 4 @; E( c5 c* G
end if 1 F3 R6 h" P7 e( f8 H. ^4 ~

/ x- O! Y, H9 W6 LVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any # z& ~- _9 Z% |2 i- Z

2 @9 A5 f) E$ w  V( Ffor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
# G$ _' H4 L5 v9 Y  Y4 a9 H$ C" c: T- {( K
result = Obj.SetProductKey (VOL_PROD_KEY) 7 `# W( F" `! |/ h4 l+ p, e
& e( l9 p  O# @4 }; O; [
if err = 0 then
1 `9 F* K( x9 bWscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。"
+ U6 t1 v% {/ v4 pend if 6 D8 W/ g1 ~1 q9 W- y7 \( d
0 u, I, k% N0 I1 f) N1 p
if err <> 0 then
7 f+ ~2 i$ l2 E! S$ _2 RWscript.echo "修改失败!请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。" 1 ~8 C$ ~+ F' L& Q# x9 U7 f
Err.Clear
) ]/ W% U! m3 `3 Bend if   o7 Q! n* p! o' B+ y* U  i6 T

3 B0 ^; E1 r- B. g8 y3 INext

注意:Windows 2003 企业推荐号码:JCGMJ-TC669-KCBG7-HB8X2-FXG7M

TOP

返回列表