豪华阵容的IE 1.7，不知趣的我，竟然不习惯

vbvs · 发表于 2007 年 1 月 19 日 22:51:33

原帖由 hongmei 于 2007-1-19 22:43 发表

其实只要改个序列号就可以通过验证了,用那个工行的序列号!
MRX3F-47B9T-2487J-KWKMF-RPWBY

晕、
这个序列号在哪一步输入

254432 · 发表于 2007 年 1 月 19 日 22:54:02

偶用上海政府VOL版竟然能通过正版验证..........

[ 本帖最后由 254432 于 2007-1-19 23:00 编辑 ]

iyaner · 发表于 2007 年 1 月 19 日 22:54:38

找个winxp序列号替换工具！

不是叫你输入……

hongmei · 发表于 2007 年 1 月 19 日 22:59:19

ON ERROR RESUME NEXT
Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("VBVS"&vbCr&vbCr&" 本程序将自动替换你当前 Windows 的序列号,通过微软验证完全正版。"&vbCr&vbCr&"序列号(OEM版无效,默认版本为 XP VLK)：","Windows XP序列号自动更换器","MRX3F-47B9T-2487J-KWKMF-RPWBY")
if VOL_PROD_KEY="" then
Wscript.quit
end if
else
VOL_PROD_KEY = Wscript.arguments.Item(0)
end if
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") 'remove hyphens if any
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
result = Obj.SetProductKey (VOL_PROD_KEY)
if err = 0 then
Wscript.echo "OK!去微软验证吧GOGOGO~."
end if
if err <> 0 then
Wscript.echo "替换失败！输入的 CD-KEY 与当前的版本不匹配。"
Err.Clear
end if
Next

复制代码

保存为不良倾向不良倾向x.vbs

hongmei · 发表于 2007 年 1 月 19 日 23:00:21

保存好双击确定....

上面的 4 5个X 怎么变不良倾向不良倾向

vbvs · 发表于 2007 年 1 月 19 日 23:23:16

一共要多少个X

elfzero · 发表于 2007 年 1 月 19 日 23:29:11

= =
還是把那個改名叫 [系統屏蔽]比較好。。。

我用op

hongmei · 发表于 2007 年 1 月 19 日 23:37:30

原帖由 vbvs 于 2007-1-19 23:23 发表
一共要多少个X

文件名,随便了..

vbvs · 发表于 2007 年 1 月 19 日 23:40:23

怎么我按照你说的去操作
双击提示错误呢

iyaner · 发表于 2007 年 1 月 19 日 23:46:37

估计你的机子只认x x x x x x x x.vbvs

认不得x x x x x x x x.vbs

账号		自动登录	找回密码
密码			注册

回复 #11 vbvs 的帖子