Office 2019/2016 安装ID 提取
Office 2019/2016 安装ID 提取，支持同时提取 office、project、visio三组安装ID@echo off
setlocal enabledelayedexpansion
echo Office INSTID:
@echo.Office INSTID:>"%~dp0Office INSTID.txt"
for /f "skip=1 tokens=6,8 delims=: " %%i in ('cscript "C:\Program Files\Microsoft Office\Office16\ospp.vbs" /dinstid') do (
set c10=%%i
set c0=%%j
set c1=!c0:~0,7!
set c2=!c0:~7,7!
set c3=!c0:~14,7!
set c4=!c0:~21,7!
set c5=!c0:~28,7!
set c6=!c0:~35,7!
set c7=!c0:~42,7!
set c8=!c0:~49,7!
set c9=!c0:~56,7!
echo !c10!:
echo !c1!-!c2!-!c3!-!c4!-!c5!-!c6!-!c7!-!c8!-!c9!
@echo.!c10!:>>"%~dp0Office INSTID.txt"
@echo.!c1!-!c2!-!c3!-!c4!-!c5!-!c6!-!c7!-!c8!-!c9!>>"%~dp0Office INSTID.txt"
)
pause
start notepad "%~dp0Office INSTID.txt"
以上内容保存为批处理文件即可
页:
[1]