骨头版win10中office无法激活如何处理？ - 无忧启动论坛

::关闭回显 & 定义标题
@echo off & title MS-Office 2016/2019 线上KMS服务器激活
::从注册表获取安装路径
for /f "tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (
set "_msi16=%%b"
)
for /f "tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Wow6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path" 2^>nul') do (
set "_msi16wow=%%b"
)
for /f "tokens=2*" %%a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" 2^>nul') do (
set "_ctr16=%%b\Office16"
)
::验证路径是否正确，是则继续，否则提示未找到安装目录
if exist "%_msi16%\OSPP.VBS" (
cd /d %_msi16%
) else if exist "%_msi16wow%\OSPP.VBS" (
cd /d %_msi16wow%
) else if exist "%_ctr16%\OSPP.VBS" (
cd /d %_ctr16%
) else if exist "%ProgramFiles%\Microsoft Office\Office16\OSPP.VBS" (
cd /d "%ProgramFiles%\Microsoft Office\Office16"
) else if exist "%ProgramFiles(x86)%\Microsoft Office\Office16\OSPP.VBS" (
cd /d "%ProgramFiles(x86)%\Microsoft Office\Office16"
) else (
echo.未找到 Microsoft Office 2016
echo.请按任意键退出。。。
pause>nul & exit
)
::安装 Microsoft Office 2016 Professional Plus KMS/MAK 许可证及 GVLK
echo.正在安装 KMS 许可证...
for /f %%x in ('dir /b ..\root\Licenses16\ProPlus2019VL_KMS*.xrm-ms') do Cscript /nologo OSPP.VBS /inslic:"..\root\Licenses16\%%x" >nul
echo.正在安装 MAK 许可证...
for /f %%x in ('dir /b ..\root\Licenses16\ProPlus2019VL_MAK*.xrm-ms') do Cscript /nologo OSPP.VBS /inslic:"..\root\Licenses16\%%x" >nul
echo.正在导入 KMS GVLK
Cscript /nologo OSPP.VBS /inpkey:XQNVK-8JYDB-WJ9W3-YJ8YR-WFG99 >nul
)
::设置KMS服务器并激活
cscript //Nologo OSPP.VBS /sethst:kms.03k.org
cscript //nologo OSPP.VBS /act

复制代码