@ECHO OFF
Set KMS=127.0.0.2
Set CustomPath1=
Set CustomPath2=

cls
title Initial Office Activation using KMS %KMS%
color 1F

If Not Exist "%ProgramFiles(x86)%\Microsoft Office\Office14\OSPP.vbs" Goto :Test2
Set Of_Name=Office 2010
Set Of_Path=%ProgramFiles(x86)%\Microsoft Office\Office14
Call :OF_Activate

:Test2
If Not Exist "%ProgramFiles%\Microsoft Office\Office14\OSPP.vbs" Goto :Test3
Set Of_Name=Office 2010
Set Of_Path=%ProgramFiles%\Microsoft Office\Office14
Call :OF_Activate

:Test3
If Not Exist "%ProgramFiles(x86)%\Microsoft Office\Office15\OSPP.vbs" Goto :Test4
Set Of_Name=Office 2013
Set Of_Path=%ProgramFiles(x86)%\Microsoft Office\Office15
Call :OF_Activate

:Test4
If Not Exist "%ProgramFiles%\Microsoft Office\Office15\OSPP.vbs" Goto :Test5
Set Of_Name=Office 2013
Set Of_Path=%ProgramFiles%\Microsoft Office\Office15
Call :OF_Activate

:Test5
If Not DEFINED CustomPath1 goto :Test6
If NOT Exist "%CustomPath1%\OSPP.vbs" Goto :Test6
Set Of_Name=Office Custom 1
Set Of_Path=%CustomPath1%
Call :OF_Activate

:Test6
If Not DEFINED CustomPath2 goto :TheEnd
If NOT Exist "%CustomPath2%\OSPP.vbs" Goto :TheEnd
Set Of_Name=Office Custom 2
Set Of_Path=%CustomPath2%
Call :OF_Activate

:TheEnd
Pause
goto :EOF

:OF_Activate
  echo - Activating %Of_Name% (%Of_Path%)
  ipconfig /flushdns>>nul
  timeout 2>>nul
  cscript "%Of_Path%\OSPP.vbs" /remhst>>nul
  timeout 2>>nul
  echo -- Set KMS Server Address
  cscript "%Of_Path%\OSPP.vbs" /sethst:%KMS%
  echo -- Activating
  cscript "%Of_Path%\OSPP.vbs" /act
goto :EOF