Untitled
raw download clone
TEXT
views 10
,
size 570 b
if exist "%ProgramFiles%\Microsoft Office\Office16\ospp.vbs" (cd "%ProgramFiles%\Microsoft Office\Office16")
if exist "%ProgramFiles(x86)%\Microsoft Office\Office16\ospp.vbs" (cd "%ProgramFiles(x86)%\Microsoft Office\Office16")
for /f "tokens=8" %b in ('cscript ospp.vbs /dstatus ^| findstr /b /c:"Last 5"') do (cscript ospp.vbs /unpkey:%b)
for /f %i in ('dir /b ..\root\Licenses16\ProPlus2019VL_MAK*.xrm-ms') do cscript ospp.vbs /inslic:"..\root\Licenses16\%i"
cscript OSPP.VBS /inpkey:CBMPF-4GNY8-JX6KV-CBRGH-T3C63
cscript OSPP.VBS /act
cscript OSPP.VBS /dstatus
close fullscreen
Login or Register to edit or fork this paste. It's free.