找回密码
 加入华同
搜索
黄金广告位联系EMAIL:[email protected] 黄金广告[email protected]
查看: 1621|回复: 8

输入正版序列号让你的系统成为正版

[复制链接]
发表于 2008-3-8 14:34:58 | 显示全部楼层 |阅读模式
把此段代码保存为*.vbs,运行后输入正版序列号,可过任何微软验证,很简单6 z; A, I, ?4 @2 k# d
' & s' ~8 o1 j% T4 T7 B
' WMI Script - ChangeVLKey.vbs1 C, r) |, p) V9 o; M% |- X$ F4 C8 [
'
+ q+ G2 u0 M+ y- F2 \. ?& }, f7 M' This script changes the product key on the computer (XP SP1 SP2 2003)
0 J: V! r1 v/ ~* J+ T" i'
4 b) a/ T4 p' j# I+ z- k0 ^' Made by ythggyth.
; ]# ?8 R8 D+ C'***************************************************************************
( a9 p: ?& S; L' D- ?
" t, q7 X8 G) w/ Q8 M8 ~ON ERROR RESUME NEXT
& E4 V  M& ~* }9 s$ H7 v2 s! N/ ]/ n/ ]  q
Dim VOL_PROD_KEY
' x* `5 ^* }( ]* K+ L; U" _if Wscript.arguments.count<1 then. J+ u0 R$ v" c) u
VOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&" 本脚本程序将修改当前 Windows 的序列号。请选择一个微软授权正版Windows 的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","Windows序列号更换工具","在此输入序列号")
* _9 m/ b' g% Y  R/ yif VOL_PROD_KEY="" then
$ D& W5 @( ^+ r7 M5 P( f; v8 Z3 OWscript.quit' h  h6 I. j: e  l
end if+ ~* L& L6 G% K1 L# c
else- m& R0 |) G  R% `5 n
VOL_PROD_KEY = Wscript.arguments.Item(0)- a% B0 L6 l" n- }9 ~
end if& _9 E' F" J% l! c0 q
2 ]7 k$ m4 w- P* C. f  V
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any4 W0 n$ v" d, N
+ b5 w3 H9 U& U( Q
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")$ J3 Y7 K. |9 {: v8 ~- D1 o

3 P5 U! V( C; I8 N2 ^! l& Dresult = Obj.SetProductKey (VOL_PROD_KEY); I. Y( u1 ~2 ^, R1 d( L7 w$ |
. i: E8 U/ u9 \  B
if err = 0 then" o2 `% P5 \  X9 k  E
Wscript.echo "序列号改完啦!。看一下系统属性。"9 h& C4 L% w+ K
end if9 D: z7 t9 Y/ d8 @$ q6 P

- T+ a2 n. V9 ?- R$ n; iif err <> 0 then
1 g  p& C( Z! _7 nWscript.echo "不对!你把序列号弄错了。"2 P+ Y6 \9 }0 l: m& Q
Err.Clear
' l" ^3 N* A) Z) M9 Wend if% h6 v  }& D! I# }6 g- }

$ O  D/ `3 R; r7 D- xNext ( \+ E& ^! D) o  C$ E
1 N/ W& U. W% U+ m" n9 t6 Q, ]+ {: W
Windows XP Pro SP2 VLK 微软授权正版序列号
7 O  B  B3 g9 S+ d" E& tHH7VV-6P3G9-82TWK-QKJJ3-MXR96 640
' A6 o: o% J3 Y, M1 {- wF4297-RCWJP-P482C-YY23Y-XH8W3 640
4 R: g5 u. P) s% n8 `MRX3F-47B9T-2487J-KWKMF-RPWBY 6407 C  I1 X" C- Z0 A; x
QC986-27D34-6M3TY-JJXP9-TBGMD 640
发表于 2008-3-9 06:12:48 | 显示全部楼层
还是不懂,说清楚点啊.
回复

使用道具 举报

发表于 2008-3-12 19:52:28 | 显示全部楼层
看不懂呀,楼主,解释清楚一点吧
回复

使用道具 举报

发表于 2008-3-13 16:08:39 | 显示全部楼层
原帖由 宇宙星空 于 2008-3-12 19:52 发表
. B, Q% Q  ~6 G/ c5 Y" b看不懂呀,楼主,解释清楚一点吧
% V5 A9 a: P: i) ^( ]
::70::
回复

使用道具 举报

发表于 2008-3-15 19:53:32 | 显示全部楼层
直接下个序列号更改器比这个方便
回复

使用道具 举报

发表于 2008-3-20 23:19:18 | 显示全部楼层
我看不懂啊,我是说是盗版的还真是郁闷啊
回复

使用道具 举报

发表于 2008-4-7 10:09:56 | 显示全部楼层
有没有用,顶一下吧。
回复

使用道具 举报

发表于 2008-4-7 20:42:29 | 显示全部楼层
试验过了,不灵啊,
回复

使用道具 举报

发表于 2008-5-29 02:16:54 | 显示全部楼层
真是不明白,你这个vbs脚本用什么运行啊?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 加入华同

本版积分规则

Archiver|手机版|小黑屋|华人同志

GMT+8, 2025-2-24 21:35 , Processed in 0.099093 second(s), 6 queries , Redis On.

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表