|
- 帖子
- 7765
- 积分
- 21514
- 管庄币
- 9 元
- 注册时间
- 2008-8-20
- 最后登录
- 2016-6-8
|
如果WIN2003升级SP1的时候 因为序列号无法升级的时候 可以用简便的方法修改序列号
, u' S- M# X: J/ n( @) ~" |1 B" q' y5 w5 V; Y6 [, @. o* d
新建立一个文本内容如下修改扩展名:Windows序列号修改.VBS ( p0 _0 p7 k- t" ~( H
; S. I: l7 Y0 i3 r
主要功能可以修改安装时的序列号.
0 v7 ?+ l) R' k, l4 V6 x8 E
: P4 R7 ~9 H/ \2 ?'
6 X, X+ }# I: N7 C5 x' WMI Script - ChangeVLKey.vbs
, o1 R/ J# g" i$ m2 j* V% E' W5 L'
( `8 m9 t3 Y( [; a4 _$ c' This script changes the product key on the computer (XP SP1 SP2 2003) ! `, g9 b) S7 w) } F
'
" h* t5 ^+ R7 {6 i' Made by zyling. 7 x3 _- e' U* k
'*************************************************************************** I: ~6 H4 U) Z+ e' l+ D1 e
" |/ [7 k" J4 d2 _# z7 f" bON ERROR RESUME NEXT
4 E; x4 [' Y W% I6 j: _5 U5 B7 c
/ d$ ^- H. {0 P+ NDim VOL_PROD_KEY
. h: x: [) ? Y( Y- n/ X rif Wscript.arguments.count<1 then , c! X3 L& \, d' Y
VOL_PROD_KEY=InputBox("使用说明(OEM版无效)："&vbCr&vbCr&"本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows的序列号，复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK)：","WindowsXP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ") ; f, }* J7 d$ h, N% u. F9 V
if VOL_PROD_KEY="" then
( b9 o: E! f5 W: |Wscript.quit . A0 d0 d9 [1 A8 S* m- O
end if
9 E. a& s; T% I) W2 F3 M, V; telse : m1 a" t: f- ^+ i: t
VOL_PROD_KEY = Wscript.arguments.Item(0)
- x) F# Y' H7 O: y2 s& m tend if
0 c' j8 V* I; }, V: v; a: W3 k4 U2 x! q( P# A3 n
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any ! ^8 j3 z- {! k* q
* y* t( N0 T- t" W* L
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation") : c( \3 Y/ k8 l* T& Z
1 z0 W, m! z7 M# @) ?! T/ V3 N- mresult = Obj.SetProductKey (VOL_PROD_KEY)
( t4 d' t+ W- Y% C8 j
# n S# ] R2 \& C! N/ g5 A( {7 ^if err = 0 then
4 S. w5 Y8 k7 H) y1 b LWscript.echo "您的 Windows CD-KEY 修改成功。请检查系统属性。" $ Y' [( C0 ]/ G7 N2 `0 u
end if 9 S! Z5 N1 _8 `2 b
" [9 o& u" Y5 H; I# Sif err <> 0 then
' {) I* K2 W2 M! u5 k0 p/ OWscript.echo "修改失败！请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。"
' T+ X% K1 y" |& e }9 O; QErr.Clear
, z, A$ E* c/ G D* E3 Z, Kend if - p( L3 a: E- X# U9 K: G
; C* a( n, V0 N: }Next |
|
发表于 2009-1-8 13:03
|