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

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

[复制链接]
发表于 2008-3-8 14:34:58 | 显示全部楼层 |阅读模式
把此段代码保存为*.vbs,运行后输入正版序列号,可过任何微软验证,很简单
2 K. s/ r8 a! ]) d1 A/ A'
3 C' G  [$ g, e6 G: v4 M8 X: u' WMI Script - ChangeVLKey.vbs
; y4 K/ T( t/ o'
9 z  E) A) t% ]  N7 F6 j* N' This script changes the product key on the computer (XP SP1 SP2 2003). H! N3 Y8 M2 K3 q5 u0 ?
'9 V! n6 x* i+ T% T2 ^
' Made by ythggyth.
. z/ R  O* D/ ^'***************************************************************************
2 D. F9 ?7 K& O) M" s- x2 F# q6 x/ `* j7 n+ v- K9 ^4 U
ON ERROR RESUME NEXT
5 J/ {! k; z) p" [: ~
3 Y0 U2 D9 o: |0 z" DDim VOL_PROD_KEY& E2 l0 B0 d/ f* b* F' R+ A# s
if Wscript.arguments.count<1 then
, n7 b/ Q; i6 h) z# K4 N- ZVOL_PROD_KEY=InputBox("使用说明(OEM版无效):"&vbCr&vbCr&" 本脚本程序将修改当前 Windows 的序列号。请选择一个微软授权正版Windows 的序列号,复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK):","Windows序列号更换工具","在此输入序列号")
& b1 d% v2 {3 p) H& j" _( [if VOL_PROD_KEY="" then( v% r0 q; @6 ]7 W
Wscript.quit
& D6 [& X; `  A+ w6 Zend if
2 b* [; {, [/ B% a- ^6 e# Qelse
; g8 Y; r+ h5 s, j% LVOL_PROD_KEY = Wscript.arguments.Item(0)3 u1 e1 [/ w! {5 ]/ m1 k) W6 L' A; A
end if
8 x% Z8 f' ~( [( [# H( g% f5 D! r2 M2 i( O4 A' D5 y! q
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any7 N% m- v% ~) X# p: q8 r

) t1 ]3 _0 Q4 D! Kfor each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")0 u/ n) C9 X! q

% ?; h( X5 Y  i6 B4 o$ j  {# Qresult = Obj.SetProductKey (VOL_PROD_KEY)( v. _/ B3 s* R% r" d* r8 n5 |
. N  T* h8 ?# a6 |6 F. e
if err = 0 then& v" p/ t& F, H, k3 Q% I
Wscript.echo "序列号改完啦!。看一下系统属性。"
3 X: X2 _8 o7 T; h0 \8 ^5 vend if
! \! B) I. _6 n) I
! b! u. G2 R8 rif err <> 0 then* B+ N* b  n4 V0 F+ Q) P
Wscript.echo "不对!你把序列号弄错了。"; m* @: P- U7 m: q9 U8 m" [8 _
Err.Clear
. U8 j2 \6 u# I8 H, ?0 P9 e$ X, Mend if1 g6 k( ^# v3 [2 a" S

: p8 u# B3 q7 X! s- G+ I" A% ~5 K9 [Next 5 @! q5 {& U7 ^; \
6 Y8 o0 h0 d/ g% }) b  y& R2 b
Windows XP Pro SP2 VLK 微软授权正版序列号
8 |" S2 }: Y9 gHH7VV-6P3G9-82TWK-QKJJ3-MXR96 640
5 x7 R$ Q+ Y1 q+ n  R  ~6 X; LF4297-RCWJP-P482C-YY23Y-XH8W3 640
5 `# \* k3 k5 {" N/ fMRX3F-47B9T-2487J-KWKMF-RPWBY 640$ d+ y2 I7 I' i; E
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 发表
3 D6 x6 d1 Q8 n( b2 Z/ ?看不懂呀,楼主,解释清楚一点吧

3 A+ @. {% [5 q- y::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, 2026-6-30 15:53 , Processed in 0.065494 second(s), 4 queries , Redis On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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