热门标签 | HotTags
当前位置:  开发笔记 > 编程语言 > 正文

如何在IE7中安装序列号以激活Windows系统

本文介绍了如何使用VBScript脚本在IE7上安装Windows序列号的方法。对于使用超级解霸的用户,如果遇到.vbs文件无法正常运行的问题,文中也提供了相应的解决办法。

为了在 IE7 上安装 Windows 序列号,您可以按照以下步骤操作:

1. 将以下代码复制并粘贴到记事本中,保存为 key.vbs

2. 双击运行 key.vbs 文件。如果您使用的是超级解霸,可能会发现双击 .vbs 文件会启动解霸播放器,这是因为解霸更改了 .vbs 文件的默认打开方式。解决方法是在注册表中找到 HKEY_CLASSES_ROOT\.vbs,将默认值更改为 VBSFile

ON ERROR RESUME NEXT
Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY = InputBox("Powered By Cat's Eye" & 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, "-", "") ' 去除可能存在的连字符
for each Obj in GetObject("winmgmts:{impersOnationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
result = Obj.SetProductKey (VOL_PROD_KEY)
if err = 0 then
Wscript.echo "成功!请前往微软验证。"
end if
if err <> 0 then
Wscript.echo "替换失败!输入的 CD-KEY 与当前版本不匹配。"
Err.Clear
end if
Next

以上脚本将提示您输入 Windows 序列号,并尝试将其应用于当前系统。如果成功,脚本将显示“成功!请前往微软验证。” 如果失败,将显示“替换失败!输入的 CD-KEY 与当前版本不匹配。”


推荐阅读
author-avatar
moTzxx
这个家伙很懒,什么也没留下!
PHP1.CN | 中国最专业的PHP中文社区 | DevBox开发工具箱 | json解析格式化 |PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具 | 在线工具
Copyright © 1998 - 2020 PHP1.CN. All Rights Reserved | 京公网安备 11010802041100号 | 京ICP备19059560号-4 | PHP1.CN 第一PHP社区 版权所有