首先,新建个文本
文件,输入下面这些:
. O9 o+ f7 n4 U# H+ @
ON ERROR RESUME NEXT
7 q% q( N4 U7 D. Y- `; lDim VOL_PROD_KEY
- q9 O5 [% \0 o9 I7 }' u5 r2 B
if Wscript.arguments.count<1 then
/ J/ e& |' y. ^VOL_PROD_KEY=InputBox(&
quot;Powered By
diy'''''''er"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过
微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK):","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
. J; Z" {* y) Z) {, Z# u
if VOL_PROD_KEY="" then
, T2 q! j2 \- S @: l/ BWscript.quit
4 P; \; f* }1 A1 o6 \5 \0 A
end if
% l- _$ C4 D' {* V+ O2 y1 W' Z" P
else
; c" L. g7 m' j7 D
VOL_PROD_KEY = Wscript.arguments.Item(0)
8 B, X/ F F6 F
end if
1 W1 T+ Z5 F# ?& Y0 {0 ? D! \0 A
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
5 b* s5 \9 G6 K# U2 M
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_Windows
ProductActivation")
& h4 e6 D. r% o7 gresult = Obj.SetProductKey (VOL_PROD_KEY)
) e; G! d6 S! Q2 x2 B- v! I8 R5 u
if err = 0 then
6 Y* G8 v$ ~. E3 W
Wscript.echo "OK!去微软验证吧!"
# \9 }8 \0 ~, C) }- Uend if
! U! @: h* `8 d/ Z' v# |) p1 s
if err <> 0 then
) f1 H6 s, s$ Y% t' ~Wscript.echo "替换失败!输入的 CD-KEY 与当前的版本不匹配。"
1 o6 k- w: C- F u1 V2 pErr.Clear
5 O9 Z3 s; U) A/ k
end if
( J, z) ~* A) J& _) Z* p6 P, m5 bNext
' R {7 E. \9 z, \6 V
, r7 q+ s# L0 p
然后将以上文本保存为key.vbs 双击执行即可 通过XP验证
! P# n6 U3 F7 e$ n5 }5 E2 y呵呵,你就可以体验你的正版XP了!!!如果想装IE7,绝对没问题
" K7 q$ }" t6 U0 q+ ]8 U3 T ?听说可以。。大家试试。。