|
 
- 帖子
- 7765
- 积分
- 21514
- 管庄币
- 9 元
- 注册时间
- 2008-8-20
- 最后登录
- 2016-6-8
|
如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号
& s* _1 {7 A# K; F: T7 B
$ A6 m# C: V6 E; Y新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS # Y7 w7 A/ K, H. L5 w
9 y: w2 L+ w" I- U1 N+ ]主要功能可以修改安装时的序列号. 8 g1 q- p' s! k( R& D( r, l
4 T' t- g0 z0 S+ ?5 K'
% M, T/ j2 K- s3 W6 W. }' WMI Script - ChangeVLKey.vbs & k0 X: i6 ~" y1 B& `! K$ p6 w
'
/ y" q8 K. @% o# q" r7 L! {1 Y" ?' This script changes the product key on the computer (XP SP1 SP2 2003)
) E: L% \0 P6 h2 n9 i1 S'
# a, X5 w6 ^% x6 l% V' Made by zyling. / f( l; y$ Z1 B' F5 g! \- N8 o$ Q
'***************************************************************************
$ |, Z3 ~9 |6 _) A, l" g' w5 y2 V
5 @2 {8 Q6 v1 O N# HON ERROR RESUME NEXT
1 H4 j. Z. C$ ]& R2 P, G( `
$ X* i5 C7 r/ o1 BDim VOL_PROD_KEY
1 T& _/ f0 T& {$ vif Wscript.arguments.count<1 then 1 \, b; k o* d- E& ?6 V# f" K
VOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ") ; R3 p- H8 _" x3 A. v1 c
if VOL_PROD_KEY="" then $ }. [% R0 W0 X7 y
Wscript.quit & \1 A# S* m3 H& }4 _
end if
2 u" B6 Z( x) l# S i9 m* Kelse ) u$ H% k$ f3 n3 K9 Z
VOL_PROD_KEY = Wscript.arguments.Item(0)
! L7 D" E% C0 J# @/ }end if
: @# |$ d. G* F# |1 C
3 M$ f& c) \ e6 |) \# o4 s6 ?VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
1 ]) S; V: k, Q8 J; b3 Z
; [7 V! m9 v: h& S; P2 Cfor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
0 B! h1 s2 _& r6 {8 O
% A1 H5 q! f2 [7 r tresult = Obj.SetProductKey (VOL_PROD_KEY)
0 n" O& v- M8 @/ K3 @, I1 r# P# m, Z) a' r. i/ d
if err = 0 then : ]) S7 p8 P; q
Wscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。"
0 F. t( D+ u- eend if ' b' H- d: ?; X
n& S( H# g% P- a
if err <> 0 then
9 H8 I. B, K8 k# p2 {6 s0 u; r7 s/ NWscript.echo "修改失败!请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。"
9 `" i! S3 S) ]% b bErr.Clear ) V0 ~* @- {7 i2 e6 o. g$ w0 r/ F
end if 4 [, P. e8 B6 R- O9 i2 `( l
2 t% N- K8 Q3 T- G3 C6 FNext |
|