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

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

[复制链接]
发表于 2008-3-8 14:34:58 | 显示全部楼层 |阅读模式
把此段代码保存为*.vbs,运行后输入正版序列号,可过任何微软验证,很简单
  S5 n" g9 G% R6 K0 n( o) u0 L; N' 0 `* K) p1 W( T) B
' WMI Script - ChangeVLKey.vbs
; O3 N9 _( w9 _% \3 U( P2 {. ?'4 d% i+ }6 {6 W2 S/ N  y' ?
' This script changes the product key on the computer (XP SP1 SP2 2003)
6 ]! x3 y  ~% ~* W. ]'
; X) p! z3 @: N7 t: S+ Y" \' Made by ythggyth.( p; l/ Q& O( {1 S" ~. e
'***************************************************************************4 S8 l0 b5 k- @# O/ G* F
  n2 n* F  V6 f$ R
ON ERROR RESUME NEXT6 x  ]5 B7 C/ ]! Z. w
* @7 _( i2 n; K1 [3 B8 D7 k% k( f
Dim VOL_PROD_KEY7 ~, @' v  u  U" F& F& z( I% J7 z3 a  f
if Wscript.arguments.count<1 then. J  ]! Q+ j+ L+ _% ~
VOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&" 本脚本程序将修改当前 Windows 的序列号。请选择一个微软授权正版Windows 的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","Windows序列号更换工具","在此输入序列号")3 w$ I# C& M( ?4 G# u
if VOL_PROD_KEY="" then
7 W, M: I- Q8 w( M7 }% }3 m5 q! w0 v' WWscript.quit3 z/ r& `7 e$ s2 f. ^* h- a2 n  y
end if
! L3 G. n' `1 b* b0 `: h4 Melse
* _) G0 t9 N0 c6 D9 yVOL_PROD_KEY = Wscript.arguments.Item(0)/ q) H7 V5 W3 ]. v2 q8 ~6 I; V5 w$ N
end if$ ^0 D" e" {- c: {; w* B% [
5 J% L3 N8 O- i) [- F
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any" G1 l( z6 G* N7 u1 J) B
# }" Q+ O0 `# D
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
* m. u8 F$ {, \1 @+ i9 r
5 _: E( @" ^, ^% L) g) U" presult = Obj.SetProductKey (VOL_PROD_KEY)
$ D/ ~, [2 V* g; W3 {. q) v$ _' B/ H& M! U# _" d. K0 z3 S
if err = 0 then
1 W9 I/ U( D  V: a! [Wscript.echo "序列号改完啦!。看一下系统属性。"
. _3 {( e, W# h8 }2 r2 ^, gend if
+ Z1 o) L2 d- E9 M! T) X4 v& ^1 F5 y5 P( ]: P
if err <> 0 then6 B+ g2 f; n2 Z$ H( u
Wscript.echo "不对!你把序列号弄错了。". v. v; W7 l' a) ?
Err.Clear
9 r" P) x8 s' y+ tend if& O4 x1 e9 f0 M

! ~  A, X  P' a$ e1 xNext 4 v5 @" F# b: [+ F

# ~- d8 ~+ H: e6 ?7 ZWindows XP Pro SP2 VLK 微软授权正版序列号
' r- p: i) [$ Y) A1 jHH7VV-6P3G9-82TWK-QKJJ3-MXR96 6403 T4 Z- K& b) z$ K- s
F4297-RCWJP-P482C-YY23Y-XH8W3 640! ?; E) B% x2 T* e& q$ K, q/ S
MRX3F-47B9T-2487J-KWKMF-RPWBY 640+ ?% ]$ `7 d: [* o% P
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 发表 # G. u5 X# E( D+ H* @: I8 n4 w0 j2 x
看不懂呀,楼主,解释清楚一点吧
) [" d3 b& J- o
::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-6-28 22:16 , Processed in 0.512237 second(s), 4 queries , Redis On.

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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