Windows XP/2003 序列号更换工具 开始下载
- 软件等级:
- 软件大小: 0KB
- 软件语言: 简体中文
- 软件类别: | 免费版 | 系统其它
- 运行环境: Win9x/NT/2000/XP/
- 整理时间: 2006-5-17 8:14:01
- 相关链接:
- 推荐下载: 电信网通高速下载FireFox
- 插件情况:
- 该软件经过四种杀毒软件检测，结果如下:
- 卡巴检测: 安全 瑞星检测: 安全 江民检测: 安全 麦咖啡检测: 安全
Windows XP/2003 序列号更换工具 简介
本程序由脚本命令编写而成。
引用了MS官方提供的修改 CD-KEY 的脚本，自己修改加入对话框方便使用。
经测试，可以修改 XP、XPSP1、XPSP2、2003 的 CD-KEY （零售版、VOL版），修改后立即生效无须重新启动。
由于修改自 MS 官方的脚本，因此是绝对安全的。
感兴趣的可以研究一下。
将以下源代码另存为“Windows序列号修改.VBS”，双击这个文件即可
源代码：
'
' WMI Script - ChangeVLKey.vbs
'
' This script changes the product key on the computer (XP SP1 SP2 2003)
'
' Made by zyling.
'***************************************************************************
ON ERROR RESUME NEXT
Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("使用说明(OEM版无效)："&vbCr&vbCr&" 本脚本程序将修改当前 Windows 的序列号。请先使用算号器算出匹配当前 Windows 的序列号，复制并粘贴到下面空格中。"&vbCr&vbCr&"输入序列号(默认为 XP VLK)：","Windows XP/2003 序列号更换工具","PJVCV-XCPPF-6GTKK-QXRPY-FBKGJ")
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 "您的 Windows CD-KEY 修改成功。请检查系统属性。"
end if
if err <> 0 then
Wscript.echo "修改失败！请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。"
Err.Clear
end if
Next
下载地址列表
下载说明
- 如果您发现该软件不能下载，请通知管理员.
- 为了保证您快速的下载速度，我们推荐您使用[网际快车]等专业工具下载.
- 为确保下载的软件能正常使用，请使用[WinRAR v3.62]或以上版本解压本站软件,如需解压密码请查看压缩包注释.
- 站内左右软件版权归作者所有,下载后请在24小时内删除,如侵犯您的版权请与我们联系,我们会尽快改正.