1292 lines
44 KiB
Batchfile
1292 lines
44 KiB
Batchfile
@set masver=2.6
|
|
@echo off
|
|
|
|
|
|
|
|
::============================================================================
|
|
::
|
|
:: Homepage: mass grave[.]dev
|
|
:: Email: mas.help@outlook.com
|
|
::
|
|
::============================================================================
|
|
|
|
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Set environment variables, it helps if they are misconfigured in the system
|
|
|
|
setlocal EnableExtensions
|
|
setlocal DisableDelayedExpansion
|
|
|
|
set "PathExt=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC"
|
|
|
|
set "SysPath=%SystemRoot%\System32"
|
|
set "Path=%SystemRoot%\System32;%SystemRoot%;%SystemRoot%\System32\Wbem;%SystemRoot%\System32\WindowsPowerShell\v1.0\"
|
|
if exist "%SystemRoot%\Sysnative\reg.exe" (
|
|
set "SysPath=%SystemRoot%\Sysnative"
|
|
set "Path=%SystemRoot%\Sysnative;%SystemRoot%;%SystemRoot%\Sysnative\Wbem;%SystemRoot%\Sysnative\WindowsPowerShell\v1.0\;%Path%"
|
|
)
|
|
|
|
set "ComSpec=%SysPath%\cmd.exe"
|
|
set "PSModulePath=%ProgramFiles%\WindowsPowerShell\Modules;%SysPath%\WindowsPowerShell\v1.0\Modules"
|
|
|
|
set "_cmdf=%~f0"
|
|
for %%# in (%*) do (
|
|
if /i "%%#"=="r1" set r1=1
|
|
if /i "%%#"=="r2" set r2=1
|
|
)
|
|
|
|
:: Re-launch the script with x64 process if it was initiated by x86 process on x64 bit Windows
|
|
:: or with ARM64 process if it was initiated by x86/ARM32 process on ARM64 Windows
|
|
|
|
if exist %SystemRoot%\Sysnative\cmd.exe if not defined r1 (
|
|
setlocal EnableDelayedExpansion
|
|
start %SystemRoot%\Sysnative\cmd.exe /c ""!_cmdf!" %* r1"
|
|
exit /b
|
|
)
|
|
|
|
:: Re-launch the script with ARM32 process if it was initiated by x64 process on ARM64 Windows
|
|
|
|
if exist %SystemRoot%\SysArm32\cmd.exe if %PROCESSOR_ARCHITECTURE%==AMD64 if not defined r2 (
|
|
setlocal EnableDelayedExpansion
|
|
start %SystemRoot%\SysArm32\cmd.exe /c ""!_cmdf!" %* r2"
|
|
exit /b
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
set "blank="
|
|
set "mas=ht%blank%tps%blank%://mass%blank%grave.dev/"
|
|
|
|
:: Check if Null service is working, it's important for the batch script
|
|
|
|
sc query Null | find /i "RUNNING"
|
|
if %errorlevel% NEQ 0 (
|
|
echo:
|
|
echo Null service is not running, script may crash...
|
|
echo:
|
|
echo:
|
|
echo Help - %mas%troubleshoot
|
|
echo:
|
|
echo:
|
|
ping 127.0.0.1 -n 20
|
|
)
|
|
cls
|
|
|
|
:: Check LF line ending
|
|
|
|
pushd "%~dp0"
|
|
>nul findstr /v "$" "%~nx0" && (
|
|
echo:
|
|
echo Error - Script either has LF line ending issue or an empty line at the end of the script is missing.
|
|
echo:
|
|
echo:
|
|
echo Help - %mas%troubleshoot
|
|
echo:
|
|
echo:
|
|
ping 127.0.0.1 -n 20 >nul
|
|
popd
|
|
exit /b
|
|
)
|
|
popd
|
|
|
|
::========================================================================================================================================
|
|
|
|
cls
|
|
color 07
|
|
title Change Office Edition %masver%
|
|
|
|
set _args=
|
|
set _elev=
|
|
set _unattended=0
|
|
|
|
set _args=%*
|
|
if defined _args set _args=%_args:"=%
|
|
if defined _args (
|
|
for %%A in (%_args%) do (
|
|
if /i "%%A"=="-el" set _elev=1
|
|
)
|
|
)
|
|
|
|
set "nul1=1>nul"
|
|
set "nul2=2>nul"
|
|
set "nul6=2^>nul"
|
|
set "nul=>nul 2>&1"
|
|
|
|
call :dk_setvar
|
|
set "line=echo ___________________________________________________________________________________________"
|
|
|
|
::========================================================================================================================================
|
|
|
|
if %winbuild% LSS 7600 (
|
|
%nceline%
|
|
echo Unsupported OS version detected [%winbuild%].
|
|
echo Project is supported only for Windows 7/8/8.1/10/11 and their Server equivalents.
|
|
goto dk_done
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Fix special character limitations in path name
|
|
|
|
set "_work=%~dp0"
|
|
if "%_work:~-1%"=="\" set "_work=%_work:~0,-1%"
|
|
|
|
set "_batf=%~f0"
|
|
set "_batp=%_batf:'=''%"
|
|
|
|
set _PSarg="""%~f0""" -el %_args%
|
|
set _PSarg=%_PSarg:'=''%
|
|
|
|
set "_ttemp=%userprofile%\AppData\Local\Temp"
|
|
|
|
setlocal EnableDelayedExpansion
|
|
|
|
::========================================================================================================================================
|
|
|
|
echo "!_batf!" | find /i "!_ttemp!" %nul1% && (
|
|
if /i not "!_work!"=="!_ttemp!" (
|
|
%eline%
|
|
echo The script was launched from the temp folder.
|
|
echo You are most likely running the script directly from the archive file.
|
|
echo:
|
|
echo Extract the archive file and launch the script from the extracted folder.
|
|
goto dk_done
|
|
)
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Check PowerShell
|
|
|
|
REM :PowerShellTest: $ExecutionContext.SessionState.LanguageMode :PowerShellTest:
|
|
|
|
cmd /c "%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':PowerShellTest:\s*';iex ($f[1])"" | find /i "FullLanguage" %nul1% || (
|
|
%eline%
|
|
cmd /c "%psc% "$ExecutionContext.SessionState.LanguageMode""
|
|
echo:
|
|
cmd /c "%psc% "$ExecutionContext.SessionState.LanguageMode"" | find /i "FullLanguage" %nul1% && (
|
|
echo Failed to run Powershell command but Powershell is working.
|
|
call :dk_color %Blue% "Check if your antivirus is blocking the script."
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
) || (
|
|
echo PowerShell is not working. Aborting...
|
|
echo If you have applied restrictions on Powershell then undo those changes.
|
|
echo:
|
|
set fixes=%fixes% %mas%fix_powershell
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%fix_powershell"
|
|
)
|
|
goto dk_done
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Elevate script as admin and pass arguments and preventing loop
|
|
|
|
%nul1% fltmc || (
|
|
if not defined _elev %psc% "start cmd.exe -arg '/c \"!_PSarg!\"' -verb runas" && exit /b
|
|
%eline%
|
|
echo This script needs admin rights.
|
|
echo Right click on this script and select 'Run as administrator'.
|
|
goto dk_done
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Disable QuickEdit and launch from conhost.exe to avoid Terminal app
|
|
|
|
if %winbuild% GEQ 17763 (
|
|
set terminal=1
|
|
) else (
|
|
set terminal=
|
|
)
|
|
|
|
:: Check if script is running in Terminal app
|
|
|
|
set r1=$TB = [AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1).DefineDynamicModule(2, $False).DefineType(0);
|
|
set r2=%r1% [void]$TB.DefinePInvokeMethod('GetConsoleWindow', 'kernel32.dll', 22, 1, [IntPtr], @(), 1, 3).SetImplementationFlags(128);
|
|
set r3=%r2% [void]$TB.DefinePInvokeMethod('SendMessageW', 'user32.dll', 22, 1, [IntPtr], @([IntPtr], [UInt32], [IntPtr], [IntPtr]), 1, 3).SetImplementationFlags(128);
|
|
set d1=%r3% $hIcon = $TB.CreateType(); $hWnd = $hIcon::GetConsoleWindow();
|
|
set d2=%d1% echo $($hIcon::SendMessageW($hWnd, 127, 0, 0) -ne [IntPtr]::Zero);
|
|
|
|
if defined terminal (
|
|
%psc% "%d2%" %nul2% | find /i "True" %nul1% && set terminal=
|
|
)
|
|
|
|
if %_unattended%==1 goto :skipQE
|
|
for %%# in (%_args%) do (if /i "%%#"=="-qedit" goto :skipQE)
|
|
|
|
if defined terminal (
|
|
set "launchcmd=start conhost.exe %psc%"
|
|
) else (
|
|
set "launchcmd=%psc%"
|
|
)
|
|
|
|
:: Disable QuickEdit in current session
|
|
|
|
set "d1=$t=[AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1).DefineDynamicModule(2, $False).DefineType(0);"
|
|
set "d2=$t.DefinePInvokeMethod('GetStdHandle', 'kernel32.dll', 22, 1, [IntPtr], @([Int32]), 1, 3).SetImplementationFlags(128);"
|
|
set "d3=$t.DefinePInvokeMethod('SetConsoleMode', 'kernel32.dll', 22, 1, [Boolean], @([IntPtr], [Int32]), 1, 3).SetImplementationFlags(128);"
|
|
set "d4=$k=$t.CreateType(); $b=$k::SetConsoleMode($k::GetStdHandle(-10), 0x0080);"
|
|
|
|
%launchcmd% "%d1% %d2% %d3% %d4% & cmd.exe '/c' '!_PSarg! -qedit'" && (exit /b) || (set terminal=1)
|
|
:skipQE
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Check for updates
|
|
|
|
set -=
|
|
set old=
|
|
|
|
for /f "delims=[] tokens=2" %%# in ('ping -4 -n 1 updatecheck.mass%-%grave.dev') do (
|
|
if not "%%#"=="" (echo "%%#" | find "127.69" %nul1% && (echo "%%#" | find "127.69.%masver%" %nul1% || set old=1))
|
|
)
|
|
|
|
if defined old (
|
|
echo ________________________________________________
|
|
%eline%
|
|
echo Your version of MAS [%masver%] is outdated.
|
|
echo ________________________________________________
|
|
echo:
|
|
if not %_unattended%==1 (
|
|
echo [1] Get Latest MAS
|
|
echo [0] Continue Anyway
|
|
echo:
|
|
call :dk_color %_Green% "Choose a menu option using your keyboard [1,0] :"
|
|
choice /C:10 /N
|
|
if !errorlevel!==2 rem
|
|
if !errorlevel!==1 (start ht%-%tps://github.com/mass%-%gravel/Microsoft-Acti%-%vation-Scripts & start %mas% & exit /b)
|
|
)
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
cls
|
|
if not defined terminal mode 98, 30
|
|
title Change Office Edition %masver%
|
|
|
|
echo:
|
|
echo Initializing...
|
|
echo:
|
|
|
|
if not exist %SysPath%\sppsvc.exe (
|
|
%eline%
|
|
echo [%SysPath%\sppsvc.exe] file is missing. Aborting...
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
goto dk_done
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
set spp=SoftwareLicensingProduct
|
|
set sps=SoftwareLicensingService
|
|
|
|
call :dk_reflection
|
|
call :dk_ckeckwmic
|
|
call :dk_sppissue
|
|
|
|
for /f "tokens=6-7 delims=[]. " %%i in ('ver') do if not "%%j"=="" (
|
|
set fullbuild=%%i.%%j
|
|
) else (
|
|
for /f "tokens=3" %%G in ('"reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v UBR" %nul6%') do if not errorlevel 1 set /a "UBR=%%G"
|
|
for /f "skip=2 tokens=3,4 delims=. " %%G in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v BuildLabEx') do (
|
|
if defined UBR (set "fullbuild=%%G.!UBR!") else (set "fullbuild=%%G.%%H")
|
|
)
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Check Windows Edition
|
|
:: This is just to ensure that SPP/WMI are functional
|
|
|
|
cls
|
|
set osedition=0
|
|
if %_wmic% EQU 1 set "chkedi=for /f "tokens=2 delims==" %%a in ('"wmic path %spp% where (ApplicationID='55c92734-d682-4d71-983e-d6ec3f16059f' AND LicenseDependsOn is NULL AND PartialProductKey IS NOT NULL) get LicenseFamily /VALUE" %nul6%')"
|
|
if %_wmic% EQU 0 set "chkedi=for /f "tokens=2 delims==" %%a in ('%psc% "(([WMISEARCHER]'SELECT LicenseFamily FROM %spp% WHERE ApplicationID=''55c92734-d682-4d71-983e-d6ec3f16059f'' AND LicenseDependsOn is NULL AND PartialProductKey IS NOT NULL').Get()).LicenseFamily ^| %% {echo ('LicenseFamily='+$_)}" %nul6%')"
|
|
%chkedi% do if not errorlevel 1 (call set "osedition=%%a")
|
|
|
|
if %osedition%==0 (
|
|
%eline%
|
|
echo Failed to detect OS Edition. Aborting...
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
goto dk_done
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Check installed Office 16.0 C2R
|
|
|
|
set o16c2r=
|
|
set _68=HKLM\SOFTWARE\Microsoft\Office
|
|
set _86=HKLM\SOFTWARE\Wow6432Node\Microsoft\Office
|
|
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %_86%\ClickToRun /v InstallPath" %nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (set o16c2r=1&set o16c2r_reg=%_86%\ClickToRun)
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %_68%\ClickToRun /v InstallPath" %nul6%') do if exist "%%b\root\Licenses16\ProPlus*.xrm-ms" (set o16c2r=1&set o16c2r_reg=%_68%\ClickToRun)
|
|
|
|
if not defined o16c2r_reg (
|
|
echo:
|
|
echo:
|
|
echo Office C2R 2016 or later is not installed, which is required for this script.
|
|
echo Download and install Office from below URL and try again.
|
|
echo:
|
|
set fixes=%fixes% %mas%genuine-installation-media
|
|
call :dk_color %_Yellow% "%mas%genuine-installation-media"
|
|
goto dk_done
|
|
)
|
|
|
|
call :ch_getinfo
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Check minimum required details
|
|
|
|
if %verchk% LSS 9029 (
|
|
%eline%
|
|
echo Installed Office version is %_version%.
|
|
echo Minimum required version is 16.0.9029.2167
|
|
echo Aborting...
|
|
echo:
|
|
call :dk_color %Blue% "Download and install latest Office from below URL and try again."
|
|
set fixes=%fixes% %mas%genuine-installation-media
|
|
call :dk_color %_Yellow% "%mas%genuine-installation-media"
|
|
goto dk_done
|
|
)
|
|
|
|
for %%A in (
|
|
_oArch
|
|
_updch
|
|
_lang
|
|
_clversion
|
|
_version
|
|
_oIds
|
|
_c2rXml
|
|
_c2rExe
|
|
_c2rCexe
|
|
_masterxml
|
|
) do (
|
|
if not defined %%A (
|
|
%eline%
|
|
echo Failed to find %%A. Aborting...
|
|
echo:
|
|
call :dk_color %Blue% "Download and install Office from below URL and try again."
|
|
set fixes=%fixes% %mas%genuine-installation-media
|
|
call :dk_color %_Yellow% "%mas%genuine-installation-media"
|
|
goto dk_done
|
|
)
|
|
)
|
|
|
|
if %winbuild% LSS 10240 if defined ltscfound (
|
|
%eline%
|
|
echo Installed Office appears to be from the Volume channel %ltsc19%%ltsc21%%ltsc24%,
|
|
echo which is not officially supported on your Windows build version %winbuild%.
|
|
echo Aborting...
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
goto dk_done
|
|
)
|
|
|
|
set unsupbuild=
|
|
if %winbuild% LSS 10240 if %winbuild% GEQ 9200 if %verchk% GTR 16026 set unsupbuild=1
|
|
if %winbuild% LSS 9200 if %verchk% GTR 12527 set unsupbuild=1
|
|
|
|
if defined unsupbuild (
|
|
%eline%
|
|
echo Unsupported Office %verchk% is installed on your Windows build version %winbuild%.
|
|
echo Aborting...
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
goto dk_done
|
|
)
|
|
|
|
::========================================================================================================================================
|
|
|
|
:oemenu
|
|
|
|
cls
|
|
set fixes=
|
|
if not defined terminal mode 76, 25
|
|
title Change Office Edition %masver%
|
|
echo:
|
|
echo:
|
|
echo:
|
|
echo:
|
|
echo ____________________________________________________________
|
|
echo:
|
|
echo [1] Change - Office Edition
|
|
echo [2] Add - Office Edition
|
|
echo [3] Remove - Office Edition
|
|
echo ____________________________________________
|
|
echo:
|
|
echo [4] Change Office Update Channel
|
|
echo [0] %_exitmsg%
|
|
echo ____________________________________________________________
|
|
echo:
|
|
call :dk_color2 %_White% " " %_Green% "Choose a menu option using your keyboard [1,2,3,4,0]"
|
|
choice /C:12340 /N
|
|
set _el=!errorlevel!
|
|
if !_el!==5 exit /b
|
|
if !_el!==4 goto :oe_changeupdchnl
|
|
if !_el!==3 goto :oe_removeedition
|
|
if !_el!==2 set change=0& goto :oe_edition
|
|
if !_el!==1 set change=1& goto :oe_edition
|
|
goto :oemenu
|
|
|
|
::========================================================================================================================================
|
|
|
|
:oe_edition
|
|
|
|
cls
|
|
call :oe_chkinternet
|
|
if not defined _int (
|
|
goto :oe_goback
|
|
)
|
|
|
|
cls
|
|
if not defined terminal mode 76, 25
|
|
title Change Office Edition %masver%
|
|
echo:
|
|
echo:
|
|
echo:
|
|
echo:
|
|
echo O365/Mondo editions have the latest features.
|
|
echo ____________________________________________________________
|
|
echo:
|
|
echo [1] Office Suites - Retail
|
|
echo [2] Office Suites - Volume
|
|
echo [3] Office SingleApps - Retail
|
|
echo [4] Office SingleApps - Volume
|
|
echo ____________________________________________
|
|
echo:
|
|
echo [0] Go Back
|
|
echo ____________________________________________________________
|
|
echo:
|
|
call :dk_color2 %_White% " " %_Green% "Choose a menu option using your keyboard [1,2,3,4,0]"
|
|
choice /C:12340 /N
|
|
set _el=!errorlevel!
|
|
if !_el!==5 goto :oemenu
|
|
if !_el!==4 set list=SingleApps_Volume&goto :oe_editionchangepre
|
|
if !_el!==3 set list=SingleApps_Retail&goto :oe_editionchangepre
|
|
if !_el!==2 set list=Suites_Volume&goto :oe_editionchangepre
|
|
if !_el!==1 set list=Suites_Retail&goto :oe_editionchangepre
|
|
goto :oe_edition
|
|
|
|
::========================================================================================================================================
|
|
|
|
:oe_editionchangepre
|
|
|
|
cls
|
|
call :ch_getinfo
|
|
call :oe_tempcleanup
|
|
%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':getlist\:.*';iex ($f[1])"
|
|
|
|
:oe_editionchange
|
|
|
|
cls
|
|
if not defined terminal (
|
|
mode 98, 45
|
|
%psc% "&{$W=$Host.UI.RawUI.WindowSize;$B=$Host.UI.RawUI.BufferSize;$W.Height=44;$B.Height=100;$Host.UI.RawUI.WindowSize=$W;$Host.UI.RawUI.BufferSize=$B;}" %nul%
|
|
)
|
|
|
|
if not exist %SystemRoot%\Temp\%list%.txt (
|
|
%eline%
|
|
echo Failed to generate available editions list.
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
goto :oe_goback
|
|
)
|
|
|
|
set inpt=
|
|
set counter=0
|
|
set verified=0
|
|
set targetedition=
|
|
|
|
%line%
|
|
echo:
|
|
call :dk_color %Gray% "Installed Office editions: %_oIds%"
|
|
call :dk_color %Gray% "You can select one of the following Office Editions."
|
|
if %winbuild% LSS 10240 echo Unsupported products such as 2019/2021/2024 are excluded from this list.
|
|
%line%
|
|
echo:
|
|
|
|
for /f "usebackq delims=" %%A in (%SystemRoot%\Temp\%list%.txt) do (
|
|
set /a counter+=1
|
|
if !counter! LSS 10 (
|
|
echo [!counter!] %%A
|
|
) else (
|
|
echo [!counter!] %%A
|
|
)
|
|
set targetedition!counter!=%%A
|
|
)
|
|
|
|
%line%
|
|
echo:
|
|
echo [0] Go Back
|
|
echo:
|
|
call :dk_color %_Green% "Enter an option number using your keyboard and press Enter to confirm:"
|
|
set /p inpt=
|
|
if "%inpt%"=="" goto :oe_editionchange
|
|
if "%inpt%"=="0" (call :oe_tempcleanup & goto :oe_edition)
|
|
for /l %%i in (1,1,%counter%) do (if "%inpt%"=="%%i" set verified=1)
|
|
set targetedition=!targetedition%inpt%!
|
|
if %verified%==0 goto :oe_editionchange
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Set app exclusions
|
|
|
|
cls
|
|
set suites=
|
|
echo %list% | find /i "Suites" %nul1% && (
|
|
set suites=1
|
|
%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':getappnames\:.*';iex ($f[1])"
|
|
if not exist %SystemRoot%\Temp\getAppIds.txt (
|
|
%eline%
|
|
echo Failed to generate available apps list.
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
goto :oe_goback
|
|
)
|
|
)
|
|
|
|
for %%# in (
|
|
Access
|
|
Excel
|
|
Lync
|
|
OneNote
|
|
Outlook
|
|
PowerPoint
|
|
Project
|
|
Publisher
|
|
Visio
|
|
Word
|
|
) do (
|
|
if defined suites (
|
|
find /i "%%#" "%SystemRoot%\Temp\getAppIds.txt" %nul1% && (set %%#_st=On) || (set %%#_st=)
|
|
) else (
|
|
set %%#_st=
|
|
)
|
|
)
|
|
|
|
if defined Lync_st set Lync_st=Off
|
|
set OneDrive_st=Off
|
|
if defined suites (set Teams_st=Off) else (set Teams_st=)
|
|
|
|
:oe_excludeapps
|
|
|
|
cls
|
|
if not defined terminal mode 98, 32
|
|
|
|
%line%
|
|
echo:
|
|
call :dk_color %Gray% "Target edition: %targetedition%"
|
|
call :dk_color %Gray% "You can exclude the below apps from installation."
|
|
%line%
|
|
if defined suites echo:
|
|
if defined Access_st echo [A] Access : %Access_st%
|
|
if defined Excel_st echo [E] Excel : %Excel_st%
|
|
if defined OneNote_st echo [N] OneNote : %OneNote_st%
|
|
if defined Outlook_st echo [O] Outlook : %Outlook_st%
|
|
if defined PowerPoint_st echo [P] PowerPoint : %PowerPoint_st%
|
|
if defined Project_st echo [J] Project : %Project_st%
|
|
if defined Publisher_st echo [R] Publisher : %Publisher_st%
|
|
if defined Visio_st echo [V] Visio : %Visio_st%
|
|
if defined Word_st echo [W] Word : %Word_st%
|
|
echo:
|
|
if defined Lync_st echo [L] SkypeForBusiness : %Lync_st%
|
|
if defined OneDrive_st echo [D] OneDrive : %OneDrive_st%
|
|
if defined Teams_st echo [T] Teams : %Teams_st%
|
|
%line%
|
|
echo:
|
|
echo [1] Continue
|
|
echo [0] Go Back
|
|
%line%
|
|
echo:
|
|
call :dk_color %_Green% "Choose a menu option using your keyboard:"
|
|
choice /C:AENOPJRVWLDT10 /N
|
|
set _el=!errorlevel!
|
|
if !_el!==14 goto :oe_editionchangepre
|
|
if !_el!==13 call :excludelist & goto :oe_editionchangefinal
|
|
if !_el!==12 if defined Teams_st (if "%Teams_st%"=="Off" (set Teams_st=ON) else (set Teams_st=Off))
|
|
if !_el!==11 if defined OneDrive_st (if "%OneDrive_st%"=="Off" (set OneDrive_st=ON) else (set OneDrive_st=Off))
|
|
if !_el!==10 if defined Lync_st (if "%Lync_st%"=="Off" (set Lync_st=ON) else (set Lync_st=Off))
|
|
if !_el!==9 if defined Word_st (if "%Word_st%"=="Off" (set Word_st=ON) else (set Word_st=Off))
|
|
if !_el!==8 if defined Visio_st (if "%Visio_st%"=="Off" (set Visio_st=ON) else (set Visio_st=Off))
|
|
if !_el!==7 if defined Publisher_st (if "%Publisher_st%"=="Off" (set Publisher_st=ON) else (set Publisher_st=Off))
|
|
if !_el!==6 if defined Project_st (if "%Project_st%"=="Off" (set Project_st=ON) else (set Project_st=Off))
|
|
if !_el!==5 if defined PowerPoint_st (if "%PowerPoint_st%"=="Off" (set PowerPoint_st=ON) else (set PowerPoint_st=Off))
|
|
if !_el!==4 if defined Outlook_st (if "%Outlook_st%"=="Off" (set Outlook_st=ON) else (set Outlook_st=Off))
|
|
if !_el!==3 if defined OneNote_st (if "%OneNote_st%"=="Off" (set OneNote_st=ON) else (set OneNote_st=Off))
|
|
if !_el!==2 if defined Excel_st (if "%Excel_st%"=="Off" (set Excel_st=ON) else (set Excel_st=Off))
|
|
if !_el!==1 if defined Access_st (if "%Access_st%"=="Off" (set Access_st=ON) else (set Access_st=Off))
|
|
goto :oe_excludeapps
|
|
|
|
:excludelist
|
|
|
|
set excludelist=
|
|
for %%# in (
|
|
Access
|
|
Excel
|
|
OneNote
|
|
Outlook
|
|
PowerPoint
|
|
Project
|
|
Publisher
|
|
Visio
|
|
Word
|
|
Lync
|
|
OneDrive
|
|
Teams
|
|
) do (
|
|
if /i "!%%#_st!"=="Off" if defined excludelist (set excludelist=!excludelist!,%%#) else (set excludelist=,%%#)
|
|
)
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Final command to change/add edition
|
|
|
|
:oe_editionchangefinal
|
|
|
|
cls
|
|
if not defined terminal mode 105, 32
|
|
|
|
:: Thanks to May, aka Alex for suggesting this method
|
|
:: OfficeClickToRun.exe with productstoadd method is used here to add editions
|
|
:: It uses delta updates, meaning that since its using same installed build, it will consume very less Internet
|
|
|
|
set "c2rcommand="%_c2rExe%" platform=%_oArch% culture=%_lang% productstoadd=%targetedition%.16_%_lang%_x-none cdnbaseurl.16=http://officecdn.microsoft.com/pr/%_updch% baseurl.16=http://officecdn.microsoft.com/pr/%_updch% version.16=%_version% mediatype.16=CDN sourcetype.16=CDN deliverymechanism=%_updch% %targetedition%.excludedapps.16=Groove%excludelist% flt.useteamsaddon=disabled flt.usebingaddononinstall=disabled flt.usebingaddononupdate=disabled"
|
|
|
|
if %change%==1 (
|
|
set "c2rcommand=!c2rcommand! productstoremove=AllProducts"
|
|
)
|
|
|
|
echo:
|
|
echo Running the below command, please wait...
|
|
echo:
|
|
echo %c2rcommand%
|
|
%c2rcommand%
|
|
set errorcode=%errorlevel%
|
|
timeout /t 10 %nul%
|
|
|
|
echo:
|
|
call :dk_color %Gray% "Now run the Office activation option from the main menu."
|
|
|
|
if %errorcode% NEQ 0 (
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
)
|
|
|
|
call :oe_tempcleanup
|
|
goto :oe_goback
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Remove Office editions
|
|
|
|
:oe_removeedition
|
|
|
|
call :ch_getinfo
|
|
|
|
cls
|
|
if not defined terminal (
|
|
mode 98, 35
|
|
)
|
|
|
|
set counter=0
|
|
for %%A in (%_oIds%) do (set /a counter+=1)
|
|
|
|
for %%A in (%_oIds%) do (
|
|
if !counter! LEQ 1 (
|
|
echo:
|
|
echo Only "%%A" product is installed.
|
|
echo This option is available only when multiple products are installed.
|
|
goto :oe_goback
|
|
)
|
|
)
|
|
|
|
::===============
|
|
|
|
set inpt=
|
|
set counter=0
|
|
set verified=0
|
|
set targetedition=
|
|
|
|
%line%
|
|
echo:
|
|
call :dk_color %Gray% "You can uninstall one of the following Office editions."
|
|
%line%
|
|
echo:
|
|
|
|
for %%A in (%_oIds%) do (
|
|
set /a counter+=1
|
|
echo [!counter!] %%A
|
|
set targetedition!counter!=%%A
|
|
)
|
|
|
|
%line%
|
|
echo:
|
|
echo [0] Go Back
|
|
echo:
|
|
call :dk_color %_Green% "Enter an option number using your keyboard and press Enter to confirm:"
|
|
set /p inpt=
|
|
if "%inpt%"=="" goto :oe_removeedition
|
|
if "%inpt%"=="0" goto :oemenu
|
|
for /l %%i in (1,1,%counter%) do (if "%inpt%"=="%%i" set verified=1)
|
|
set targetedition=!targetedition%inpt%!
|
|
if %verified%==0 goto :oe_removeedition
|
|
|
|
::===============
|
|
|
|
cls
|
|
if not defined terminal mode 105, 32
|
|
|
|
set _lang=
|
|
echo "%o16c2r_reg%" | find /i "Wow6432Node" %nul1% && (set _tok=10) || (set _tok=9)
|
|
for /f "tokens=%_tok% delims=\" %%a in ('reg query "%o16c2r_reg%\ProductReleaseIDs\%_actconfig%\%targetedition%.16" /f "-" /k ^| findstr /i ".*16\\.*-.*"') do (
|
|
if defined _lang (set "_lang=!_lang!_%%a") else (set "_lang=_%%a")
|
|
)
|
|
|
|
set "c2rcommand="%_c2rExe%" platform=%_oArch% productstoremove=%targetedition%.16%_lang%"
|
|
|
|
echo:
|
|
echo Running the below command, please wait...
|
|
echo:
|
|
echo %c2rcommand%
|
|
%c2rcommand%
|
|
|
|
if %errorlevel% NEQ 0 (
|
|
echo:
|
|
set fixes=%fixes% %mas%troubleshoot
|
|
call :dk_color2 %Blue% "Help - " %_Yellow% " %mas%troubleshoot"
|
|
)
|
|
|
|
goto :oe_goback
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Change Office update channel
|
|
|
|
:oe_changeupdchnl
|
|
|
|
call :ch_getinfo
|
|
|
|
cls
|
|
if not defined terminal (
|
|
mode 98, 33
|
|
)
|
|
|
|
call :oe_chkinternet
|
|
if not defined _int (
|
|
goto :oe_goback
|
|
)
|
|
|
|
if %winbuild% LSS 10240 (
|
|
echo %_oIds% | findstr "2019 2021 2024" %nul% && (
|
|
%eline%
|
|
echo Installed Office editions: %_oIds%
|
|
echo Unsupported Office edition is installed on your Windows build version %winbuild%.
|
|
goto :oe_goback
|
|
)
|
|
)
|
|
|
|
::===============
|
|
|
|
set inpt=
|
|
set counter=0
|
|
set verified=0
|
|
set targetFFN=
|
|
set targetchannel=
|
|
|
|
%line%
|
|
echo:
|
|
call :dk_color %Gray% "Installed update channel: %_AudienceData% - %_version% Client: %_clversion%"
|
|
call :dk_color %Gray% "Unsupported update channels are excluded from this list."
|
|
%line%
|
|
echo:
|
|
|
|
for %%# in (
|
|
"5440FD1F-7ECB-4221-8110-145EFAA6372F_Insider Fast [Beta] - Insiders::DevMain"
|
|
"64256AFE-F5D9-4F86-8936-8840A6A4F5BE_Monthly Preview - Insiders::CC"
|
|
"492350F6-3A01-4F97-B9C0-C7C6DDF67D60_Monthly [Current] - Production::CC"
|
|
"55336B82-A18D-4DD6-B5F6-9E5095C314A6_Monthly Enterprise - Production::MEC"
|
|
"B8F9B850-328D-4355-9145-C59439A0C4CF_Semi Annual Preview - Insiders::FRDC"
|
|
"7FFBC6BF-BC32-4F92-8982-F9DD17FD3114_Semi Annual - Production::DC"
|
|
"EA4A4090-DE26-49D7-93C1-91BFF9E53FC3_DevMain Channel - Dogfood::DevMain"
|
|
"B61285DD-D9F7-41F2-9757-8F61CBA4E9C8_Microsoft Elite - Microsoft::DevMain"
|
|
"F2E724C1-748F-4B47-8FB8-8E0D210E9208_Perpetual2019 VL - Production::LTSC"
|
|
"1D2D2EA6-1680-4C56-AC58-A441C8C24FF9_Microsoft2019 VL - Microsoft::LTSC"
|
|
"5030841D-C919-4594-8D2D-84AE4F96E58E_Perpetual2021 VL - Production::LTSC2021"
|
|
"86752282-5841-4120-AC80-DB03AE6B5FDB_Microsoft2021 VL - Microsoft::LTSC2021"
|
|
"7983BAC0-E531-40CF-BE00-FD24FE66619C_Perpetual2024 VL - Production::LTSC2024"
|
|
"C02D8FE6-5242-4DA8-972F-82EE55E00671_Microsoft2024 VL - Microsoft::LTSC2024"
|
|
) do (
|
|
for /f "tokens=1-2 delims=_" %%A in ("%%~#") do (
|
|
set supported=
|
|
if %winbuild% LSS 10240 (echo %%B | findstr /i "LTSC DevMain" %nul% || set supported=1) else (set supported=1)
|
|
if %winbuild% GEQ 10240 (if defined ltsc19 echo %%B | findstr /i "LTSC\>" %nul% || set supported=)
|
|
if %winbuild% GEQ 10240 (if defined ltsc21 echo %%B | findstr /i "LTSC2021\>" %nul% || set supported=)
|
|
if %winbuild% GEQ 10240 (if defined ltsc24 echo %%B | findstr /i "LTSC2024\>" %nul% || set supported=)
|
|
if %winbuild% GEQ 10240 (if not defined ltscfound echo %%B | findstr /i "LTSC" %nul% && set supported=)
|
|
if defined supported (
|
|
set /a counter+=1
|
|
if !counter! LSS 10 (
|
|
echo [!counter!] %%B
|
|
) else (
|
|
echo [!counter!] %%B
|
|
)
|
|
set targetFFN!counter!=%%A
|
|
set targetchannel!counter!=%%B
|
|
)
|
|
)
|
|
)
|
|
|
|
%line%
|
|
echo:
|
|
echo [R] Learn about update channels
|
|
echo [0] Go back
|
|
echo:
|
|
call :dk_color %_Green% "Enter an option number using your keyboard and press Enter to confirm:"
|
|
set /p inpt=
|
|
if "%inpt%"=="" goto :oe_changeupdchnl
|
|
if "%inpt%"=="0" goto :oemenu
|
|
if /i "%inpt%"=="R" start https://learn.microsoft.com/microsoft-365-apps/updates/overview-update-channels & goto :oe_changeupdchnl
|
|
for /l %%i in (1,1,%counter%) do (if "%inpt%"=="%%i" set verified=1)
|
|
set targetFFN=!targetFFN%inpt%!
|
|
set targetchannel=!targetchannel%inpt%!
|
|
if %verified%==0 goto :oe_changeupdchnl
|
|
|
|
::=======================
|
|
|
|
cls
|
|
if not defined terminal mode 105, 32
|
|
|
|
:: Get build number for the target FFN, using build number with OfficeC2RClient.exe command to trigger updates provides accurate results
|
|
|
|
set build=
|
|
for /f "delims=" %%a in ('%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':getbuild\:.*';iex ($f[1])" %nul6%') do (set build=%%a)
|
|
echo "%build%" | find /i "16." %nul% || set build=
|
|
|
|
:: Cleanup Office update related registries, thanks to @abbodi1406
|
|
:: https://techcommunity.microsoft.com/t5/office-365-blog/how-to-manage-office-365-proplus-channels-for-it-pros/ba-p/795813
|
|
:: https://learn.microsoft.com/en-us/microsoft-365-apps/updates/change-update-channels#considerations-when-changing-channels
|
|
|
|
echo:
|
|
for /f "tokens=1 delims=-" %%A in ("%targetchannel%") do (echo Target update channel: %%A)
|
|
echo:
|
|
echo Cleaning Office update registry keys...
|
|
echo Adding new update channel to registry keys...
|
|
|
|
%nul% reg add %o16c2r_reg%\Configuration /v CDNBaseUrl /t REG_SZ /d "https://officecdn.microsoft.com/pr/%targetFFN%" /f
|
|
%nul% reg add %o16c2r_reg%\Configuration /v UpdateChannel /t REG_SZ /d "https://officecdn.microsoft.com/pr/%targetFFN%" /f
|
|
%nul% reg add %o16c2r_reg%\Configuration /v UpdateChannelChanged /t REG_SZ /d "True" /f
|
|
%nul% reg delete %o16c2r_reg%\Configuration /v UnmanagedUpdateURL /f
|
|
%nul% reg delete %o16c2r_reg%\Configuration /v UpdateUrl /f
|
|
%nul% reg delete %o16c2r_reg%\Configuration /v UpdatePath /f
|
|
%nul% reg delete %o16c2r_reg%\Configuration /v UpdateToVersion /f
|
|
%nul% reg delete %o16c2r_reg%\Updates /v UpdateToVersion /f
|
|
%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\office\16.0\common\officeupdate /f
|
|
%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\office\16.0\common\officeupdate /f /reg:32
|
|
%nul% reg delete HKCU\SOFTWARE\Policies\Microsoft\office\16.0\common\officeupdate /f
|
|
%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\cloud\office\16.0\Common\officeupdate /f
|
|
%nul% reg delete HKLM\SOFTWARE\Policies\Microsoft\cloud\office\16.0\Common\officeupdate /f /reg:32
|
|
%nul% reg delete HKCU\Software\Policies\Microsoft\cloud\office\16.0\Common\officeupdate /f
|
|
|
|
if not defined build (
|
|
if %winbuild% GEQ 9200 call :dk_color %Gray% "Failed to detect build number for the target FFN."
|
|
set "updcommand="%_c2rCexe%" /update user"
|
|
) else (
|
|
set "updcommand="%_c2rCexe%" /update user updatetoversion=%build%"
|
|
)
|
|
echo Running the below command to trigger updates...
|
|
echo:
|
|
echo %updcommand%
|
|
%updcommand%
|
|
echo:
|
|
echo Help - %mas%troubleshoot
|
|
goto :oe_goback
|
|
|
|
::========================================================================================================================================
|
|
|
|
:oe_goback
|
|
|
|
call :oe_tempcleanup
|
|
|
|
echo:
|
|
if defined fixes (
|
|
call :dk_color2 %Blue% "Press [1] To Open Troubleshoot Page " %Gray% " Press [0] To Ignore"
|
|
choice /C:10 /N
|
|
if !errorlevel!==1 (for %%# in (%fixes%) do (start %%#))
|
|
)
|
|
|
|
if defined terminal (
|
|
call :dk_color %_Yellow% "Press [0] key to go back..."
|
|
choice /c 0 /n
|
|
) else (
|
|
call :dk_color %_Yellow% "Press any key to go back..."
|
|
pause %nul1%
|
|
)
|
|
goto :oemenu
|
|
|
|
::========================================================================================================================================
|
|
|
|
:oe_tempcleanup
|
|
|
|
del /f /q %SystemRoot%\Temp\SingleApps_Volume.txt %nul%
|
|
del /f /q %SystemRoot%\Temp\SingleApps_Retail.txt %nul%
|
|
del /f /q %SystemRoot%\Temp\Suites_Volume.txt %nul%
|
|
del /f /q %SystemRoot%\Temp\Suites_Retail.txt %nul%
|
|
del /f /q %SystemRoot%\Temp\getAppIds.txt %nul%
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Fetch required info
|
|
|
|
:ch_getinfo
|
|
|
|
set _oRoot=
|
|
set _oArch=
|
|
set _updch=
|
|
set _oIds=
|
|
set _lang=
|
|
set _cfolder=
|
|
set _version=
|
|
set _clversion=
|
|
set _AudienceData=
|
|
set _actconfig=
|
|
set _c2rXml=
|
|
set _c2rExe=
|
|
set _c2rCexe=
|
|
set _masterxml=
|
|
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg% /v InstallPath" %nul6%') do (set "_oRoot=%%b\root")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v Platform" %nul6%') do (set "_oArch=%%b")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v ClientFolder" %nul6%') do (set "_cfolder=%%b")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v AudienceId" %nul6%') do (set "_updch=%%b")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v ClientCulture" %nul6%') do (set "_lang=%%b")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v ClientVersionToReport" %nul6%') do (set "_clversion=%%b")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v VersionToReport" %nul6%') do (set "_version=%%b")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\Configuration /v AudienceData" %nul6%') do (set "_AudienceData=%%b")
|
|
for /f "skip=2 tokens=2*" %%a in ('"reg query %o16c2r_reg%\ProductReleaseIDs /v ActiveConfiguration" %nul6%') do (set "_actconfig=%%b")
|
|
|
|
echo "%o16c2r_reg%" | find /i "Wow6432Node" %nul1% && (set _tok=9) || (set _tok=8)
|
|
for /f "tokens=%_tok% delims=\" %%a in ('reg query "%o16c2r_reg%\ProductReleaseIDs\%_actconfig%" /f ".16" /k %nul6% ^| findstr /i "Retail Volume"') do (
|
|
if defined _oIds (set "_oIds=!_oIds! %%a") else (set "_oIds=%%a")
|
|
)
|
|
set _oIds=%_oIds:.16=%
|
|
|
|
set verchk=0
|
|
for /f "tokens=3 delims=." %%a in ("%_version%") do set "verchk=%%a"
|
|
|
|
if exist "%_oRoot%\Licenses16\c2rpridslicensefiles_auto.xml" set "_c2rXml=%_oRoot%\Licenses16\c2rpridslicensefiles_auto.xml"
|
|
|
|
if exist "%ProgramData%\Microsoft\ClickToRun\ProductReleases\%_actconfig%\x-none.16\MasterDescriptor.x-none.xml" (
|
|
set "_masterxml=%ProgramData%\Microsoft\ClickToRun\ProductReleases\%_actconfig%\x-none.16\MasterDescriptor.x-none.xml"
|
|
)
|
|
|
|
if exist "%_cfolder%\OfficeClickToRun.exe" (
|
|
set "_c2rExe=%_cfolder%\OfficeClickToRun.exe"
|
|
)
|
|
|
|
if exist "%_cfolder%\OfficeC2RClient.exe" (
|
|
set "_c2rCexe=%_cfolder%\OfficeC2RClient.exe"
|
|
)
|
|
|
|
set ltsc19=
|
|
echo %_AudienceData% | findstr /i "LTSC\>" %nul% && set ltsc19=LTSC
|
|
echo %_clversion% %_version% | findstr "16.0.103 16.0.104 16.0.105" %nul% && set ltsc19=LTSC
|
|
|
|
set ltsc21=
|
|
echo %_AudienceData% | findstr /i "LTSC2021\>" %nul% && set ltsc21=LTSC2021
|
|
echo %_clversion% %_version% | findstr "16.0.14332" %nul% && set ltsc21=LTSC2021
|
|
|
|
set ltsc24=
|
|
echo %_AudienceData% | findstr /i "LTSC2024\>" %nul% && set ltsc24=LTSC2024
|
|
:: LTSC 2024 build is not fixed yet
|
|
|
|
set ltscfound=
|
|
if not "%ltsc19%%ltsc21%%ltsc24%"=="" set ltscfound=1
|
|
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Check Internet connection
|
|
|
|
:oe_chkinternet
|
|
|
|
set _int=
|
|
for %%a in (l.root-servers.net resolver1.opendns.com download.windowsupdate.com google.com) do if not defined _int (
|
|
for /f "delims=[] tokens=2" %%# in ('ping -n 1 %%a') do (if not "%%#"=="" set _int=1)
|
|
)
|
|
|
|
if not defined _int (
|
|
%psc% "If([Activator]::CreateInstance([Type]::GetTypeFromCLSID([Guid]'{DCB00C01-570F-4A9B-8D69-199FDBA5723B}')).IsConnectedToInternet){Exit 0}Else{Exit 1}"
|
|
if !errorlevel!==0 (set _int=1)
|
|
)
|
|
|
|
if not defined _int (
|
|
%eline%
|
|
call :dk_color %Red% "Internet is not connected."
|
|
call :dk_color %Blue% "Internet is required for this operation."
|
|
)
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Get available build number for a FFN
|
|
|
|
:getbuild:
|
|
$Tls12 = [Enum]::ToObject([System.Net.SecurityProtocolType], 3072)
|
|
[System.Net.ServicePointManager]::SecurityProtocol = $Tls12
|
|
|
|
$FFN = $env:targetFFN
|
|
$windowsBuild = [System.Environment]::OSVersion.Version.Build
|
|
|
|
$baseUrl = "https://mrodevicemgr.officeapps.live.com/mrodevicemgrsvc/api/v2/C2RReleaseData?audienceFFN=$FFN"
|
|
$url = if ($windowsBuild -lt 9200) { "$baseUrl&osver=Client|6.1" } elseif ($windowsBuild -lt 10240) { "$baseUrl&osver=Client|6.3" } else { $baseUrl }
|
|
|
|
$response = if ($windowsBuild -ge 9200) { irm -Uri $url -Method Get } else { (New-Object System.Net.WebClient).DownloadString($url) }
|
|
|
|
if ($windowsBuild -lt 9200) {
|
|
if ($response -match '"AvailableBuild"\s*:\s*"([^"]+)"') { Write-Host $matches[1] }
|
|
} else {
|
|
Write-Host $response.AvailableBuild
|
|
}
|
|
:getbuild:
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Get available edition list from c2rpridslicensefiles_auto.xml
|
|
:: and filter the list using MasterDescriptor.x-none.xml
|
|
:: and exclude unsupported products on Windows 7/8/8.1
|
|
|
|
:getlist:
|
|
$xmlPath1 = $env:_c2rXml
|
|
$xmlPath2 = $env:_masterxml
|
|
$outputDir = $env:SystemRoot + "\Temp\"
|
|
$buildNumber = [System.Environment]::OSVersion.Version.Build
|
|
$excludedKeywords = @("2019", "2021", "2024")
|
|
$productReleaseIds = @()
|
|
|
|
if (Test-Path $xmlPath1) {
|
|
$xml1 = New-Object -TypeName System.Xml.XmlDocument
|
|
$xml1.Load($xmlPath1)
|
|
foreach ($node in $xml1.SelectNodes("//ProductReleaseId")) {
|
|
$id = $node.GetAttribute("id")
|
|
$exclude = $false
|
|
if ($buildNumber -lt 10240) {
|
|
foreach ($keyword in $excludedKeywords) {
|
|
if ($id -match $keyword) { $exclude = $true; break }
|
|
}
|
|
}
|
|
if ($id -ne "CommonLicenseFiles" -and -not $exclude) { $productReleaseIds += $id }
|
|
}
|
|
}
|
|
|
|
$categories = @{
|
|
"Suites_Retail" = @(); "Suites_Volume" = @()
|
|
"SingleApps_Retail" = @(); "SingleApps_Volume" = @()
|
|
}
|
|
|
|
foreach ($id in $productReleaseIds) {
|
|
$category = if ($id -match "Retail") { "Retail" } else { "Volume" }
|
|
$categories["SingleApps_$category"] += $id
|
|
}
|
|
|
|
if (Test-Path $xmlPath2) {
|
|
$xml2 = New-Object -TypeName System.Xml.XmlDocument
|
|
$xml2.Load($xmlPath2)
|
|
foreach ($sku in $xml2.SelectNodes("//SKU")) {
|
|
$skuId = $sku.GetAttribute("ID")
|
|
if ($productReleaseIds -contains $skuId) {
|
|
$appIds = $sku.SelectNodes("Apps/App") | ForEach-Object { $_.GetAttribute("id") }
|
|
if ($appIds -contains "Excel" -and $appIds -contains "Word") {
|
|
$category = if ($skuId -match "Retail") { "Retail" } else { "Volume" }
|
|
$categories["Suites_$category"] += $skuId
|
|
$categories["SingleApps_$category"] = $categories["SingleApps_$category"] | Where-Object { $_ -ne $skuId }
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
foreach ($section in $categories.Keys) {
|
|
$filePath = Join-Path -Path $outputDir -ChildPath "$section.txt"
|
|
$ids = $categories[$section]
|
|
if ($ids.Count -gt 0) { $ids | Out-File -FilePath $filePath -Encoding ASCII }
|
|
}
|
|
:getlist:
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Get App list for a specific product ID using MasterDescriptor.x-none.xml
|
|
|
|
:getappnames:
|
|
$xmlPath = $env:_masterxml
|
|
$targetSkuId = $env:targetedition
|
|
$outputDir = $env:SystemRoot + "\Temp\"
|
|
$outputFile = Join-Path -Path $outputDir -ChildPath "getAppIds.txt"
|
|
$excludeIds = @("shared", "PowerPivot", "PowerView", "MondoOnly", "OSM", "OSMUX", "Groove", "DCF")
|
|
|
|
$xml = New-Object -TypeName System.Xml.XmlDocument
|
|
$xml.Load($xmlPath)
|
|
|
|
$appIdsList = @()
|
|
$skuNodes = $xml.SelectNodes("//SKU[@ID='$targetSkuId']")
|
|
|
|
foreach ($skuNode in $skuNodes) {
|
|
foreach ($app in $skuNode.SelectNodes("Apps/App")) {
|
|
$appId = $app.GetAttribute("id")
|
|
if ($excludeIds -notcontains $appId) {
|
|
$appIdsList += $appId
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($appIdsList.Count -gt 0) {
|
|
$appIdsList | Out-File -FilePath $outputFile -Encoding ASCII
|
|
}
|
|
:getappnames:
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Set variables
|
|
|
|
:dk_setvar
|
|
|
|
set psc=powershell.exe
|
|
set winbuild=1
|
|
for /f "tokens=6 delims=[]. " %%G in ('ver') do set winbuild=%%G
|
|
|
|
set _NCS=1
|
|
if %winbuild% LSS 10586 set _NCS=0
|
|
if %winbuild% GEQ 10586 reg query "HKCU\Console" /v ForceV2 %nul2% | find /i "0x0" %nul1% && (set _NCS=0)
|
|
|
|
if %_NCS% EQU 1 (
|
|
for /F %%a in ('echo prompt $E ^| cmd') do set "esc=%%a"
|
|
set "Red="41;97m""
|
|
set "Gray="100;97m""
|
|
set "Green="42;97m""
|
|
set "Blue="44;97m""
|
|
set "_Red="40;91m""
|
|
set "_White="40;37m""
|
|
set "_Green="40;92m""
|
|
set "_Yellow="40;93m""
|
|
) else (
|
|
set "Red="Red" "white""
|
|
set "Gray="Darkgray" "white""
|
|
set "Green="DarkGreen" "white""
|
|
set "Blue="Blue" "white""
|
|
set "_Red="Black" "Red""
|
|
set "_White="Black" "Gray""
|
|
set "_Green="Black" "Green""
|
|
set "_Yellow="Black" "Yellow""
|
|
)
|
|
|
|
set "nceline=echo: &echo ==== ERROR ==== &echo:"
|
|
set "eline=echo: &call :dk_color %Red% "==== ERROR ====" &echo:"
|
|
if %~z0 GEQ 200000 (
|
|
set "_exitmsg=Go back"
|
|
set "_fixmsg=Go back to Main Menu, select Troubleshoot and run Fix Licensing option."
|
|
) else (
|
|
set "_exitmsg=Exit"
|
|
set "_fixmsg=In MAS folder, run Troubleshoot script and select Fix Licensing option."
|
|
)
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
|
|
:: Check wmic.exe
|
|
|
|
:dk_ckeckwmic
|
|
|
|
set _wmic=0
|
|
for %%# in (wmic.exe) do @if not "%%~$PATH:#"=="" (
|
|
cmd /c "wmic path Win32_ComputerSystem get CreationClassName /value" %nul2% | find /i "computersystem" %nul1% && set _wmic=1
|
|
)
|
|
exit /b
|
|
|
|
:: Show info for potential script stuck scenario
|
|
|
|
:dk_sppissue
|
|
|
|
sc start sppsvc %nul%
|
|
set spperror=%errorlevel%
|
|
|
|
if %spperror% NEQ 1056 if %spperror% NEQ 0 (
|
|
%eline%
|
|
echo sc start sppsvc [Error Code: %spperror%]
|
|
)
|
|
|
|
echo:
|
|
%psc% "$job = Start-Job { (Get-WmiObject -Query 'SELECT * FROM %sps%').Version }; if (-not (Wait-Job $job -Timeout 20)) {write-host 'sppsvc is not working correctly. Help - %mas%troubleshoot'}"
|
|
exit /b
|
|
|
|
:: Common lines used in PowerShell reflection code
|
|
|
|
:dk_reflection
|
|
|
|
set ref=$AssemblyBuilder = [AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1);
|
|
set ref=%ref% $ModuleBuilder = $AssemblyBuilder.DefineDynamicModule(2, $False);
|
|
set ref=%ref% $TypeBuilder = $ModuleBuilder.DefineType(0);
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
|
|
:dk_color
|
|
|
|
if %_NCS% EQU 1 (
|
|
echo %esc%[%~1%~2%esc%[0m
|
|
) else (
|
|
%psc% write-host -back '%1' -fore '%2' '%3'
|
|
)
|
|
exit /b
|
|
|
|
:dk_color2
|
|
|
|
if %_NCS% EQU 1 (
|
|
echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m
|
|
) else (
|
|
%psc% write-host -back '%1' -fore '%2' '%3' -NoNewline; write-host -back '%4' -fore '%5' '%6'
|
|
)
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
|
|
:dk_done
|
|
|
|
echo:
|
|
if %_unattended%==1 timeout /t 2 & exit /b
|
|
|
|
if defined fixes (
|
|
call :dk_color2 %Blue% "Press [1] To Open Troubleshoot Page " %Gray% " Press [0] To Ignore"
|
|
choice /C:10 /N
|
|
if !errorlevel!==1 (for %%# in (%fixes%) do (start %%#))
|
|
)
|
|
|
|
if defined terminal (
|
|
call :dk_color %_Yellow% "Press [0] key to %_exitmsg%..."
|
|
choice /c 0 /n
|
|
) else (
|
|
call :dk_color %_Yellow% "Press any key to %_exitmsg%..."
|
|
pause %nul1%
|
|
)
|
|
|
|
exit /b
|
|
|
|
::========================================================================================================================================
|
|
:: Leave empty line below
|