admin管理员组

文章数量:1530921

2024年4月22日发(作者：)

if exist "%ProgramFiles(x86)%Microsoft " set

_Office16Path=%ProgramFiles(x86)%Microsoft OfficeOffice16

if DEFINED _Office16Path (echo.&echo 已发现 Office2016

call :ActOffice 16 Office2016

) else (echo.&echo 未发现 Office2016)

echo.&pause

exit

:ActOffice

if DEFINED _Office%1Path (

cd /d "!_Office%1Path!"

if %1 EQU 16 call :Licens16

echo.&echo 尝试激活 %2 ...&echo.

cscript //nologo /sethst: >nul

cscript //nologo /act | find /i "successful" && (

echo.&echo ***** %2 激活成功 ***** & echo.) || (echo.&echo ***** %2 激活失败 ***** & echo.)

)

cd /d "%~dp0"

goto :EOF

:GetOfficePath

echo.&echo 正在检测 %2 系列产品的安装路径...

set _Office%1Path=

set _Reg32=HKEY_LOCAL_MACHINESOFTWAREMicrosoftOffice%1.0CommonInstallRoot

set

_Reg64=HKEY_LOCAL_MACHINESOFTWAREWow6432NodeMicrosoftOffice%1.0CommonInstallRoot

reg query "%_Reg32%" /v "Path" > nul 2>&1 && FOR /F "tokens=2*" %%a IN ('reg query "%_Reg32%" /v

"Path"') do SET "_OfficePath1=%%b"

reg query "%_Reg64%" /v "Path" > nul 2>&1 && FOR /F "tokens=2*" %%a IN ('reg query "%_Reg64%" /v

"Path"') do SET "_OfficePath2=%%b"

if DEFINED _OfficePath1 (if exist "%_OfficePath1%" set _Office%1Path=!_OfficePath1!)

if DEFINED _OfficePath2 (if exist "%_OfficePath2%" set _Office%1Path=!_OfficePath2!)

set _OfficePath1=

set _OfficePath2=

if DEFINED _Office%1Path (echo.&echo 已发现 %2) else (echo.&echo 未发现 %2)

goto :EOF

:Licens16

本文标签： 路径服务器系列产品搭建安装

版权声明：本文标题：搭建自己的KMS服务器 内容由热心网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：https://m.elefans.com/xitong/1713780339a370896.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。