diff --git a/KMS_VL_ALL_AIO.cmd b/KMS_VL_ALL_AIO.cmd index b8e7413..92cd76d 100644 --- a/KMS_VL_ALL_AIO.cmd +++ b/KMS_VL_ALL_AIO.cmd @@ -127,7 +127,7 @@ set _PSarg=%_PSarg:'=''% exit /b ) || ( call setlocal EnableDelayedExpansion - 1>nul 2>nul %SysPath%\WindowsPowerShell\v1.0\%_psc% "start cmd.exe -Arg '/c \"!_PSarg!\"' -verb runas" && ( + 1>nul 2>nul %SysPath%\WindowsPowerShell\v1.0\%_psc% "start cmd.exe -arg '/c \"!_PSarg!\"' -verb runas" && ( exit /b ) || ( goto :E_Admin @@ -576,7 +576,7 @@ if %AUR% EQU 0 ( reg delete "HKLM\%SPPk%\%_wApp%" /f %_Nul3% reg delete "HKLM\%SPPk%\%_oApp%" /f %_Nul3% ) -wmic path %spp% where (Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get Name %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1) || (set _gvlk=0) +wmic path %spp% where (ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get Name %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1) || (set _gvlk=0) set gpr=0 if %winbuild% GEQ 10240 if %SkipKMS38% NEQ 0 if %_gvlk% EQU 1 for /f "tokens=2 delims==" %%A in ('"wmic path %spp% where (ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get GracePeriodRemaining /VALUE" %_Nul6%') do set "gpr=%%A" if %gpr% NEQ 0 if %gpr% GTR 259200 ( @@ -653,7 +653,7 @@ exit /b :sppchkwin set _office=0 -if %winbuild% GEQ 14393 if %_gvlk% EQU 0 wmic path %spp% where (Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get Name %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1) +if %winbuild% GEQ 14393 if %_gvlk% EQU 0 wmic path %spp% where (ApplicationID='%_wApp%' and Description like '%%KMSCLIENT%%' and PartialProductKey is not NULL) get Name %_Nul2% | findstr /i Windows %_Nul1% && (set _gvlk=1) wmic path %spp% where ID='%app%' get LicenseStatus %_Nul2% | findstr "1" %_Nul1% && (echo.&call :activate&exit /b) wmic path %spp% where (PartialProductKey is not NULL) get ID %_Nul2% | findstr /i "%app%" %_Nul1% && (echo.&call :activate&exit /b) if %_gvlk% EQU 1 exit /b @@ -2116,7 +2116,7 @@ set "cTblClient=" set "cAvmClient=" set "ExpireMsg=" set "_xpr=" -for /f "tokens=* delims=" %%# in ('"wmic path %~1 where (ID='%chkID%') get %~3 /value" ^| findstr ^=') do set "%%#" +for /f "tokens=* delims=" %%# in ('"wmic path %~1 where ID='%chkID%' get %~3 /value" ^| findstr ^=') do set "%%#" set /a _gpr=(GracePeriodRemaining+1440-1)/1440 echo %Description%| findstr /i VOLUME_KMSCLIENT 1>nul && (set cKmsClient=1&set _mTag=Volume) @@ -3882,7 +3882,7 @@ Add-Type -Language CSharp -TypeDefinition @"

Check Activation Status [wmic]:

+

If you have issues with Office activation, or got undesired or duplicate licenses (e.g. Office 2016 and 2019):

+

Final tip, you may try to rebuild licensing Tokens.dat as suggested in KB2736303 (this will require to repair Office afterward).



@@ -4122,12 +4132,10 @@ reg add HKLM\SOFTWARE\Classes\cmdfile\shell\runas\command /f /v "" /t REG_EXPAND Mouri_Naruto - SppExtComObjPatcher-DLL
os51 - SppExtComObjPatcher ported to MinGW GCC, Retail/MAK checks examples.
MasterDisaster - Original script, WMI methods.
- Windows_Addict - Features suggestion, ideas, testing, and co-enhancing KMS_VL_ALL_AIO.
+ Windows_Addict - Features suggestion, ideas, testing, and co-enhancing.
AveYo - Compressed2TXT ascii encoder.
dbenham, jeb - Color text in batch script.
dbenham - Set buffer height independently of window height.
- jeb - Check if the file path name contains special characters.
- Aacini - Julian Day Number conversions to get specific date.
hearywarlot - Auto Elevate as admin.
qewpal - KMS-VL-ALL script.
NormieLyfe - GVLK categorize, Office checks help.