|
 
- 帖子
- 7765
- 积分
- 21514
- 管庄币
- 9 元
- 注册时间
- 2008-8-20
- 最后登录
- 2016-6-8
|
如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号
) O& u M: Q" m, H4 W2 I
8 t* Z9 X# P/ [2 |6 w+ q, t8 \$ @新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS # X' ?+ }5 |. Q' Q6 H0 p7 b/ }+ r, Q
9 s( k/ B" z! h, u$ \主要功能可以修改安装时的序列号. , N! B* o7 x% _! }- X
/ K" ]9 k; ]7 c' N
'
: [$ H6 H- D; x3 g! T/ E8 W& G" v! m' WMI Script - ChangeVLKey.vbs , t6 Q( W& ]: k9 z$ r1 K; Y2 u
' O4 \( K4 P! J* {8 C% m( |
' This script changes the product key on the computer (XP SP1 SP2 2003) ; K( ?: ~# X* e5 M. B1 v/ \; K
'
3 j8 S j. P$ H7 U4 K, E9 p' Made by zyling. $ G& f7 @; A7 b3 _* a& ?
'***************************************************************************
4 g2 L8 s( g' A- _ T% Z5 v) b! T& O/ h9 }! g( p
ON ERROR RESUME NEXT 0 p2 e% v) T6 r# O2 ]
5 }, P9 A# V& ^- HDim VOL_PROD_KEY 2 z. K) E: ~7 @2 k" l9 I
if Wscript.arguments.count<1 then
+ h8 n7 O0 j6 j1 z" b& EVOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ") / K E. n0 E1 `1 |) N0 i
if VOL_PROD_KEY="" then
, P$ v+ L4 `) v7 g3 g7 HWscript.quit 0 V, p" M* s, D! L w7 h
end if F; q$ u& f; x
else 7 c h& K! l8 g& f
VOL_PROD_KEY = Wscript.arguments.Item(0) ( f6 i$ _0 ~# ^8 W+ K) `( }6 s: p
end if
- O1 t1 M; f% K" K# ?
5 _6 M+ r- [2 h2 T- l) e& ZVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any + H! H& I* D% h* n% n
4 {3 v; ?% B7 a: }
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") 4 k/ K% I# c. x
; a2 O# p( z7 m$ s
result = Obj.SetProductKey (VOL_PROD_KEY)
/ Q5 v. [1 j6 t3 u
^# Y1 a6 b" a& R% jif err = 0 then
4 p& Y8 P a( B) m& eWscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。"
/ p7 F! n* l3 j, a7 Tend if
/ b- d8 K4 B" [# I+ I5 ^3 }( e5 }. x3 Q& }/ N4 u; f
if err <> 0 then 4 V! j4 z) {& P8 z: w: X
Wscript.echo "修改失败!请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。"
1 L0 G+ J# x. YErr.Clear
- a+ @+ A; Z& R3 \+ \end if 3 j9 g; {0 j7 E# m* B+ F
7 }* v$ R& K( }
Next |
|