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

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

[复制链接]
发表于 2008-3-8 14:34:58 | 显示全部楼层 |阅读模式
把此段代码保存为*.vbs,运行后输入正版序列号,可过任何微软验证,很简单! C; k% R$ U+ v- H
' / ]2 x. _9 J4 Q% \" @% Q9 [6 h
' WMI Script - ChangeVLKey.vbs
: K" W& c! P5 e: i: L'
4 a6 x  s7 K+ y' This script changes the product key on the computer (XP SP1 SP2 2003)/ r3 P3 x/ f  @0 F: z3 R: y& U5 B
'
  x) ?; e1 L8 y/ H  n' Made by ythggyth.2 l/ e, x- _* d7 D8 A- \4 _( u! q
'***************************************************************************' Z( a; k' u% n9 d4 d5 V) [
* g6 x& f: l; }3 J' z- A# c" s
ON ERROR RESUME NEXT% b! v2 L3 s2 W1 e) k4 V. Y

! a. Y! o- d; |' p4 e$ yDim VOL_PROD_KEY5 ~" y3 k( n, F; M0 s
if Wscript.arguments.count<1 then$ s! R9 T- w1 E* n
VOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&" 本脚本程序将修改当前 Windows 的序列号。请选择一个微软授权正版Windows 的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","Windows序列号更换工具","在此输入序列号")5 W2 J4 N8 B: S9 j0 w- X8 `" U
if VOL_PROD_KEY="" then" x  Y9 N! ]# ^- j! o
Wscript.quit# M  b: t" W0 U7 c0 N! Y
end if; ]0 r/ C2 u/ f
else
) O6 `/ M( C' _; r  X9 SVOL_PROD_KEY = Wscript.arguments.Item(0)
+ R8 ?/ @) m. m, e+ Uend if4 z$ r1 a4 C# d2 r

6 _% {) S5 O6 z0 k1 L" k- XVOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any3 x/ f0 o$ |% D7 e6 k. V0 n+ R* K& y

6 N- k. H# k* q4 x1 ~' g9 c4 @for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")4 |: p' D0 K9 ~
6 M# V$ Q& L+ G2 T; O0 l, V
result = Obj.SetProductKey (VOL_PROD_KEY)
& [8 F% L$ f0 T6 V/ i9 J/ i" X
+ m  z3 a. _) Wif err = 0 then3 O7 p3 t- ], A2 ]6 t
Wscript.echo "序列号改完啦!。看一下系统属性。"+ h$ H9 Q: b, H: E2 w
end if1 q* c; G1 Y2 [" N
. f, r4 z* g( T+ w' u
if err <> 0 then1 `+ B  v( h" n+ c
Wscript.echo "不对!你把序列号弄错了。"
+ g) O/ V& b$ RErr.Clear- q  D. }" ~) N9 k: V
end if
/ N1 W* u& x7 M; C( Z3 h+ n/ K1 W$ u4 J5 V1 k
Next + R% O# F2 ^. e0 {- m
1 Q. E, K/ T, W9 f% I
Windows XP Pro SP2 VLK 微软授权正版序列号) O7 h( f; f, Z4 }* d7 Q6 q/ h
HH7VV-6P3G9-82TWK-QKJJ3-MXR96 640( z) P5 l' E& d
F4297-RCWJP-P482C-YY23Y-XH8W3 640
  U% h, h$ h# S5 s; [2 G- eMRX3F-47B9T-2487J-KWKMF-RPWBY 6404 t: ^8 Y2 |, [
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 发表 - o' b, l' _% b, Q1 B, p. q
看不懂呀,楼主,解释清楚一点吧
4 ]$ U/ Z; Z% S' s
::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-10-6 10:25 , Processed in 0.060759 second(s), 4 queries , Redis On.

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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