I post in this thread from time to time [HOW-TO/DISCUSSION] Microsoft Office Visual Refresh. As I mentioned there, the list is not redundant due to the difficulties of obtaining it. It is necessary to examine Microsoft 365 (office) files, considering that some data is written in a simplified form. For this reason, I found the specified parameter only when publishing a message, and not when periodically viewing program logs (not all parameters are written there).
Is there an equivalent of the old Professional (not Plus)? Because there are Project Std and Visio Std, but only Professional Plus (in 2024)
How to ADD PUBLISHER 2021 LTSC to OFFICE LTSC 2024 PRO PLUS Install ??? Spoiler I Installed - Publisher2021Retail.img Then Installed - ProPlus2024Retail.img Then Ran - KMS_VL_ALL-52u.7z AutoRenewal-Setup.cmd (ADMIN Mode - Once) Activate.cmd (ADMIN Mode) Check-Activation-Status.cmd (ADMIN Mode) ALL the ProPlus2024 Apps are Activated and work Fine. The Publisher2021 App Requests a 25-Digit Key. Looks like the KMS script only targeted the 2024 version. M$ has Decided to NOT include Publisher in the 2024 build. It's a decent App which I'd still like to use. Any Ideas, Suggestions, or Workarounds ? If someone's already answered the question, plz point me in the right direction. Thanks to All the Folks @ MDL. >> Next LeVeL <<
I'm using LTSC 2024 Professional Plus Preview. Anyone know how to fix "something went wrong while downloading your template" error (for example PowerQuery tutorial in Excel)?
@abbodi1406 REF: How to ADD PUBLISHER 2021 LTSC to OFFICE LTSC 2024 PRO PLUS Install ??? [Post #1] [Post #2] Should have tested PasteBin, my bad. Hastebin being temperamental as well, oh well. Here is the DEBUG Log, Code: >if 1 EQU 1 (if defined _args echo /d ) /d >set "_wApp=55c92734-d682-4d71-983e-d6ec3f16059f" >set "_oApp=0ff1ce15-a989-479d-af46-f275c6370663" >set "_oA14=59a52881-a989-479d-af46-f275c6370663" >set "IFEO=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options" >set "OPPk=SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" >set "SPPk=SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" >set _Hook="C:\WINDOWS\System32\SppExtComObjHook.dll" >set _Hops=C:\WINDOWS\System32\SppExtComObjHook.dll >set "_TaskEx=\Microsoft\Windows\SoftwareProtectionPlatform\SvcTrigger" >set SSppHook=0 >for /F %A in ('dir /b /ad C:\WINDOWS\System32\spp\tokens\skus') do ( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\%A\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\%A\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\%A\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\csvlk-pack\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\csvlk-pack\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\csvlk-pack\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Education\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Education\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Education\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Enterprise\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Enterprise\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Enterprise\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\IoTEnterprise\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\IoTEnterprise\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\IoTEnterprise\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Professional\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Professional\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Professional\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalCountrySpecific\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalCountrySpecific\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalCountrySpecific\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalEducation\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalEducation\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalEducation\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalSingleLanguage\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalSingleLanguage\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalSingleLanguage\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalWorkstation\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalWorkstation\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ProfessionalWorkstation\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >( if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ServerRdsh\*GVLK*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ServerRdsh\*VLKMS*.xrm-ms" set SSppHook=1 if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\ServerRdsh\*VL-BYPASS*.xrm-ms" set SSppHook=1 ) >set OsppHook=1 >sc query osppsvc [SC] EnumQueryServicesStatus:OpenService FAILED 1060: The specified service does not exist as an installed service. >if 1060 EQU 1060 set OsppHook=0 >if 19045 LSS 9200 (set "sppxtra=C:\WINDOWS\System32\spp\tokens\channels" ) else (set "sppxtra=C:\WINDOWS\System32\spp\tokens\addons" ) >set ESU_KMS=0 >set isAddon=0 >for /F %A in ('dir /b /ad C:\WINDOWS\System32\spp\tokens\addons ') do ( if 19045 LSS 9200 ( if exist "C:\WINDOWS\System32\spp\tokens\addons\%A\*ESU-*-VL-BYPASS*.xrm-ms" set ESU_KMS=1 if exist "C:\WINDOWS\System32\spp\tokens\addons\%A\*VL-DMAK*.xrm-ms" set isAddon=1 ) if 19045 GEQ 9200 ( if exist "C:\WINDOWS\System32\spp\tokens\addons\%A\*ESU-*-GVLK*.xrm-ms" set ESU_KMS=1 if exist "C:\WINDOWS\System32\spp\tokens\addons\%A\*Volume-MAK*.xrm-ms" set isAddon=1 ) ) File Not Found >if 0 EQU 1 set isAddon=1 >if 0 EQU 1 (set "adoff=and LicenseDependsOn is NULL" & set "adonn=and LicenseDependsOn is not NULL" ) else (set "adoff=" & set "adonn=" ) >set ESU_EDT=0 >if 0 EQU 1 for %A in (Enterprise EnterpriseN Professional ProfessionalN) do ( if 19045 LSS 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\Security-SPP-Component-SKU-%A\*.xrm-ms" set ESU_EDT=1 if 19045 GEQ 9200 if exist "C:\WINDOWS\System32\spp\tokens\skus\%A\*.xrm-ms" set ESU_EDT=1 ) >set ESU_ADD=0 >if 19045 GEQ 9200 ( set OSType=Win8 set SppVer=SppExtComObj.exe ) else if 19045 GEQ 7600 ( set OSType=Win7 set SppVer=sppsvc.exe ) else (goto :UnsupportedVersion ) >if Win8 EQU Win8 reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\sppsvc.exe" && ( reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\sppsvc.exe" /f call :StopService sppsvc ) ERROR: The system was unable to find the specified registry key or value. >call :subOffice >set kNext=HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext >set sub_next=0 >set sub_o365=0 >set sub_proj=0 >set sub_vsio=0 >set _Identity=0 >dir /b /s /a:-d "!_Local!\Microsoft\Office\Licenses\*" && (set _Identity=1 & set sub_next=1 ) The system cannot find the file specified. >dir /b /s /a:-d "!ProgramData!\Microsoft\Office\Licenses\*" && (set _Identity=1 & set sub_next=1 ) The system cannot find the file specified. >if 0 EQU 0 call :officeSub >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext || exit /b HKEY_CURRENT_USER\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext\502e52d49b3e55f8 >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r ".*retail" | findstr /i /v "project visio" | find /i "0x2" && (set sub_o365=1 ) >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r ".*retail" | findstr /i /v "project visio" | find /i "0x3" && (set sub_o365=1 ) >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r ".*volume" | findstr /i /v "project visio" | find /i "0x2" && (set sub_o365=1 ) >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r ".*volume" | findstr /i /v "project visio" | find /i "0x3" && (set sub_o365=1 ) >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r "project.*" | find /i "0x2" && set sub_proj=1 >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r "project.*" | find /i "0x3" && set sub_proj=1 >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r "visio.*" | find /i "0x2" && set sub_vsio=1 >reg query HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing\LicensingNext | findstr /i /r "visio.*" | find /i "0x3" && set sub_vsio=1 >if 0 EQU 1 set sub_next=1 >if 0 EQU 1 set sub_next=1 >if 0 EQU 1 set sub_next=1 >exit /b >exit /b >set _uRI=10080 >set _uAI=120 >if 1 EQU 0 if 1 EQU 0 set ActWindows=1 >set _AUR=0 >if exist "C:\WINDOWS\System32\SppExtComObjHook.dll" dir /b /al "C:\WINDOWS\System32\SppExtComObjHook.dll" || (reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /v VerifierFlags && (set _AUR=1 ) || (reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /v VerifierFlags && set _AUR=1 ) ) File Not Found HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe VerifierFlags REG_DWORD 0x80000000 >if 0 EQU 1 (set _AUR=1 ) >if 0 EQU 0 (set KMS_IP=172.16.0.2 ) >if 1 EQU 0 ( set KMS_RenewalInterval=43200 set KMS_ActivationInterval=43200 ) else ( set KMS_RenewalInterval=10080 set KMS_ActivationInterval=120 ) >if 0 EQU 1 (color 8F & set "mode=External ^(172.16.0.2^)" ) else (if 1 EQU 0 (color 1F & set "mode=Manual" ) else (color 07 & set "mode=Auto Renewal" ) ) >if 0 EQU 0 (if 1 EQU 0 (title KMS_VL_ALL v52 ) else (title KMS_VL_ALL v52 : Auto Renewal ) ) else ( echo. echo Running KMS_VL_ALL v52 ) >if 19045 GEQ 9600 ( reg add "HKLM\SOFTWARE\Policies\Microsoft\Windows NT\CurrentVersion\Software Protection Platform" /v NoGenTicket /t REG_DWORD /d 1 /f if 19045 EQU 14393 reg add "HKLM\SOFTWARE\Policies\Microsoft\Windows NT\CurrentVersion\Software Protection Platform" /v NoAcquireGT /t REG_DWORD /d 1 /f ) The operation completed successfully. >echo. >echo Activation Mode: Auto Renewal Activation Mode: Auto Renewal >if 0 EQU 0 if not exist "!_work!\bin\x64.dll" goto :E_DLL >call :StopService sppsvc >sc query sppsvc | find /i "STOPPED" || net stop sppsvc /y STATE : 1 STOPPED >sc query sppsvc | find /i "STOPPED" || sc stop sppsvc STATE : 1 STOPPED >goto :eof >if 0 NEQ 0 call :StopService osppsvc >if 0 EQU 0 goto :InstallHook >for %# in (SppExtComObjHookAvrf.dll SppExtComObjHook.dll SppExtComObjPatcher.dll SppExtComObjPatcher.exe) do ( if exist "C:\WINDOWS\System32\%#" del /f /q "C:\WINDOWS\System32\%#" if exist "C:\WINDOWS\SysWOW64\%#" del /f /q "C:\WINDOWS\SysWOW64\%#" ) >( if exist "C:\WINDOWS\System32\SppExtComObjHookAvrf.dll" del /f /q "C:\WINDOWS\System32\SppExtComObjHookAvrf.dll" if exist "C:\WINDOWS\SysWOW64\SppExtComObjHookAvrf.dll" del /f /q "C:\WINDOWS\SysWOW64\SppExtComObjHookAvrf.dll" ) >( if exist "C:\WINDOWS\System32\SppExtComObjHook.dll" del /f /q "C:\WINDOWS\System32\SppExtComObjHook.dll" if exist "C:\WINDOWS\SysWOW64\SppExtComObjHook.dll" del /f /q "C:\WINDOWS\SysWOW64\SppExtComObjHook.dll" ) >( if exist "C:\WINDOWS\System32\SppExtComObjPatcher.dll" del /f /q "C:\WINDOWS\System32\SppExtComObjPatcher.dll" if exist "C:\WINDOWS\SysWOW64\SppExtComObjPatcher.dll" del /f /q "C:\WINDOWS\SysWOW64\SppExtComObjPatcher.dll" ) >( if exist "C:\WINDOWS\System32\SppExtComObjPatcher.exe" del /f /q "C:\WINDOWS\System32\SppExtComObjPatcher.exe" if exist "C:\WINDOWS\SysWOW64\SppExtComObjPatcher.exe" del /f /q "C:\WINDOWS\SysWOW64\SppExtComObjPatcher.exe" ) >set AclReset=0 >set _cphk=0 >if 1 EQU 1 set _cphk=1 >if 0 EQU 1 set _cphk=1 >call :qrWD Add >if 1 EQU 1 ( set "_qr=WMIC /NAMESPACE:\\root\Microsoft\Windows\Defender PATH MSFT_MpPreference call Add ExclusionPath="C:\WINDOWS\System32\SppExtComObjHook.dll" Force=True" exit /b ) >if 1 EQU 1 ( WMIC /NAMESPACE:\\root\Microsoft\Windows\Defender PATH MSFT_MpPreference call Add ExclusionPath="C:\WINDOWS\System32\SppExtComObjHook.dll" Force=True copy /y "!_work!\bin\x64.dll" "C:\WINDOWS\System32\SppExtComObjHook.dll" goto :skipsym ) Executing (MSFT_MpPreference)->Add() Method execution successful. 1 file(s) copied. >if 1 NEQ 0 call :CreateIFEOEntry SppExtComObj.exe >reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v Debugger 1>nul 2>nul >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v VerifierDlls /t REG_SZ /d "SppExtComObjHook.dll" The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v VerifierDebug /t REG_DWORD /d 0x00000000 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v VerifierFlags /t REG_DWORD /d 0x80000000 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v GlobalFlag /t REG_DWORD /d 0x00000100 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_Emulation /t REG_DWORD /d 1 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_ActivationInterval /t REG_DWORD /d 120 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_RenewalInterval /t REG_DWORD /d 10080 The operation completed successfully. >if /I SppExtComObj.exe EQU SppExtComObj.exe if 19045 GEQ 9600 (reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_HWID /t REG_QWORD /d "0x3A1C049600B60076" ) The operation completed successfully. >goto :eof >if 1 EQU 1 (call :CreateIFEOEntry osppsvc.exe ) else (if 0 NEQ 0 call :CreateIFEOEntry osppsvc.exe ) >reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v Debugger 1>nul 2>nul >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v VerifierDlls /t REG_SZ /d "SppExtComObjHook.dll" The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v VerifierDebug /t REG_DWORD /d 0x00000000 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v VerifierFlags /t REG_DWORD /d 0x80000000 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v GlobalFlag /t REG_DWORD /d 0x00000100 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v KMS_Emulation /t REG_DWORD /d 1 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v KMS_ActivationInterval /t REG_DWORD /d 120 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v KMS_RenewalInterval /t REG_DWORD /d 10080 The operation completed successfully. >if /I osppsvc.exe EQU SppExtComObj.exe if 19045 GEQ 9600 (reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v KMS_HWID /t REG_QWORD /d "0x3A1C049600B60076" ) >goto :eof >if 1 EQU 1 if Win8 EQU Win7 call :CreateIFEOEntry SppExtComObj.exe >goto :ReturnHook >if 0 EQU 0 if 1 EQU 1 ( call :UpdateIFEOEntry SppExtComObj.exe call :UpdateIFEOEntry osppsvc.exe ) >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_ActivationInterval /t REG_DWORD /d 120 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_RenewalInterval /t REG_DWORD /d 10080 The operation completed successfully. >if /I SppExtComObj.exe EQU SppExtComObj.exe if 19045 GEQ 9600 (reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_HWID /t REG_QWORD /d "0x3A1C049600B60076" ) The operation completed successfully. >if /I SppExtComObj.exe EQU sppsvc.exe ( reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_ActivationInterval /t REG_DWORD /d 120 reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_RenewalInterval /t REG_DWORD /d 10080 ) >if /I SppExtComObj.exe EQU osppsvc.exe ( reg add "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" /f /v KeyManagementServiceName /t REG_SZ /d "172.16.0.2" reg add "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" /f /v KeyManagementServicePort /t REG_SZ /d "1688" ) >goto :eof >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v KMS_ActivationInterval /t REG_DWORD /d 120 The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v KMS_RenewalInterval /t REG_DWORD /d 10080 The operation completed successfully. >if /I osppsvc.exe EQU SppExtComObj.exe if 19045 GEQ 9600 (reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\osppsvc.exe" /f /v KMS_HWID /t REG_QWORD /d "0x3A1C049600B60076" ) >if /I osppsvc.exe EQU sppsvc.exe ( reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_ActivationInterval /t REG_DWORD /d 120 reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\SppExtComObj.exe" /f /v KMS_RenewalInterval /t REG_DWORD /d 10080 ) >if /I osppsvc.exe EQU osppsvc.exe ( reg add "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" /f /v KeyManagementServiceName /t REG_SZ /d "172.16.0.2" reg add "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform" /f /v KeyManagementServicePort /t REG_SZ /d "1688" ) The operation completed successfully. The operation completed successfully. >goto :eof >if 0 EQU 1 if 1 EQU 1 (call :UpdateOSPPEntry osppsvc.exe ) >SET Win10Gov=0 >SET "EditionWMI=" >SET "EditionID=" >IF 19045 LSS 14393 if 1 NEQ 0 GOTO :Main >SET "RegKey=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Component Based Servicing\Packages" >SET "Pattern=Microsoft-Windows-*Edition~31bf3856ad364e35" >SET "EditionPKG=FFFFFFFF" >FOR /F "TOKENS=8 DELIMS=\" %A IN ('REG QUERY "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Component Based Servicing\Packages" /f "Microsoft-Windows-*Edition~31bf3856ad364e35" /k | FIND /I "CurrentVersion"') DO (REG QUERY "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Component Based Servicing\Packages\%A" /v "CurrentState" | FIND /I "0x70" && (FOR /F "TOKENS=3 DELIMS=-~" %B IN ('ECHO %A') DO SET "EditionPKG=%B" ) ) >(REG QUERY "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Component Based Servicing\Packages\Microsoft-Windows-ProfessionalEdition~31bf3856ad364e35~amd64~~10.0.19041.4651" /v "CurrentState" | FIND /I "0x70" && (FOR /F "TOKENS=3 DELIMS=-~" %B IN ('ECHO Microsoft-Windows-ProfessionalEdition~31bf3856ad364e35~amd64~~10.0.19041.4651') DO SET "EditionPKG=%B" ) ) >(REG QUERY "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Component Based Servicing\Packages\Microsoft-Windows-ProfessionalEdition~31bf3856ad364e35~amd64~~10.0.19041.4780" /v "CurrentState" | FIND /I "0x70" && (FOR /F "TOKENS=3 DELIMS=-~" %B IN ('ECHO Microsoft-Windows-ProfessionalEdition~31bf3856ad364e35~amd64~~10.0.19041.4780') DO SET "EditionPKG=%B" ) ) CurrentState REG_DWORD 0x70 >SET "EditionPKG=ProfessionalEdition" >IF /I "Edition" == "Edition" (SET "EditionID=Professional" ) ELSE (FOR /F "TOKENS=3 DELIMS=: " %A IN ('DISM /English /Online /Get-CurrentEdition | FIND /I "Current Edition :"') DO SET "EditionID=%A" ) >net start sppsvc /y The Software Protection service is starting. The Software Protection service was started successfully. >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' AND PartialProductKey is not NULL" LicenseFamily >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' AND PartialProductKey is not NULL" get LicenseFamily /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' AND PartialProductKey is not NULL" get LicenseFamily" exit /b ) >FOR /F "TOKENS=2 DELIMS==" %A IN ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' AND PartialProductKey is not NULL" get LicenseFamily /value ') DO SET "EditionWMI=%A" >SET "EditionWMI=Professional " >IF "Professional" == "" ( IF 19045 GEQ 17063 FOR /F "SKIP=2 TOKENS=2*" %A IN ('REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionId') DO SET "EditionID=%B" IF 19045 LSS 14393 ( FOR /F "SKIP=2 TOKENS=2*" %A IN ('REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v EditionId') DO SET "EditionID=%B" GOTO :Main ) ) >IF NOT "Professional" == "" SET "EditionID=Professional" >IF /I "Professional" == "IoTEnterprise" SET "EditionID=Enterprise" >IF /I "Professional" == "IoTEnterpriseS" IF 19045 LSS 22610 ( SET "EditionID=EnterpriseS" IF 19045 GEQ 19041 IF 4780 GEQ 2788 SET "EditionID=IoTEnterpriseS" ) >IF /I "Professional" == "ProfessionalSingleLanguage" SET "EditionID=Professional" >IF /I "Professional" == "ProfessionalCountrySpecific" SET "EditionID=Professional" >IF /I "Professional" == "EnterpriseG" SET Win10Gov=1 >IF /I "Professional" == "EnterpriseGN" SET Win10Gov=1 >if defined EditionID (set "_winos=Windows Professional edition" ) else (set "_winos=Detected Windows" ) >for /F "skip=2 tokens=2*" %a in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v ProductName ') do if not errorlevel 1 set "_winos=%b" >if not errorlevel 1 set "_winos=Windows 10 Pro" >set "nKMS=does not support KMS activation..." >set "nEval=Evaluation Editions cannot be activated. Please install full Windows OS." >if exist "C:\WINDOWS\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" set _eval=1 >if exist "C:\WINDOWS\Servicing\Packages\Microsoft-Windows-Server*EvalEdition~*.mum" set "nEval=Server Evaluation cannot be activated. Please convert to full Server OS." >if exist "C:\WINDOWS\Servicing\Packages\Microsoft-Windows-Server*EvalCorEdition~*.mum" set _eval=1 & set "nEval=Server Evaluation cannot be activated. Please convert to full Server OS." >set "_C16R=" >reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath && for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun /v InstallPath" ') do if exist "%b\root\Licenses16\ProPlus*.xrm-ms" (reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds && set "_C16R=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration" ) HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\ClickToRun InstallPath REG_SZ C:\Program Files\Microsoft Office >if exist "C:\Program Files\Microsoft Office\root\Licenses16\ProPlus*.xrm-ms" (reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds && set "_C16R=HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration" ) HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\ClickToRun\Configuration ProductReleaseIds REG_SZ Publisher2021Retail,ProPlus2024Retail,ProPlus2024Volume >if not defined _C16R reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath && for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun /v InstallPath" ') do if exist "%b\root\Licenses16\ProPlus*.xrm-ms" (reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds && set "_C16R=HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\ClickToRun\Configuration" ) >set "_C15R=" >reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath && for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun /v InstallPath" ') do if exist "%b\root\Licenses\ProPlus*.xrm-ms" ( reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration /v ProductReleaseIds && call set "_C15R=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration" if not defined _C15R reg query HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag /v productreleaseid && call set "_C15R=HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\propertyBag" ) ERROR: The system was unable to find the specified registry key or value. >set "_C14R=" >if 1 == 0 (reg query HKLM\SOFTWARE\Microsoft\Office\14.0\CVH /f Click2run /k && set "_C14R=1" ) else (reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\14.0\CVH /f Click2run /k && set "_C14R=1" ) ERROR: The system was unable to find the specified registry key or value. >for %A in (14 15 16 19 21 24) do call :officeLoc %A >call :officeLoc 14 >set loc_off14=0 >set _O14MSI=0 >if 14 EQU 19 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2019 && set loc_off14=1 exit /b ) >if 14 EQU 21 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2021 && set loc_off14=1 exit /b ) >if 14 EQU 24 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2024 && set loc_off14=1 exit /b ) >for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\14.0\Common\InstallRoot /v Path" ') do if exist "%b\EntityPicker.dll" ( set loc_off14=1 set _O14MSI=1 ) ERROR: The system was unable to find the specified registry key or value. >for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\14.0\Common\InstallRoot /v Path" ') do if exist "%b\EntityPicker.dll" ( set loc_off14=1 set _O14MSI=1 ) ERROR: The system was unable to find the specified registry key or value. >if 14 EQU 16 if defined _C16R ( for /F "skip=2 tokens=2*" %a in ('reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds') do echo %b 1>"!_temp!\c2rchk.txt" for %a in (Mondo ProPlus ProjectPro VisioPro Standard ProjectStd VisioStd Access SkypeforBusiness OneNote Excel Outlook PowerPoint Publisher Word ProjectProX ProjectStdX VisioProX VisioStdX) do (findstr /I /C:"%aVolume" "!_temp!\c2rchk.txt" && set loc_off14=1 ) for %a in (Mondo ProPlus ProjectPro VisioPro Standard ProjectStd VisioStd Access SkypeforBusiness OneNote Excel Outlook PowerPoint Publisher Word Professional HomeBusiness HomeStudent O365Business O365SmallBusPrem O365HomePrem O365EduCloud) do (findstr /I /C:"%aRetail" "!_temp!\c2rchk.txt" && set loc_off14=1 ) exit /b ) >if 14 EQU 15 if defined _C15R ( set loc_off14=1 exit /b ) >if exist "C:\Program Files\Microsoft Office\Office14\OSPP.VBS" set loc_off14=1 >if not x64 == x86 if exist "C:\Program Files\Microsoft Office\Office14\OSPP.VBS" set loc_off14=1 >if not x64 == x86 if exist "C:\Program Files (x86)\Microsoft Office\Office14\OSPP.VBS" set loc_off14=1 >exit /b >call :officeLoc 15 >set loc_off15=0 >set _O15MSI=0 >if 15 EQU 19 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2019 && set loc_off15=1 exit /b ) >if 15 EQU 21 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2021 && set loc_off15=1 exit /b ) >if 15 EQU 24 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2024 && set loc_off15=1 exit /b ) >for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\15.0\Common\InstallRoot /v Path" ') do if exist "%b\EntityPicker.dll" ( set loc_off15=1 set _O15MSI=1 ) ERROR: The system was unable to find the specified registry key or value. >for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\Common\InstallRoot /v Path" ') do if exist "%b\EntityPicker.dll" ( set loc_off15=1 set _O15MSI=1 ) ERROR: The system was unable to find the specified registry key or value. >if 15 EQU 16 if defined _C16R ( for /F "skip=2 tokens=2*" %a in ('reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds') do echo %b 1>"!_temp!\c2rchk.txt" for %a in (Mondo ProPlus ProjectPro VisioPro Standard ProjectStd VisioStd Access SkypeforBusiness OneNote Excel Outlook PowerPoint Publisher Word ProjectProX ProjectStdX VisioProX VisioStdX) do (findstr /I /C:"%aVolume" "!_temp!\c2rchk.txt" && set loc_off15=1 ) for %a in (Mondo ProPlus ProjectPro VisioPro Standard ProjectStd VisioStd Access SkypeforBusiness OneNote Excel Outlook PowerPoint Publisher Word Professional HomeBusiness HomeStudent O365Business O365SmallBusPrem O365HomePrem O365EduCloud) do (findstr /I /C:"%aRetail" "!_temp!\c2rchk.txt" && set loc_off15=1 ) exit /b ) >if 15 EQU 15 if defined _C15R ( set loc_off15=1 exit /b ) >if exist "C:\Program Files\Microsoft Office\Office15\OSPP.VBS" set loc_off15=1 >if not x64 == x86 if exist "C:\Program Files\Microsoft Office\Office15\OSPP.VBS" set loc_off15=1 >if not x64 == x86 if exist "C:\Program Files (x86)\Microsoft Office\Office15\OSPP.VBS" set loc_off15=1 >exit /b >call :officeLoc 16 >set loc_off16=0 >set _O16MSI=0 >if 16 EQU 19 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2019 && set loc_off16=1 exit /b ) >if 16 EQU 21 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2021 && set loc_off16=1 exit /b ) >if 16 EQU 24 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2024 && set loc_off16=1 exit /b ) >for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\Microsoft\Office\16.0\Common\InstallRoot /v Path" ') do if exist "%b\EntityPicker.dll" ( set loc_off16=1 set _O16MSI=1 ) ERROR: The system was unable to find the specified registry key or value. >for /F "skip=2 tokens=2*" %a in ('"reg query HKLM\SOFTWARE\WOW6432Node\Microsoft\Office\16.0\Common\InstallRoot /v Path" ') do if exist "%b\EntityPicker.dll" ( set loc_off16=1 set _O16MSI=1 ) ERROR: The system was unable to find the specified registry key or value. >if 16 EQU 16 if defined _C16R ( for /F "skip=2 tokens=2*" %a in ('reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds') do echo %b 1>"!_temp!\c2rchk.txt" for %a in (Mondo ProPlus ProjectPro VisioPro Standard ProjectStd VisioStd Access SkypeforBusiness OneNote Excel Outlook PowerPoint Publisher Word ProjectProX ProjectStdX VisioProX VisioStdX) do (findstr /I /C:"%aVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) for %a in (Mondo ProPlus ProjectPro VisioPro Standard ProjectStd VisioStd Access SkypeforBusiness OneNote Excel Outlook PowerPoint Publisher Word Professional HomeBusiness HomeStudent O365Business O365SmallBusPrem O365HomePrem O365EduCloud) do (findstr /I /C:"%aRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) exit /b ) >echo Publisher2021Retail,ProPlus2024Retail,ProPlus2024Volume 1>"!_temp!\c2rchk.txt" >(findstr /I /C:"MondoVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProPlusVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProjectProVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"VisioProVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"StandardVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProjectStdVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"VisioStdVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"AccessVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"SkypeforBusinessVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"OneNoteVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ExcelVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"OutlookVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"PowerPointVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"PublisherVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"WordVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProjectProXVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProjectStdXVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"VisioProXVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"VisioStdXVolume" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"MondoRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProPlusRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProjectProRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"VisioProRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"StandardRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProjectStdRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"VisioStdRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"AccessRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"SkypeforBusinessRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"OneNoteRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ExcelRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"OutlookRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"PowerPointRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"PublisherRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"WordRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"ProfessionalRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"HomeBusinessRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"HomeStudentRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"O365BusinessRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"O365SmallBusPremRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"O365HomePremRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >(findstr /I /C:"O365EduCloudRetail" "!_temp!\c2rchk.txt" && set loc_off16=1 ) >call :officeLoc 19 >set loc_off19=0 >set _O19MSI=0 >if 19 EQU 19 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2019 && set loc_off19=1 exit /b ) >call :officeLoc 21 >set loc_off21=0 >set _O21MSI=0 >if 21 EQU 19 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2019 && set loc_off21=1 exit /b ) >if 21 EQU 21 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2021 && set loc_off21=1 exit /b ) ProductReleaseIds REG_SZ Publisher2021Retail,ProPlus2024Retail,ProPlus2024Volume >call :officeLoc 24 >set loc_off24=0 >set _O24MSI=0 >if 24 EQU 19 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2019 && set loc_off24=1 exit /b ) >if 24 EQU 21 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2021 && set loc_off24=1 exit /b ) >if 24 EQU 24 ( if defined _C16R reg query HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration /v ProductReleaseIds | findstr 2024 && set loc_off24=1 exit /b ) ProductReleaseIds REG_SZ Publisher2021Retail,ProPlus2024Retail,ProPlus2024Volume >if 0 EQU 1 set "_C14R=" >set S_OK=1 >call :RunSPP >set spp=SoftwareLicensingProduct >set sps=SoftwareLicensingService >set W1nd0ws=1 >set WinPerm=0 >set WinVL=0 >set Off1ce=0 >set RanR2V=0 >for %A in (15 16 19 21 24) do set aC2R%A=0 >set aC2R15=0 >set aC2R16=0 >set aC2R19=0 >set aC2R21=0 >set aC2R24=0 >if 19045 GEQ 9200 if 1 NEQ 0 call :sppoff >set OffUWP=0 >if 19045 GEQ 10240 reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msoxmled.exe" && ( dir /b "C:\Program Files\WindowsApps\Microsoft.Office.Desktop*" && set OffUWP=1 if not x64 == x86 dir /b "C:\Program Files\WindowsApps\Microsoft.Office.Desktop*" && set OffUWP=1 ) HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\msoxmled.exe (Default) REG_SZ C:\Program Files\Microsoft Office\Root\VFS\ProgramFilesCommonX64\Microsoft Shared\OFFICE16\MSOXMLED.EXE UseURL REG_SZ 1 File Not Found File Not Found >rem nothing installed >if 1 EQU 0 if 1 EQU 0 if 0 EQU 0 if 0 EQU 0 if 0 EQU 0 ( if 19045 GEQ 9200 ( if 0 EQU 0 (echo. & echo No Installed Office 2013-2024 Product Detected... ) else (echo. & echo Detected Office 365/2016 UWP is not supported by KMS_VL_ALL ) exit /b ) if 19045 LSS 9200 (if 0 EQU 0 (echo. & echo No Installed Office Product Detected... & exit /b ) ) ) >if 1 EQU 1 if 1 EQU 1 ( set sub_o365=0 set sub_proj=0 set sub_vsio=0 if 0 EQU 1 ( reg delete HKCU\SOFTWARE\Microsoft\Office\16.0\Common\Licensing /f rmdir /s /q "!_Local!\Microsoft\Office\Licenses\" rmdir /s /q "!ProgramData!\Microsoft\Office\Licenses\" ) ) >set Off1ce=1 >set _sC2R=sppoff >set _fC2R=ReturnSPP >call :qrQuery SoftwareLicensingProduct "Description like '%%KMSCLIENT%%' AND NOT Name like '%%MondoR_KMS_Automation%%'" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "Description like '%KMSCLIENT%' AND NOT Name like '%MondoR_KMS_Automation%'" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "Description like '%KMSCLIENT%' AND NOT Name like '%MondoR_KMS_Automation%'" get Name" exit /b ) >wmic path SoftwareLicensingProduct where "Description like '%KMSCLIENT%' AND NOT Name like '%MondoR_KMS_Automation%'" get Name /value 1>"!_temp!\sppchk.txt" 2>&1 >for %A in (14 15 16 19 21 24) do ( set vol_off%A=0 if !loc_off%A! EQU 1 find /i "Office %A" "!_temp!\sppchk.txt" && (set vol_off%A=1 ) ) >( set vol_off14=0 if !loc_off14! EQU 1 find /i "Office 14" "!_temp!\sppchk.txt" && (set vol_off14=1 ) ) >( set vol_off15=0 if !loc_off15! EQU 1 find /i "Office 15" "!_temp!\sppchk.txt" && (set vol_off15=1 ) ) >( set vol_off16=0 if !loc_off16! EQU 1 find /i "Office 16" "!_temp!\sppchk.txt" && (set vol_off16=1 ) ) >( set vol_off19=0 if !loc_off19! EQU 1 find /i "Office 19" "!_temp!\sppchk.txt" && (set vol_off19=1 ) ) >( set vol_off21=0 if !loc_off21! EQU 1 find /i "Office 21" "!_temp!\sppchk.txt" && (set vol_off21=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >( set vol_off24=0 if !loc_off24! EQU 1 find /i "Office 24" "!_temp!\sppchk.txt" && (set vol_off24=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT Name=Office 24, Office24ProPlus2024VL_KMS_Client_AE edition Name=Office 24, Office24ProPlus2024PreviewVL_KMS_Client_AE edition >call :qrQuery SoftwareLicensingProduct "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%%'" LicenseFamily >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%'" get LicenseFamily /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%'" get LicenseFamily" exit /b ) >if 0 EQU 1 find /i "Office16MondoVL_KMS_Client" "!_temp!\sppchk.txt" && (wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%'" get LicenseFamily /value | find /i "O365" || (set vol_off16=0 ) ) >call :qrQuery SoftwareLicensingProduct "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%%'" LicenseFamily >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%'" get LicenseFamily /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%'" get LicenseFamily" exit /b ) >if 0 EQU 1 find /i "OfficeMondoVL_KMS_Client" "!_temp!\sppchk.txt" && (wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%'" get LicenseFamily /value | find /i "O365" || (set vol_off15=0 ) ) >call :qrQuery SoftwareLicensingProduct "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND NOT Name like '%%O365%%'" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND NOT Name like '%O365%'" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND NOT Name like '%O365%'" get Name" exit /b ) >wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND NOT Name like '%O365%'" get Name /value 1>"!_temp!\sppchk.txt" 2>&1 >for %A in (14 15 16 19 21 24) do ( set ret_off%A=0 find /i "R_Retail" "!_temp!\sppchk.txt" | find /i "Office %A" && (set ret_off%A=1 ) ) >( set ret_off14=0 find /i "R_Retail" "!_temp!\sppchk.txt" | find /i "Office 14" && (set ret_off14=1 ) ) >( set ret_off15=0 find /i "R_Retail" "!_temp!\sppchk.txt" | find /i "Office 15" && (set ret_off15=1 ) ) >( set ret_off16=0 find /i "R_Retail" "!_temp!\sppchk.txt" | find /i "Office 16" && (set ret_off16=1 ) ) >( set ret_off19=0 find /i "R_Retail" "!_temp!\sppchk.txt" | find /i "Office 19" && (set ret_off19=1 ) ) >( set ret_off21=0 find /i "R_Retail" "!_temp!\sppchk.txt" | find /i "Office 21" && (set ret_off21=1 ) ) >( set ret_off24=0 find /i "R_Retail" "!_temp!\sppchk.txt" | find /i "Office 24" && (set ret_off24=1 ) ) >call :qrQuery SoftwareLicensingProduct "ApplicationID='59a52881-a989-479d-af46-f275c6370663'" Description >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='59a52881-a989-479d-af46-f275c6370663'" get Description /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='59a52881-a989-479d-af46-f275c6370663'" get Description" exit /b ) >if 19045 LSS 9200 if 0 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='59a52881-a989-479d-af46-f275c6370663'" get Description /value | find /i "channel" && (set ret_off14=1 ) >set run_off24=0 & set prr_off24=0 & set prv_off24=0 >if 1 EQU 1 if 0 EQU 1 if 0 EQU 0 if 1 EQU 0 set run_off24=1 >if 1 EQU 1 if 0 EQU 1 if 0 EQU 0 if 1 EQU 1 ( for %a in (ProPlus Standard Access SkypeforBusiness Excel Outlook PowerPoint Publisher Word) do find /i "Office24%a2024R" "!_temp!\sppchk.txt" && ( call set /a prr_off24+=1 find /i "Office24%a2024VL" "!_temp!\sppchk.txt" && call set /a prv_off24+=1 ) for %a in (Professional) do find /i "Office24%a2024R" "!_temp!\sppchk.txt" && ( call set /a prr_off24+=1 find /i "Office24ProPlus2024VL" "!_temp!\sppchk.txt" && call set /a prv_off24+=1 ) for %a in (HomeBusiness HomeStudent Home) do find /i "Office24%a2024R" "!_temp!\sppchk.txt" && ( call set /a prr_off24+=1 find /i "Office24Standard2024VL" "!_temp!\sppchk.txt" && call set /a prv_off24+=1 ) if 0 EQU 0 for %a in (ProjectPro ProjectStd) do find /i "Office24%a2024R" "!_temp!\sppchk.txt" && ( call set /a prr_off24+=1 find /i "Office24%a2024VL" "!_temp!\sppchk.txt" && call set /a prv_off24+=1 ) if 0 EQU 0 for %a in (VisioPro VisioStd) do find /i "Office24%a2024R" "!_temp!\sppchk.txt" && ( call set /a prr_off24+=1 find /i "Office24%a2024VL" "!_temp!\sppchk.txt" && call set /a prv_off24+=1 ) ) >if 1 EQU 1 if 0 EQU 1 if 0 EQU 0 if 1 EQU 1 if 0 LSS 0 (set vol_off24=0 & set run_off24=1 ) >set run_off21=0 & set prr_off21=0 & set prv_off21=0 >if 1 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 0 set run_off21=1 >if 1 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 1 ( for %a in (ProPlus Standard Access SkypeforBusiness Excel Outlook PowerPoint Publisher Word) do find /i "Office21%a2021R" "!_temp!\sppchk.txt" && ( call set /a prr_off21+=1 find /i "Office21%a2021VL" "!_temp!\sppchk.txt" && call set /a prv_off21+=1 ) for %a in (Professional) do find /i "Office21%a2021R" "!_temp!\sppchk.txt" && ( call set /a prr_off21+=1 find /i "Office21ProPlus2021VL" "!_temp!\sppchk.txt" && call set /a prv_off21+=1 ) for %a in (HomeBusiness HomeStudent) do find /i "Office21%a2021R" "!_temp!\sppchk.txt" && ( call set /a prr_off21+=1 find /i "Office21Standard2021VL" "!_temp!\sppchk.txt" && call set /a prv_off21+=1 ) if 0 EQU 0 for %a in (ProjectPro ProjectStd) do find /i "Office21%a2021R" "!_temp!\sppchk.txt" && ( call set /a prr_off21+=1 find /i "Office21%a2021VL" "!_temp!\sppchk.txt" && call set /a prv_off21+=1 ) if 0 EQU 0 for %a in (VisioPro VisioStd) do find /i "Office21%a2021R" "!_temp!\sppchk.txt" && ( call set /a prr_off21+=1 find /i "Office21%a2021VL" "!_temp!\sppchk.txt" && call set /a prv_off21+=1 ) ) >if 1 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 1 if 0 LSS 0 (set vol_off21=0 & set run_off21=1 ) >set run_off19=0 & set prr_off19=0 & set prv_off19=0 >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 0 set run_off19=1 >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 1 ( for %a in (ProPlus Standard Access SkypeforBusiness Excel Outlook PowerPoint Publisher Word) do find /i "Office19%a2019R" "!_temp!\sppchk.txt" && ( call set /a prr_off19+=1 find /i "Office19%a2019VL" "!_temp!\sppchk.txt" && call set /a prv_off19+=1 ) for %a in (Professional) do find /i "Office19%a2019R" "!_temp!\sppchk.txt" && ( call set /a prr_off19+=1 find /i "Office19ProPlus2019VL" "!_temp!\sppchk.txt" && call set /a prv_off19+=1 ) for %a in (HomeBusiness HomeStudent) do find /i "Office19%a2019R" "!_temp!\sppchk.txt" && ( call set /a prr_off19+=1 find /i "Office19Standard2019VL" "!_temp!\sppchk.txt" && call set /a prv_off19+=1 ) if 0 EQU 0 for %a in (ProjectPro ProjectStd) do find /i "Office19%a2019R" "!_temp!\sppchk.txt" && ( call set /a prr_off19+=1 find /i "Office19%a2019VL" "!_temp!\sppchk.txt" && call set /a prv_off19+=1 ) if 0 EQU 0 for %a in (VisioPro VisioStd) do find /i "Office19%a2019R" "!_temp!\sppchk.txt" && ( call set /a prr_off19+=1 find /i "Office19%a2019VL" "!_temp!\sppchk.txt" && call set /a prv_off19+=1 ) ) >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 1 if 0 LSS 0 (set vol_off19=0 & set run_off19=1 ) >set run_off16=0 & set prr_off16=0 & set prv_off16=0 >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if defined _C16R ( for %a in (ProPlus Standard Access SkypeforBusiness Excel Outlook PowerPoint Publisher Word) do find /i "Office16%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off16+=1 if 0 EQU 1 if 1 EQU 0 if 0 EQU 0 if 0 EQU 0 find /i "Office16%aVL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 1 EQU 1 find /i "Office24%a2024VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office21%a2021VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office19%a2019VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 ) for %a in (Professional) do find /i "Office16%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off16+=1 if 0 EQU 1 if 1 EQU 0 if 0 EQU 0 if 0 EQU 0 find /i "Office16ProPlusVL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 1 EQU 1 find /i "Office24ProPlus2024VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office21ProPlus2021VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office19ProPlus2019VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 ) for %a in (HomeBusiness HomeStudent) do find /i "Office16%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off16+=1 if 0 EQU 1 if 1 EQU 0 if 0 EQU 0 if 0 EQU 0 find /i "Office16StandardVL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 1 EQU 1 find /i "Office24Standard2024VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office21Standard2021VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office19Standard2019VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 ) if 0 EQU 0 for %a in (ProjectPro ProjectStd) do find /i "Office16%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off16+=1 if 0 EQU 1 if 1 EQU 0 if 0 EQU 0 if 0 EQU 0 find /i "Office16%aVL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 1 EQU 1 find /i "Office24%a2024VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office21%a2021VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office19%a2019VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 ) if 0 EQU 0 for %a in (VisioPro VisioStd) do find /i "Office16%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off16+=1 if 0 EQU 1 if 1 EQU 0 if 0 EQU 0 if 0 EQU 0 find /i "Office16%aVL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 1 EQU 1 find /i "Office24%a2024VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office21%a2021VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 if 0 EQU 0 if 0 EQU 1 find /i "Office19%a2019VL" "!_temp!\sppchk.txt" && call set /a prv_off16+=1 ) ) >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if defined _C16R if 0 LSS 0 (set vol_off16=0 & set run_off16=1 ) >call :qrQuery SoftwareLicensingProduct "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%%'" LicenseFamily >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%'" get LicenseFamily /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%'" get LicenseFamily" exit /b ) >if 0 EQU 1 if 0 EQU 0 if 0 EQU 0 if defined _C16R wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'Office16O365%'" get LicenseFamily /value | find /i "O365" && (find /i "Office16MondoVL" "!_temp!\sppchk.txt" || set run_off16=1 ) >set run_off15=0 & set prr_off15=0 & set prv_off15=0 >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 0 if defined _C15R set run_off15=1 >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 1 if defined _C15R ( for %a in (ProPlus Standard Access Lync Excel Groove InfoPath OneNote Outlook PowerPoint Publisher Word) do find /i "Office%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off15+=1 find /i "Office%aVL" "!_temp!\sppchk.txt" && call set /a prv_off15+=1 ) for %a in (Professional) do find /i "Office%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off15+=1 find /i "OfficeProPlusVL" "!_temp!\sppchk.txt" && call set /a prv_off15+=1 ) for %a in (HomeBusiness HomeStudent) do find /i "Office%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off15+=1 find /i "OfficeStandardVL" "!_temp!\sppchk.txt" && call set /a prv_off15+=1 ) if 0 EQU 0 for %a in (ProjectPro ProjectStd) do find /i "Office%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off15+=1 find /i "Office%aVL" "!_temp!\sppchk.txt" && call set /a prv_off15+=1 ) if 0 EQU 0 for %a in (VisioPro VisioStd) do find /i "Office%aR" "!_temp!\sppchk.txt" && ( call set /a prr_off15+=1 find /i "Office%aVL" "!_temp!\sppchk.txt" && call set /a prv_off15+=1 ) ) >if 0 EQU 1 if 0 EQU 1 if 0 EQU 0 if 0 EQU 1 if defined _C15R if 0 LSS 0 (set vol_off15=0 & set run_off15=1 ) >call :qrQuery SoftwareLicensingProduct "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%%'" LicenseFamily >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%'" get LicenseFamily /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%'" get LicenseFamily" exit /b ) >if 0 EQU 1 if 0 EQU 0 if defined _C15R wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND LicenseFamily like 'OfficeO365%'" get LicenseFamily /value | find /i "O365" && (find /i "OfficeMondoVL" "!_temp!\sppchk.txt" || set run_off15=1 ) >set vol_offgl=1 >if 1 EQU 0 if 0 EQU 0 if 0 EQU 0 if 0 EQU 0 if 0 EQU 0 ( if 19045 GEQ 9200 set vol_offgl=0 if 19045 LSS 9200 if 0 EQU 0 set vol_offgl=0 ) >rem mixed Volume + Retail >if 0 EQU 1 if 1 EQU 1 if 0 EQU 0 goto :C2RR2V >if 0 EQU 1 if 1 EQU 1 if 0 EQU 0 goto :C2RR2V >if 0 EQU 1 if 1 EQU 1 if 0 EQU 0 goto :C2RR2V >if 0 EQU 1 if 1 EQU 1 if 0 EQU 0 goto :C2RR2V >if 0 EQU 1 if 1 EQU 1 if 0 EQU 0 goto :C2RR2V >rem all supported Volume + message for unsupported >if 0 EQU 0 if 0 EQU 1 if 0 EQU 0 if 0 EQU 1 (echo. & echo Detected Office 365/2016 UWP is not supported by KMS_VL_ALL ) >if 1 EQU 1 ( if 0 EQU 1 if 0 EQU 1 (echo. & echo Detected Office 2016 MSI Retail is not supported by KMS_VL_ALL ) if 0 EQU 1 if 0 EQU 1 (echo. & echo Detected Office 2013 MSI Retail is not supported by KMS_VL_ALL ) if 19045 LSS 9200 if 0 EQU 1 if 0 EQU 0 (if defined _C14R (echo. & echo Detected Office 2010 C2R Retail is not supported by KMS_VL_ALL ) else if 0 EQU 1 (if 0 EQU 1 echo. & echo Detected Office 2010 MSI Retail is not supported by KMS_VL_ALL ) ) exit /b ) >call :qrQuery SoftwareLicensingProduct "Description like '%%KMSCLIENT%%'" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "Description like '%KMSCLIENT%'" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "Description like '%KMSCLIENT%'" get Name" exit /b ) >wmic path SoftwareLicensingProduct where "Description like '%KMSCLIENT%'" get Name /value | findstr /i Windows && (set WinVL=1 ) Name=Windows(R), Professional edition Name=Windows(R), ProfessionalEducation edition Name=Windows(R), Enterprise edition Name=Windows(R), ProfessionalWorkstation edition Name=Windows(R), Education edition Name=Windows(R), ServerRdsh edition Name=Windows(R), ServerRdsh edition >if 1 EQU 0 (if 1 EQU 0 (echo. & echo Windows activation is OFF... ) else (if 1 EQU 0 (echo. & echo Windows 10 Pro does not support KMS activation... if defined _eval echo Evaluation Editions cannot be activated. Please install full Windows OS. ) else (echo. & echo Failed checking KMS Activation ID(s) for Windows. & echo Either sppsvc service or SppExtComObjHook.dll is not functional. & call :CheckWS exit /b ) ) ) >if 1 EQU 0 if 1 EQU 0 exit /b >if 1 EQU 0 ( reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f" /f 1>nul 2>nul rem reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f 1>nul 2>nul reg delete "HKU\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f" /f 1>nul 2>nul reg delete "HKU\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f 1>nul 2>nul ) >set _gvlk=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 10240 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) Name=Windows(R), Professional edition >set gpr=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" GracePeriodRemaining >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get GracePeriodRemaining /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get GracePeriodRemaining" exit /b ) >if 19045 GEQ 10240 if 1 NEQ 0 if 1 EQU 1 for /F "tokens=2 delims==" %A in ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get GracePeriodRemaining /value ') do set "gpr=%A" >set "gpr=259127 " >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" LicenseFamily >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get LicenseFamily /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get LicenseFamily" exit /b ) >if 259127 NEQ 0 if 259127 GTR 259200 ( set W1nd0ws=0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get LicenseFamily /value | findstr /i EnterpriseG && (call set W1nd0ws=1 ) ) >call :qrSingle SoftwareLicensingService Version >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingService get Version /value" exit /b ) >for /F "tokens=2 delims==" %A in ('wmic path SoftwareLicensingService get Version /value') do set slsv=%A >set slsv=10.0.19041.4717 >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /f /v KeyManagementServiceName /t REG_SZ /d "172.16.0.2" The operation completed successfully. >reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /f /v KeyManagementServicePort /t REG_SZ /d "1688" The operation completed successfully. >if 19045 GEQ 9200 ( if not x64 == x86 ( reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /f /v KeyManagementServiceName /t REG_SZ /d "172.16.0.2" /reg:32 reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32 reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f /reg:32 1>nul 2>nul reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f /v KeyManagementServiceName /t REG_SZ /d "172.16.0.2" /reg:32 reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f /v KeyManagementServicePort /t REG_SZ /d "1688" /reg:32 ) reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f 1>nul 2>nul reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f /v KeyManagementServiceName /t REG_SZ /d "172.16.0.2" reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663" /f /v KeyManagementServicePort /t REG_SZ /d "1688" ) The operation completed successfully. The operation completed successfully. The operation completed successfully. The operation completed successfully. The operation completed successfully. The operation completed successfully. >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%'" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%'" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%'" get ID" exit /b ) >if 1 EQU 0 for /F "tokens=2 delims==" %G in ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%'" get ID /value') do (set app=%G & call :sppchkwin ) >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' " ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' " get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' " get ID" exit /b ) >if 1 EQU 1 if 1 NEQ 0 for /F "tokens=2 delims==" %G in ('wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' " get ID /value') do (set app=%G & call :sppchkwin ) >(set app=2de67392-b7a7-462a-b1ca-108dd189f588 & call :sppchkwin ) >set _officespp=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 14393 if 0 EQU 0 if 1 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) >call :qrQuery SoftwareLicensingProduct "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" LicenseStatus >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get LicenseStatus /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get LicenseStatus" exit /b ) >wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get LicenseStatus /value | findstr "1" && (echo. & call :activate & exit /b ) LicenseStatus=1 >set S_OK=1 >if SoftwareLicensingService EQU SoftwareLicensingService ( if 0 EQU 0 (reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\2de67392-b7a7-462a-b1ca-108dd189f588" /f 1>nul 2>nul ) else ( reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663\2de67392-b7a7-462a-b1ca-108dd189f588" /f 1>nul 2>nul call :offoem ) if 19045 GEQ 9600 reg delete "HKU\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\PersistedSystemState" /f 1>nul 2>nul ) else ( reg delete "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform\59a52881-a989-479d-af46-f275c6370663\2de67392-b7a7-462a-b1ca-108dd189f588" /f 1>nul 2>nul reg delete "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663\2de67392-b7a7-462a-b1ca-108dd189f588" /f 1>nul 2>nul call :offoem ) >call :qrQuery SoftwareLicensingProduct "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get Name" exit /b ) >if 1 EQU 0 if 0 EQU 0 if SoftwareLicensingService EQU SoftwareLicensingService ( reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\2de67392-b7a7-462a-b1ca-108dd189f588" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\2de67392-b7a7-462a-b1ca-108dd189f588" /f /v KeyManagementServicePort /t REG_SZ /d "1688" reg add "HKU\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\2de67392-b7a7-462a-b1ca-108dd189f588" /f /v DiscoveredKeyManagementServiceIpAddress /t REG_SZ /d "127.0.0.2" for /F "tokens=2 delims==" %x in ('wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get Name /value') do echo Checking: %x echo Product is KMS 2038 Activated. exit /b ) >rem call :qrQuery SoftwareLicensingProduct "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" Name >if 0 EQU 0 for /F "tokens=2 delims==" %x in ('wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get Name /value') do echo Activating: %x >echo Activating: Windows(R), Professional edition Activating: Windows(R), Professional edition >if 0 EQU 1 for /F "tokens=2 delims==f" %x in ('wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get Name /value') do echo Activating: %x >set ESU_ADD=0 >call :qrMethod SoftwareLicensingProduct ID 2de67392-b7a7-462a-b1ca-108dd189f588 Activate >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where ID='2de67392-b7a7-462a-b1ca-108dd189f588' call Activate" exit /b ) >wmic path SoftwareLicensingProduct where ID='2de67392-b7a7-462a-b1ca-108dd189f588' call Activate Executing (\\ADMIN27\root\cimv2:SoftwareLicensingProduct.ID="2de67392-b7a7-462a-b1ca-108dd189f588")->Activate() Method execution successful. Out Parameters: instance of __PARAMETERS { }; >call set ERRORCODE=0 >if 0 EQU -1073418187 ( echo Product Activation Failed: 0xC004F035 if Win8 EQU Win7 echo Windows 7 cannot be KMS-activated on this computer due to unqualified OEM BIOS. echo See Read Me for details. exit /b ) >if 0 EQU -1073417728 ( echo Product Activation Failed: 0xC004F200 echo Windows needs to rebuild the activation-related files. echo See KB2736303 for details. exit /b ) >if 0 EQU -1073422315 ( echo Product Activation Failed: 0xC004E015 echo Running slmgr.vbs /rilc to mitigate. if 0 NEQ 0 ( pushd "!_work!\bin" powershell -nop -c "$sls='SoftwareLicensingService'; cd -Lit ($env:__CD__); $f=[IO.File]::ReadAllText('.\xrm.txt') -split ':xrm\:.*'; iex ($f[1]); ReinstallLicenses" popd ) else (cscript.exe //NoLogo //B C:\WINDOWS\System32\slmgr.vbs /rilc ) ) >if 0 NEQ 0 ( if SoftwareLicensingService EQU SoftwareLicensingService (call :StopService sppsvc ) else (call :StopService osppsvc ) wmic path SoftwareLicensingProduct where ID='2de67392-b7a7-462a-b1ca-108dd189f588' call Activate call set ERRORCODE=!ERRORLEVEL! ) >set gpr=0 >set gpr2=0 >call :qrQuery SoftwareLicensingProduct "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" GracePeriodRemaining >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get GracePeriodRemaining /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get GracePeriodRemaining" exit /b ) >for /F "tokens=2 delims==" %x in ('wmic path SoftwareLicensingProduct where "ID='2de67392-b7a7-462a-b1ca-108dd189f588'" get GracePeriodRemaining /value') do (set gpr=%x & set /a "gpr2=(%x+1440-1)/1440" ) >(set gpr=259200 & set /a "gpr2=(259200 +1440-1)/1440" ) >if 0 EQU 0 if 259200 EQU 0 ( echo Product Activation succeeded, but Remaining Period failed to increase. if Win8 EQU Win7 echo This could be related to the error described in KB4487266 exit /b ) >set Act_OK=0 >if 259200 EQU 43200 if 0 EQU 0 if 19045 GEQ 9200 set Act_OK=1 >if 259200 EQU 64800 set Act_OK=1 >if 259200 GTR 259200 if 0 EQU 1 set Act_OK=1 >if 259200 EQU 259200 set Act_OK=1 >if 0 EQU 0 if 1 EQU 1 ( echo Product Activation Successful echo Remaining Period: 180 days (259200 minutes) exit /b ) Product Activation Successful Remaining Period: 180 days (259200 minutes) >(set app=3f1afc82-f8ac-4f6c-8005-1d233e606eee & call :sppchkwin ) >set _officespp=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 14393 if 0 EQU 0 if 1 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) >call :qrQuery SoftwareLicensingProduct "ID='3f1afc82-f8ac-4f6c-8005-1d233e606eee'" LicenseStatus >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='3f1afc82-f8ac-4f6c-8005-1d233e606eee'" get LicenseStatus /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='3f1afc82-f8ac-4f6c-8005-1d233e606eee'" get LicenseStatus" exit /b ) >wmic path SoftwareLicensingProduct where "ID='3f1afc82-f8ac-4f6c-8005-1d233e606eee'" get LicenseStatus /value | findstr "1" && (echo. & call :activate & exit /b ) >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "3f1afc82-f8ac-4f6c-8005-1d233e606eee" && (echo. & call :activate & exit /b ) >if 19045 GEQ 14393 if 1 EQU 1 exit /b >(set app=73111121-5638-40f6-bc11-f1d7b0d64300 & call :sppchkwin ) >set _officespp=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 14393 if 0 EQU 0 if 1 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) >call :qrQuery SoftwareLicensingProduct "ID='73111121-5638-40f6-bc11-f1d7b0d64300'" LicenseStatus >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='73111121-5638-40f6-bc11-f1d7b0d64300'" get LicenseStatus /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='73111121-5638-40f6-bc11-f1d7b0d64300'" get LicenseStatus" exit /b ) >wmic path SoftwareLicensingProduct where "ID='73111121-5638-40f6-bc11-f1d7b0d64300'" get LicenseStatus /value | findstr "1" && (echo. & call :activate & exit /b ) >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "73111121-5638-40f6-bc11-f1d7b0d64300" && (echo. & call :activate & exit /b ) >if 19045 GEQ 14393 if 1 EQU 1 exit /b >(set app=82bbc092-bc50-4e16-8e18-b74fc486aec3 & call :sppchkwin ) >set _officespp=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 14393 if 0 EQU 0 if 1 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) >call :qrQuery SoftwareLicensingProduct "ID='82bbc092-bc50-4e16-8e18-b74fc486aec3'" LicenseStatus >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='82bbc092-bc50-4e16-8e18-b74fc486aec3'" get LicenseStatus /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='82bbc092-bc50-4e16-8e18-b74fc486aec3'" get LicenseStatus" exit /b ) >wmic path SoftwareLicensingProduct where "ID='82bbc092-bc50-4e16-8e18-b74fc486aec3'" get LicenseStatus /value | findstr "1" && (echo. & call :activate & exit /b ) >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "82bbc092-bc50-4e16-8e18-b74fc486aec3" && (echo. & call :activate & exit /b ) >if 19045 GEQ 14393 if 1 EQU 1 exit /b >(set app=e0c42288-980c-4788-a014-c080d2e1926e & call :sppchkwin ) >set _officespp=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 14393 if 0 EQU 0 if 1 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) >call :qrQuery SoftwareLicensingProduct "ID='e0c42288-980c-4788-a014-c080d2e1926e'" LicenseStatus >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='e0c42288-980c-4788-a014-c080d2e1926e'" get LicenseStatus /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='e0c42288-980c-4788-a014-c080d2e1926e'" get LicenseStatus" exit /b ) >wmic path SoftwareLicensingProduct where "ID='e0c42288-980c-4788-a014-c080d2e1926e'" get LicenseStatus /value | findstr "1" && (echo. & call :activate & exit /b ) >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "e0c42288-980c-4788-a014-c080d2e1926e" && (echo. & call :activate & exit /b ) >if 19045 GEQ 14393 if 1 EQU 1 exit /b >(set app=e4db50ea-bda1-4566-b047-0ca50abc6f07 & call :sppchkwin ) >set _officespp=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 14393 if 0 EQU 0 if 1 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) >call :qrQuery SoftwareLicensingProduct "ID='e4db50ea-bda1-4566-b047-0ca50abc6f07'" LicenseStatus >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='e4db50ea-bda1-4566-b047-0ca50abc6f07'" get LicenseStatus /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='e4db50ea-bda1-4566-b047-0ca50abc6f07'" get LicenseStatus" exit /b ) >wmic path SoftwareLicensingProduct where "ID='e4db50ea-bda1-4566-b047-0ca50abc6f07'" get LicenseStatus /value | findstr "1" && (echo. & call :activate & exit /b ) >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "e4db50ea-bda1-4566-b047-0ca50abc6f07" && (echo. & call :activate & exit /b ) >if 19045 GEQ 14393 if 1 EQU 1 exit /b >(set app=ec868e65-fadf-4759-b23e-93fe37f2cc29 & call :sppchkwin ) >set _officespp=0 >call :qrQuery SoftwareLicensingProduct "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name" exit /b ) >if 19045 GEQ 14393 if 0 EQU 0 if 1 EQU 0 wmic path SoftwareLicensingProduct where "ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' and Description like '%KMSCLIENT%' and PartialProductKey is not NULL" get Name /value | findstr /i Windows && (set _gvlk=1 ) >call :qrQuery SoftwareLicensingProduct "ID='ec868e65-fadf-4759-b23e-93fe37f2cc29'" LicenseStatus >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='ec868e65-fadf-4759-b23e-93fe37f2cc29'" get LicenseStatus /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='ec868e65-fadf-4759-b23e-93fe37f2cc29'" get LicenseStatus" exit /b ) >wmic path SoftwareLicensingProduct where "ID='ec868e65-fadf-4759-b23e-93fe37f2cc29'" get LicenseStatus /value | findstr "1" && (echo. & call :activate & exit /b ) >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "ec868e65-fadf-4759-b23e-93fe37f2cc29" && (echo. & call :activate & exit /b ) >if 19045 GEQ 14393 if 1 EQU 1 exit /b >if 1 EQU 1 if 1 EQU 0 (echo. & echo Windows activation is OFF... ) >call :qrQuery SoftwareLicensingProduct "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' and Description like '%%KMSCLIENT%%'" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' and Description like '%KMSCLIENT%'" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' and Description like '%KMSCLIENT%'" get ID" exit /b ) >if 1 EQU 1 if 1 NEQ 0 for /F "tokens=2 delims==" %G in ('wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' and Description like '%KMSCLIENT%'" get ID /value') do (set app=%G & call :sppchkoff 1 ) >(set app=8d368fc1-9470-4be2-8d66-90e836cbb051 & call :sppchkoff 1 ) >call :qrQuery SoftwareLicensingProduct "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name" exit /b ) >wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name /value 1>"!_temp!\sppchk.txt" >set _eof=0 >for %A in (14 15 16 19 21 24) do (find /i "Office %A" "!_temp!\sppchk.txt" && (if !loc_off%A! EQU 0 set _eof=1 ) ) >(find /i "Office 14" "!_temp!\sppchk.txt" && (if !loc_off14! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 15" "!_temp!\sppchk.txt" && (if !loc_off15! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 16" "!_temp!\sppchk.txt" && (if !loc_off16! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 19" "!_temp!\sppchk.txt" && (if !loc_off19! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 21" "!_temp!\sppchk.txt" && (if !loc_off21! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 24" "!_temp!\sppchk.txt" && (if !loc_off24! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT Name=Office 24, Office24ProPlus2024VL_KMS_Client_AE edition >if 0 EQU 1 exit /b >if 1 EQU 1 (set _officespp=1 ) else (set _officespp=0 ) >rem call :qrQuery SoftwareLicensingProduct "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" Name >for /F "tokens=3 delims==, " %G in ('wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name /value') do set OffVer=%G >set OffVer=24 >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >if /I '8d368fc1-9470-4be2-8d66-90e836cbb051' EQU 'fceda083-1203-402a-8ec4-3d7ed9f3648c' (wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "8d368fc1-9470-4be2-8d66-90e836cbb051" && (exit /b ) ) >if /I '8d368fc1-9470-4be2-8d66-90e836cbb051' EQU 'aaea0dc8-78e1-4343-9f25-b69b83dd1bce' (wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "f510af75-8ab7-4426-a236-1bfb95c34ff8" && (exit /b ) ) >if /I '8d368fc1-9470-4be2-8d66-90e836cbb051' EQU '4ab4d849-aabc-43fb-87ee-3aed02518891' (wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "fa187091-8246-47b1-964f-80a0b1e5d69a" && (exit /b ) ) >wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "8d368fc1-9470-4be2-8d66-90e836cbb051" && (echo. & call :activate & exit /b ) ID=8d368fc1-9470-4be2-8d66-90e836cbb051 >set S_OK=1 >if SoftwareLicensingService EQU SoftwareLicensingService ( if 1 EQU 0 (reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\8d368fc1-9470-4be2-8d66-90e836cbb051" /f 1>nul 2>nul ) else ( reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663\8d368fc1-9470-4be2-8d66-90e836cbb051" /f 1>nul 2>nul call :offoem ) if 19045 GEQ 9600 reg delete "HKU\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\PersistedSystemState" /f 1>nul 2>nul ) else ( reg delete "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform\59a52881-a989-479d-af46-f275c6370663\8d368fc1-9470-4be2-8d66-90e836cbb051" /f 1>nul 2>nul reg delete "HKLM\SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform\0ff1ce15-a989-479d-af46-f275c6370663\8d368fc1-9470-4be2-8d66-90e836cbb051" /f 1>nul 2>nul call :offoem ) >set _orv=16 >if "24" == "15" set _orv=15 >if "24" == "14" exit /b >reg delete "HKLM\SOFTWARE\Microsoft\Office\16.0\Common\OEM" /f 1>nul 2>nul >reg delete "HKLM\SOFTWARE\Microsoft\Office\16.0\Common\OEM" /f /reg:32 1>nul 2>nul >exit /b >call :qrQuery SoftwareLicensingProduct "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name" exit /b ) >if 1 EQU 0 if 1 EQU 0 if SoftwareLicensingService EQU SoftwareLicensingService ( reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\8d368fc1-9470-4be2-8d66-90e836cbb051" /f /v KeyManagementServiceName /t REG_SZ /d "127.0.0.2" reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\8d368fc1-9470-4be2-8d66-90e836cbb051" /f /v KeyManagementServicePort /t REG_SZ /d "1688" reg add "HKU\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\55c92734-d682-4d71-983e-d6ec3f16059f\8d368fc1-9470-4be2-8d66-90e836cbb051" /f /v DiscoveredKeyManagementServiceIpAddress /t REG_SZ /d "127.0.0.2" for /F "tokens=2 delims==" %x in ('wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name /value') do echo Checking: %x echo Product is KMS 2038 Activated. exit /b ) >rem call :qrQuery SoftwareLicensingProduct "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" Name >if 0 EQU 0 for /F "tokens=2 delims==" %x in ('wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name /value') do echo Activating: %x >echo Activating: Office 24, Office24ProPlus2024VL_KMS_Client_AE edition Activating: Office 24, Office24ProPlus2024VL_KMS_Client_AE edition >if 0 EQU 1 for /F "tokens=2 delims==f" %x in ('wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get Name /value') do echo Activating: %x >set ESU_ADD=0 >call :qrMethod SoftwareLicensingProduct ID 8d368fc1-9470-4be2-8d66-90e836cbb051 Activate >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where ID='8d368fc1-9470-4be2-8d66-90e836cbb051' call Activate" exit /b ) >wmic path SoftwareLicensingProduct where ID='8d368fc1-9470-4be2-8d66-90e836cbb051' call Activate Executing (\\ADMIN27\root\cimv2:SoftwareLicensingProduct.ID="8d368fc1-9470-4be2-8d66-90e836cbb051")->Activate() Method execution successful. Out Parameters: instance of __PARAMETERS { }; >call set ERRORCODE=0 >if 0 EQU -1073418187 ( echo Product Activation Failed: 0xC004F035 if Win8 EQU Win7 echo Windows 7 cannot be KMS-activated on this computer due to unqualified OEM BIOS. echo See Read Me for details. exit /b ) >if 0 EQU -1073417728 ( echo Product Activation Failed: 0xC004F200 echo Windows needs to rebuild the activation-related files. echo See KB2736303 for details. exit /b ) >if 0 EQU -1073422315 ( echo Product Activation Failed: 0xC004E015 echo Running slmgr.vbs /rilc to mitigate. if 0 NEQ 0 ( pushd "!_work!\bin" powershell -nop -c "$sls='SoftwareLicensingService'; cd -Lit ($env:__CD__); $f=[IO.File]::ReadAllText('.\xrm.txt') -split ':xrm\:.*'; iex ($f[1]); ReinstallLicenses" popd ) else (cscript.exe //NoLogo //B C:\WINDOWS\System32\slmgr.vbs /rilc ) ) >if 0 NEQ 0 ( if SoftwareLicensingService EQU SoftwareLicensingService (call :StopService sppsvc ) else (call :StopService osppsvc ) wmic path SoftwareLicensingProduct where ID='8d368fc1-9470-4be2-8d66-90e836cbb051' call Activate call set ERRORCODE=!ERRORLEVEL! ) >set gpr=0 >set gpr2=0 >call :qrQuery SoftwareLicensingProduct "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" GracePeriodRemaining >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get GracePeriodRemaining /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get GracePeriodRemaining" exit /b ) >for /F "tokens=2 delims==" %x in ('wmic path SoftwareLicensingProduct where "ID='8d368fc1-9470-4be2-8d66-90e836cbb051'" get GracePeriodRemaining /value') do (set gpr=%x & set /a "gpr2=(%x+1440-1)/1440" ) >(set gpr=259200 & set /a "gpr2=(259200 +1440-1)/1440" ) >if 0 EQU 0 if 259200 EQU 0 ( echo Product Activation succeeded, but Remaining Period failed to increase. if Win8 EQU Win7 echo This could be related to the error described in KB4487266 exit /b ) >set Act_OK=0 >if 259200 EQU 43200 if 1 EQU 0 if 19045 GEQ 9200 set Act_OK=1 >if 259200 EQU 64800 set Act_OK=1 >if 259200 GTR 259200 if 0 EQU 1 set Act_OK=1 >if 259200 EQU 259200 set Act_OK=1 >if 0 EQU 0 if 1 EQU 1 ( echo Product Activation Successful echo Remaining Period: 180 days (259200 minutes) exit /b ) Product Activation Successful Remaining Period: 180 days (259200 minutes) >(set app=fceda083-1203-402a-8ec4-3d7ed9f3648c & call :sppchkoff 1 ) >call :qrQuery SoftwareLicensingProduct "ID='fceda083-1203-402a-8ec4-3d7ed9f3648c'" Name >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "ID='fceda083-1203-402a-8ec4-3d7ed9f3648c'" get Name /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "ID='fceda083-1203-402a-8ec4-3d7ed9f3648c'" get Name" exit /b ) >wmic path SoftwareLicensingProduct where "ID='fceda083-1203-402a-8ec4-3d7ed9f3648c'" get Name /value 1>"!_temp!\sppchk.txt" >set _eof=0 >for %A in (14 15 16 19 21 24) do (find /i "Office %A" "!_temp!\sppchk.txt" && (if !loc_off%A! EQU 0 set _eof=1 ) ) >(find /i "Office 14" "!_temp!\sppchk.txt" && (if !loc_off14! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 15" "!_temp!\sppchk.txt" && (if !loc_off15! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 16" "!_temp!\sppchk.txt" && (if !loc_off16! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 19" "!_temp!\sppchk.txt" && (if !loc_off19! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 21" "!_temp!\sppchk.txt" && (if !loc_off21! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT >(find /i "Office 24" "!_temp!\sppchk.txt" && (if !loc_off24! EQU 0 set _eof=1 ) ) ---------- C:\WINDOWS\TEMP\SPPCHK.TXT Name=Office 24, Office24ProPlus2024PreviewVL_KMS_Client_AE edition >if 0 EQU 1 exit /b >if 1 EQU 1 (set _officespp=1 ) else (set _officespp=0 ) >rem call :qrQuery SoftwareLicensingProduct "ID='fceda083-1203-402a-8ec4-3d7ed9f3648c'" Name >for /F "tokens=3 delims==, " %G in ('wmic path SoftwareLicensingProduct where "ID='fceda083-1203-402a-8ec4-3d7ed9f3648c'" get Name /value') do set OffVer=%G >set OffVer=24 >call :qrQuery SoftwareLicensingProduct "PartialProductKey is not NULL" ID >set "_quxt=" >set "_quxt=" >if 1 EQU 1 ( set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value" if defined _quxt set "_qr=wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID" exit /b ) >if /I 'fceda083-1203-402a-8ec4-3d7ed9f3648c' EQU 'fceda083-1203-402a-8ec4-3d7ed9f3648c' (wmic path SoftwareLicensingProduct where "PartialProductKey is not NULL" get ID /value | findstr /i "8d368fc1-9470-4be2-8d66-90e836cbb051" && (exit /b ) ) ID=8d368fc1-9470-4be2-8d66-90e836cbb051 >if 1 EQU 0 (call :cREG ) else ( reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /f /v DisableDnsPublishing 1>nul 2>nul reg delete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /f /v DisableKeyManagementServiceHostCaching 1>nul 2>nul ) >exit /b >if 1 NEQ 0 call :RunOSPP >set spp=OfficeSoftwareProtectionProduct >set sps=OfficeSoftwareProtectionService >set Off1ce=0 >set RanR2V=0 >for %A in (15 16 19 21 24) do set aC2R%A=0 >set aC2R15=0 >set aC2R16=0 >set aC2R19=0 >set aC2R21=0 >set aC2R24=0 >if 19045 LSS 9200 (set "aword=2010-2024" ) else (set "aword=2010" ) >if 0 EQU 0 (echo. & echo No Installed Office 2010 Product Detected... & exit /b ) No Installed Office 2010 Product Detected... >if 1 EQU 0 (echo. & echo Office activation is OFF... ) >if 1 EQU 0 if 0 EQU 0 call :CheckFR >if exist "!_temp!\crv*.txt" del /f /q "!_temp!\crv*.txt" >if exist "!_temp!\*chk.txt" del /f /q "!_temp!\*chk.txt" >if exist "!_temp!\slmgr.vbs" del /f /q "!_temp!\slmgr.vbs" >call :StopService sppsvc >sc query sppsvc | find /i "STOPPED" || net stop sppsvc /y The Software Protection service is stopping. The Software Protection service was stopped successfully. >sc query sppsvc | find /i "STOPPED" || sc stop sppsvc STATE : 1 STOPPED >goto :eof >if 0 NEQ 0 call :StopService osppsvc >if 1 EQU 0 call :RemoveHook >set "d1=$t=[AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1).DefineDynamicModule(2, $False).DefineType(0);" >set "d2=[void]$t.DefinePInvokeMethod('SLpTriggerServiceWorker', 'sppc.dll', 22, 1, [Int32], @([UInt32], [IntPtr], [String], [UInt32]), 1, 3);" >set "d3=[void]$t.CreateType()::SLpTriggerServiceWorker(0, 0, 'reeval', 0);" >if 19045 GEQ 9200 ( if 1 EQU 1 powershell -nop -c "!d1! !d2! !d3!" if 1 EQU 0 sc start sppsvc trigger=reeval;sessionid=0 ) >echo. >goto :TheEnd >echo. >if 0 EQU 0 echo Press any key to exit. Press any key to exit. >goto :eof Thanks again.
Thanks for some reason the script can't detect retail licenses (IDs) for Publisher (maybe due first conversion attempt which remove licenses) can you run this in command prompt and post result? Code: wmic path SoftwareLicensingProduct where "ApplicationID='0ff1ce15-a989-479d-af46-f275c6370663' AND NOT Name like '%O365%'" get Name /value
Would you mind sharing a screenshot or even better share your folder (minus your installers) of your full install folder please? I'm looking to install publisher 2021 alongside LTSC 2024.
Keep in mind that Publisher is still included in Office 365, which means you can easily get it without much fiddling if you don't opt for the "LTSC 2024" tag.
I'll have a test with O365 as well. I have my own KMS server so that's why I was using the LTSC enterprise editions. Question: I don't think 0365 can be activated with KMS can it? PS: I think I found out how to do Office 2024 / Publisher 2021 side by side install with C2R_Custom now. Was a little complex at first but now I got my config file and installer file ready it installs editions perfectly fine.