DutchEllie/Microsoft-Activation-Scripts
1
0
Fork 0
mirror of https://github.com/massgravel/Microsoft-Activation-Scripts.git synced 2025-10-31 15:16:56 +01:00
Code Issues Projects Releases Wiki Activity

Compare commits

...

4 Commits
0c88f6bc2c ... 75c34cbf50

Author SHA1 Message Date
WindowsAddict
75c34cbf50 Add updated CAS by abbodi1406 2025-01-30 02:25:04 +05:30
WindowsAddict
0d533338a1 Use installed licences edition ids list only from 17063 2025-01-30 02:08:55 +05:30
WindowsAddict
411f387705 Fix a bug on 7 where it can't list multiple ids 2025-01-30 01:59:45 +05:30
WindowsAddict
be44b2d887 Don't check tasks if csvlk is installed, don't show wlms in red 2025-01-30 00:51:46 +05:30
7 changed files with 728 additions and 454 deletions

580
MAS/All-In-One-Version-KL/MAS_AIO.cmd
View File

@ -1631,11 +1631,7 @@ call :dk_color2 %Red% "Checking ClipSVC " %Blue% "[System
:: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping. :: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping.
if exist "%SysPath%\wlms\wlms.exe" ( if exist "%SysPath%\wlms\wlms.exe" (
if %winbuild% LSS 9200 (
echo Checking Eval WLMS Service [Found] echo Checking Eval WLMS Service [Found]
) else (
call :dk_color %Red% "Checking Eval WLMS Service [Found]"
)
) )
@ -1736,6 +1732,7 @@ call :dk_color %Red% "Checking SPP tokens.dat [Not Found] [%toke
if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" ( if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" (
%psc% "Get-WmiObject -Query 'SELECT Description FROM SoftwareLicensingProduct WHERE PartialProductKey IS NOT NULL AND LicenseDependsOn IS NULL' | Select-Object -Property Description" %nul2% | findstr /i "KMS_" %nul1% || (
for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a) for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a)
echo !taskinfo! | find /i "Ready" %nul% || ( echo !taskinfo! | find /i "Ready" %nul% || (
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul% reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul%
@ -1745,6 +1742,7 @@ call :dk_color %Red% "Checking SvcRestartTask Status [!taskinfo!, Syste
if not defined error call :dk_color %Blue% "Reboot your machine using the restart option." if not defined error call :dk_color %Blue% "Reboot your machine using the restart option."
) )
) )
)
:: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers. :: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers.
@ -2972,8 +2970,8 @@ set upk_result=0
call :dk_actid 0ff1ce15-a989-479d-af46-f275c6370663 call :dk_actid 0ff1ce15-a989-479d-af46-f275c6370663
if "%_actprojvis%"=="1" ( if "%_actprojvis%"=="1" (
for /f "delims=" %%a in ('%psc% "(Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { $_.LicenseFamily -notmatch 'Project' -and $_.LicenseFamily -notmatch 'Visio' }).ID" %nul6%') do call set "_allactid=%%a !_allactid!" for /f "delims=" %%a in ('%psc% "Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { $_.LicenseFamily -notmatch 'Project' -and $_.LicenseFamily -notmatch 'Visio' } | Select-Object -ExpandProperty ID" %nul6%') do call set "_allactid=%%a !_allactid!"
for /f "delims=" %%a in ('%psc% "(Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { '!_allactid!' -contains $_.ID -and ($_.LicenseFamily -match 'Project' -or $_.LicenseFamily -match 'Visio') }).ID" %nul6%') do call set "_allactid=%%a !_allactid!" for /f "delims=" %%a in ('%psc% "Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { '!_allactid!' -contains $_.ID -and ($_.LicenseFamily -match 'Project' -or $_.LicenseFamily -match 'Visio') } | Select-Object -ExpandProperty ID" %nul6%') do call set "_allactid=%%a !_allactid!"
) )
for %%# in (%apps%) do ( for %%# in (%apps%) do (
@ -6511,20 +6509,40 @@ mode 100, 36
goto dk_done goto dk_done
:sppmgr: :sppmgr:
param (
[Parameter()]
[switch]
$All,
[Parameter()]
[switch]
$Dlv,
[Parameter()]
[switch]
$IID,
[Parameter()]
[switch]
$Pass
)
function CONOUT($strObj)
{
Out-Host -Input $strObj
}
function ExitScript($ExitCode = 0) function ExitScript($ExitCode = 0)
{ {
Exit $ExitCode Exit $ExitCode
} }
if (-Not $PSVersionTable) { if (-Not $PSVersionTable) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'Windows PowerShell 1.0 is not supported by this script.' "Windows PowerShell 1.0 is not supported by this script."
ExitScript 1 ExitScript 1
} }
if ($ExecutionContext.SessionState.LanguageMode.value__ -NE 0) { if ($ExecutionContext.SessionState.LanguageMode.value__ -NE 0) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'Windows PowerShell is not running in Full Language Mode.' "Windows PowerShell is not running in Full Language Mode."
ExitScript 1 ExitScript 1
} }
@ -6532,21 +6550,49 @@ $winbuild = 1
try { try {
$winbuild = [System.Diagnostics.FileVersionInfo]::GetVersionInfo("$env:SystemRoot\System32\kernel32.dll").FileBuildPart $winbuild = [System.Diagnostics.FileVersionInfo]::GetVersionInfo("$env:SystemRoot\System32\kernel32.dll").FileBuildPart
} catch { } catch {
$winbuild = [int](Get-WmiObject Win32_OperatingSystem).BuildNumber $winbuild = [int]([wmi]'Win32_OperatingSystem=@').BuildNumber
} }
if ($winbuild -EQ 1) { if ($winbuild -EQ 1) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'Could not detect Windows build.' "Could not detect Windows build."
ExitScript 1 ExitScript 1
} }
if ($winbuild -LT 2600) { if ($winbuild -LT 2600) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'This build of Windows is not supported by this script.' "This build of Windows is not supported by this script."
ExitScript 1 ExitScript 1
} }
$SysPath = "$env:SystemRoot\System32"
if (Test-Path "$env:SystemRoot\Sysnative\reg.exe") {
$SysPath = "$env:SystemRoot\Sysnative"
}
if (Test-Path "$SysPath\sppc.dll") {
$SLdll = 'sppc.dll'
} elseif (Test-Path "$SysPath\slc.dll") {
$SLdll = 'slc.dll'
} else {
"==== ERROR ====`r`n"
"Software Licensing Client Dll is not detected."
ExitScript 1
}
if ($All.IsPresent)
{
$isAll = {CONOUT "`r"}
$noAll = {$null}
}
else
{
$isAll = {$null}
$noAll = {CONOUT "`r"}
}
$Dlv = $Dlv.IsPresent
$IID = $IID.IsPresent -Or $Dlv.IsPresent
$NT6 = $winbuild -GE 6000 $NT6 = $winbuild -GE 6000
$NT7 = $winbuild -GE 7600 $NT7 = $winbuild -GE 7600
$NT9 = $winbuild -GE 9600 $NT9 = $winbuild -GE 9600
@ -6556,12 +6602,29 @@ $Admin = ([Security.Principal.WindowsPrincipal][Security.Principal.WindowsIdenti
$line2 = "============================================================" $line2 = "============================================================"
$line3 = "____________________________________________________________" $line3 = "____________________________________________________________"
function UnQuickEdit
{
$t=[AppDomain]::CurrentDomain.DefineDynamicAssembly((Get-Random), 1).DefineDynamicModule((Get-Random), $False).DefineType((Get-Random))
$t.DefinePInvokeMethod('GetStdHandle', 'kernel32.dll', 22, 1, [IntPtr], @([Int32]), 1, 3).SetImplementationFlags(128)
$t.DefinePInvokeMethod('SetConsoleMode', 'kernel32.dll', 22, 1, [Boolean], @([IntPtr], [Int32]), 1, 3).SetImplementationFlags(128)
$t.DefinePInvokeMethod('GetConsoleWindow', 'kernel32.dll', 22, 1, [IntPtr], @(), 1, 3).SetImplementationFlags(128)
$t.DefinePInvokeMethod('SendMessageW', 'user32.dll', 22, 1, [IntPtr], @([IntPtr], [UInt32], [IntPtr], [IntPtr]), 1, 3).SetImplementationFlags(128)
$k=$t.CreateType()
if ($winbuild -GE 17763) {
if ($k::SendMessageW($k::GetConsoleWindow(), 127, 0, 0) -EQ [IntPtr]::Zero) {
return
}
}
$v=(0x0080, 0x00A0)[!($winbuild -GE 10586)]
$b=$k::SetConsoleMode($k::GetStdHandle(-10), $v)
}
function echoWindows function echoWindows
{ {
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Windows Status ===" CONOUT "=== Windows Status ==="
Write-Host "$line2" CONOUT "$line2"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
function echoOffice function echoOffice
@ -6570,18 +6633,22 @@ function echoOffice
return return
} }
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Office Status ===" CONOUT "=== Office Status ==="
Write-Host "$line2" CONOUT "$line2"
if (!$All.IsPresent) {Write-Host} & $noAll
$script:doMSG = 0 $script:doMSG = 0
} }
function strGetRegistry($strKey, $strName) function strGetRegistry($strKey, $strName)
{ {
Get-ItemProperty -EA 0 $strKey | select -EA 0 -Expand $strName try {
return [Microsoft.Win32.Registry]::GetValue($strKey, $strName, $null)
} catch {
return $null
}
} }
function CheckOhook function CheckOhook
@ -6612,55 +6679,57 @@ function CheckOhook
return return
} }
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Office Ohook Status ===" CONOUT "=== Office Ohook Status ==="
Write-Host "$line2" CONOUT "$line2"
Write-Host $host.UI.WriteLine('Yellow', 'Black', "`r`nOhook for permanent Office activation is installed.`r`nYou can ignore the below mentioned Office activation status.")
Write-Host -back 'Black' -fore 'Yellow' 'Ohook for permanent Office activation is installed.' & $noAll
Write-Host -back 'Black' -fore 'Yellow' 'You can ignore the below mentioned Office activation status.'
if (!$All.IsPresent) {Write-Host}
} }
#region WMI #region WMI
function DetectID($strSLP, $strAppId, [ref]$strAppVar) function DetectID($strSLP, $strAppId)
{ {
$fltr = "ApplicationID='$strAppId'" $ppk = (" AND PartialProductKey <> NULL)", ")")[$All.IsPresent]
if (!$All.IsPresent) { $fltr = "SELECT ID FROM $strSLP WHERE (ApplicationID='$strAppId'"
$fltr = $fltr + " AND PartialProductKey <> NULL" $clause = $fltr + $ppk
} $sWmi = [wmisearcher]$clause
Get-WmiObject $strSLP ID -Filter $fltr -EA 0 | select ID -EA 0 | foreach { $sWmi.Options.Rewindable = $false
$strAppVar.Value = 1 return ($sWmi.Get().Count -GT 0)
}
} }
function GetID($strSLP, $strAppId, $strProperty = "ID") function GetID($strSLP, $strAppId)
{ {
$NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001) $NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001)
$IDs = [Collections.ArrayList]@() $IDs = [Collections.ArrayList]@()
$isAdd = (" AND LicenseDependsOn <> NULL)", ")")[$NT5]
$noAdd = " AND LicenseDependsOn IS NULL)"
$query = "SELECT ID FROM $strSLP WHERE (ApplicationID='$strAppId' AND PartialProductKey"
if ($All.IsPresent) { if ($All.IsPresent) {
$fltr = "ApplicationID='$strAppId' AND PartialProductKey IS NULL" $fltr = $query + " IS NULL"
$clause = $fltr $clause = $fltr + $isAdd
$sWmi = [wmisearcher]$clause
$sWmi.Options.Rewindable = $false
try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
if (-Not $NT5) { if (-Not $NT5) {
$clause = $fltr + " AND LicenseDependsOn <> NULL" $clause = $fltr + $noAdd
} $sWmi = [wmisearcher]$clause
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_} $sWmi.Options.Rewindable = $false
if (-Not $NT5) { try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
$clause = $fltr + " AND LicenseDependsOn IS NULL"
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_}
} }
} }
$fltr = "ApplicationID='$strAppId' AND PartialProductKey <> NULL" $fltr = $query + " <> NULL"
$clause = $fltr $clause = $fltr + $isAdd
$sWmi = [wmisearcher]$clause
$sWmi.Options.Rewindable = $false
try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
if (-Not $NT5) { if (-Not $NT5) {
$clause = $fltr + " AND LicenseDependsOn <> NULL" $clause = $fltr + $noAdd
} $sWmi = [wmisearcher]$clause
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_} $sWmi.Options.Rewindable = $false
if (-Not $NT5) { try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
$clause = $fltr + " AND LicenseDependsOn IS NULL"
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_}
} }
return $IDs return $IDs
@ -6697,38 +6766,45 @@ function DetectSubscription {
if ($objSvc.SubscriptionEdition.Contains("UNKNOWN") -EQ $false) {$SubMsgEdition = $objSvc.SubscriptionEdition} if ($objSvc.SubscriptionEdition.Contains("UNKNOWN") -EQ $false) {$SubMsgEdition = $objSvc.SubscriptionEdition}
} }
Write-Host CONOUT "`nSubscription information:"
Write-Host "Subscription information:" CONOUT " Edition: $SubMsgEdition"
Write-Host " Edition: $SubMsgEdition" CONOUT " Type : $SubMsgType"
Write-Host " Type : $SubMsgType" CONOUT " Status : $SubMsgStatus"
Write-Host " Status : $SubMsgStatus" CONOUT " Expiry : $SubMsgExpiry"
Write-Host " Expiry : $SubMsgExpiry" }
function DetectAdbaClient
{
CONOUT "`nAD Activation client information:"
CONOUT " Object Name: $ADActivationObjectName"
CONOUT " Domain Name: $ADActivationObjectDN"
CONOUT " CSVLK Extended PID: $ADActivationCsvlkPid"
CONOUT " CSVLK Activation ID: $ADActivationCsvlkSkuId"
} }
function DetectAvmClient function DetectAvmClient
{ {
Write-Host CONOUT "`nAutomatic VM Activation client information:"
Write-Host "Automatic VM Activation client information:"
if (-Not [String]::IsNullOrEmpty($IAID)) { if (-Not [String]::IsNullOrEmpty($IAID)) {
Write-Host " Guest IAID: $IAID" CONOUT " Guest IAID: $IAID"
} else { } else {
Write-Host " Guest IAID: Not Available" CONOUT " Guest IAID: Not Available"
} }
if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostMachineName)) { if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostMachineName)) {
Write-Host " Host machine name: $AutomaticVMActivationHostMachineName" CONOUT " Host machine name: $AutomaticVMActivationHostMachineName"
} else { } else {
Write-Host " Host machine name: Not Available" CONOUT " Host machine name: Not Available"
} }
if ($AutomaticVMActivationLastActivationTime.Substring(0,4) -NE "1601") { if ($AutomaticVMActivationLastActivationTime.Substring(0,4) -NE "1601") {
$EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($AutomaticVMActivationLastActivationTime),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt') $EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($AutomaticVMActivationLastActivationTime),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt')
Write-Host " Activation time: $EED UTC" CONOUT " Activation time: $EED UTC"
} else { } else {
Write-Host " Activation time: Not Available" CONOUT " Activation time: Not Available"
} }
if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostDigitalPid2)) { if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostDigitalPid2)) {
Write-Host " Host Digital PID2: $AutomaticVMActivationHostDigitalPid2" CONOUT " Host Digital PID2: $AutomaticVMActivationHostDigitalPid2"
} else { } else {
Write-Host " Host Digital PID2: Not Available" CONOUT " Host Digital PID2: Not Available"
} }
} }
@ -6758,32 +6834,30 @@ function DetectKmsHost
$KeyManagementServiceLowPriority = "Normal" $KeyManagementServiceLowPriority = "Normal"
} }
Write-Host CONOUT "`nKey Management Service host information:"
Write-Host "Key Management Service host information:" CONOUT " Current count: $KeyManagementServiceCurrentCount"
Write-Host " Current count: $KeyManagementServiceCurrentCount" CONOUT " Listening on Port: $KeyManagementServiceListeningPort"
Write-Host " Listening on Port: $KeyManagementServiceListeningPort" CONOUT " DNS publishing: $KeyManagementServiceDnsPublishing"
Write-Host " DNS publishing: $KeyManagementServiceDnsPublishing" CONOUT " KMS priority: $KeyManagementServiceLowPriority"
Write-Host " KMS priority: $KeyManagementServiceLowPriority"
if (-Not [String]::IsNullOrEmpty($KeyManagementServiceTotalRequests)) { if (-Not [String]::IsNullOrEmpty($KeyManagementServiceTotalRequests)) {
Write-Host CONOUT "`nKey Management Service cumulative requests received from clients:"
Write-Host "Key Management Service cumulative requests received from clients:" CONOUT " Total: $KeyManagementServiceTotalRequests"
Write-Host " Total: $KeyManagementServiceTotalRequests" CONOUT " Failed: $KeyManagementServiceFailedRequests"
Write-Host " Failed: $KeyManagementServiceFailedRequests" CONOUT " Unlicensed: $KeyManagementServiceUnlicensedRequests"
Write-Host " Unlicensed: $KeyManagementServiceUnlicensedRequests" CONOUT " Licensed: $KeyManagementServiceLicensedRequests"
Write-Host " Licensed: $KeyManagementServiceLicensedRequests" CONOUT " Initial grace period: $KeyManagementServiceOOBGraceRequests"
Write-Host " Initial grace period: $KeyManagementServiceOOBGraceRequests" CONOUT " Expired or Hardware out of tolerance: $KeyManagementServiceOOTGraceRequests"
Write-Host " Expired or Hardware out of tolerance: $KeyManagementServiceOOTGraceRequests" CONOUT " Non-genuine grace period: $KeyManagementServiceNonGenuineGraceRequests"
Write-Host " Non-genuine grace period: $KeyManagementServiceNonGenuineGraceRequests" if ($null -NE $KeyManagementServiceNotificationRequests) {CONOUT " Notification: $KeyManagementServiceNotificationRequests"}
Write-Host " Notification: $KeyManagementServiceNotificationRequests"
} }
} }
function DetectKmsClient function DetectKmsClient
{ {
if ($null -NE $VLActivationTypeEnabled) {Write-Host "Configured Activation Type: $($VLActTypes[$VLActivationTypeEnabled])"} if ($null -NE $VLActivationTypeEnabled) {CONOUT "Configured Activation Type: $($VLActTypes[$VLActivationTypeEnabled])"}
Write-Host CONOUT "`r"
if ($LicenseStatus -NE 1) { if ($LicenseStatus -NE 1) {
Write-Host "Please activate the product in order to update KMS client information values." CONOUT "Please activate the product in order to update KMS client information values."
return return
} }
@ -6816,33 +6890,42 @@ function DetectKmsClient
} }
} }
Write-Host "Key Management Service client information:" CONOUT "Key Management Service client information:"
Write-Host " Client Machine ID (CMID): $($objSvc.ClientMachineID)" CONOUT " Client Machine ID (CMID): $($objSvc.ClientMachineID)"
if ($null -EQ $KmsReg) { if ($null -EQ $KmsReg) {
Write-Host " $KmsDns" CONOUT " $KmsDns"
Write-Host " Registered KMS machine name: KMS name not available" CONOUT " Registered KMS machine name: KMS name not available"
} else { } else {
Write-Host " $KmsReg" CONOUT " $KmsReg"
} }
if ($null -NE $DiscoveredKeyManagementServiceMachineIpAddress) {Write-Host " KMS machine IP address: $DiscoveredKeyManagementServiceMachineIpAddress"} if ($null -NE $DiscoveredKeyManagementServiceMachineIpAddress) {CONOUT " KMS machine IP address: $DiscoveredKeyManagementServiceMachineIpAddress"}
Write-Host " KMS machine extended PID: $KeyManagementServiceProductKeyID" CONOUT " KMS machine extended PID: $KeyManagementServiceProductKeyID"
Write-Host " Activation interval: $VLActivationInterval minutes" CONOUT " Activation interval: $VLActivationInterval minutes"
Write-Host " Renewal interval: $VLRenewalInterval minutes" CONOUT " Renewal interval: $VLRenewalInterval minutes"
if ($null -NE $KeyManagementServiceHostCaching) {Write-Host " KMS host caching: $KeyManagementServiceHostCaching"} if ($null -NE $KeyManagementServiceHostCaching) {CONOUT " KMS host caching: $KeyManagementServiceHostCaching"}
if (-Not [String]::IsNullOrEmpty($KeyManagementServiceLookupDomain)) {Write-Host " KMS SRV record lookup domain: $KeyManagementServiceLookupDomain"} if (-Not [String]::IsNullOrEmpty($KeyManagementServiceLookupDomain)) {CONOUT " KMS SRV record lookup domain: $KeyManagementServiceLookupDomain"}
} }
function GetResult($strSLP, $strSLS, $strID) function GetResult($strSLP, $strSLS, $strID)
{ {
try {$objPrd = Get-WmiObject $strSLP -Filter "ID='$strID'" -EA 1} catch {return} try
$objPrd | select -Expand Properties -EA 0 | foreach { {
if (-Not [String]::IsNullOrEmpty($_.Value)) {set $_.Name $_.Value} $objPrd = [wmisearcher]"SELECT * FROM $strSLP WHERE ID='$strID'"
$objPrd.Options.Rewindable = $false
$objPrd.Get() | select -Expand Properties -EA 0 | foreach { if (-Not [String]::IsNullOrEmpty($_.Value)) {set $_.Name $_.Value} }
$objPrd.Dispose()
}
catch
{
return
} }
$winID = ($ApplicationID -EQ $winApp) $winID = ($ApplicationID -EQ $winApp)
$winPR = ($winID -And -Not $LicenseIsAddon) $winPR = ($winID -And -Not $LicenseIsAddon)
$Vista = ($winID -And $NT6 -And -Not $NT7) $Vista = ($winID -And $NT6 -And -Not $NT7)
$NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001) $NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001)
$reapp = ("Windows", "App")[!$winID]
$prmnt = ("machine", "product")[!$winPR]
if ($Description | Select-String "VOLUME_KMSCLIENT") {$cKmsClient = 1; $_mTag = "Volume"} if ($Description | Select-String "VOLUME_KMSCLIENT") {$cKmsClient = 1; $_mTag = "Volume"}
if ($Description | Select-String "TIMEBASED_") {$cTblClient = 1; $_mTag = "Timebased"} if ($Description | Select-String "TIMEBASED_") {$cTblClient = 1; $_mTag = "Timebased"}
@ -6867,7 +6950,7 @@ function GetResult($strSLP, $strSLS, $strID)
$LicenseInf = "Licensed" $LicenseInf = "Licensed"
$LicenseMsg = $null $LicenseMsg = $null
if ($GracePeriodRemaining -EQ 0) { if ($GracePeriodRemaining -EQ 0) {
if ($winPR) {$ExpireMsg = "The machine is permanently activated."} else {$ExpireMsg = "The product is permanently activated."} $ExpireMsg = "The $prmnt is permanently activated."
} else { } else {
$LicenseMsg = "$_mTag activation expiration: $GracePeriodRemaining minute(s) ($_gpr day(s))" $LicenseMsg = "$_mTag activation expiration: $GracePeriodRemaining minute(s) ($_gpr day(s))"
if ($null -NE $_xpr) {$ExpireMsg = "$_mTag activation will expire $_xpr"} if ($null -NE $_xpr) {$ExpireMsg = "$_mTag activation will expire $_xpr"}
@ -6888,8 +6971,9 @@ function GetResult($strSLP, $strSLS, $strID)
if ($LicenseStatus -EQ 5 -And -Not $NT5) { if ($LicenseStatus -EQ 5 -And -Not $NT5) {
$LicenseInf = "Notification" $LicenseInf = "Notification"
$LicenseMsg = "Notification Reason: $LicenseReason" $LicenseMsg = "Notification Reason: $LicenseReason"
if ($LicenseReason -EQ "0xC004F00F") {if ($null -NE $cKmsClient) {$LicenseMsg = $LicenseMsg + " (KMS license expired)."} else {$LicenseMsg = $LicenseMsg + " (hardware out of tolerance)."}}
if ($LicenseReason -EQ "0xC004F200") {$LicenseMsg = $LicenseMsg + " (non-genuine)."} if ($LicenseReason -EQ "0xC004F200") {$LicenseMsg = $LicenseMsg + " (non-genuine)."}
if ($LicenseReason -EQ "0xC004F009") {$LicenseMsg = $LicenseMsg + " (grace time expired)."} if ($LicenseReason -EQ "0xC004F009" -Or $LicenseReason -EQ "0xC004F064") {$LicenseMsg = $LicenseMsg + " (grace time expired)."}
} }
if ($LicenseStatus -GT 5 -Or ($LicenseStatus -GT 4 -And $NT5)) { if ($LicenseStatus -GT 5 -Or ($LicenseStatus -GT 4 -And $NT5)) {
$LicenseInf = "Unknown" $LicenseInf = "Unknown"
@ -6901,25 +6985,61 @@ function GetResult($strSLP, $strSLS, $strID)
} }
if ($winPR -And $PartialProductKey -And -Not $NT9) { if ($winPR -And $PartialProductKey -And -Not $NT9) {
$dp4 = Get-ItemProperty -EA 0 "HKLM:\SOFTWARE\Microsoft\Windows NT\CurrentVersion" | select -EA 0 -Expand DigitalProductId4 $dp4 = strGetRegistry "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion" "DigitalProductId4"
if ($null -NE $dp4) { if ($null -NE $dp4) {
$ProductKeyChannel = ([System.Text.Encoding]::Unicode.GetString($dp4, 1016, 128)).Trim([char]$null) $ProductKeyChannel = ([System.Text.Encoding]::Unicode.GetString($dp4, 1016, 128)).Trim([char]$null)
} }
} }
if ($All.IsPresent) {Write-Host} if ($winPR -And $Dlv -And $null -EQ $RemainingAppReArmCount) {
Write-Host "Name: $Name" try
Write-Host "Description: $Description" {
Write-Host "Activation ID: $ID" $tmp = [wmisearcher]"SELECT RemainingWindowsReArmCount FROM $strSLS"
if ($null -NE $ProductKeyID) {Write-Host "Extended PID: $ProductKeyID"} $tmp.Options.Rewindable = $false
if ($null -NE $OfflineInstallationId -And $IID.IsPresent) {Write-Host "Installation ID: $OfflineInstallationId"} $tmp.Get() | select -Expand Properties -EA 0 | foreach {set $_.Name $_.Value}
if ($null -NE $ProductKeyChannel) {Write-Host "Product Key Channel: $ProductKeyChannel"} $tmp.Dispose()
if ($null -NE $PartialProductKey) {Write-Host "Partial Product Key: $PartialProductKey"} else {Write-Host "Product Key: Not installed"} }
Write-Host "License Status: $LicenseInf" catch
if ($null -NE $LicenseMsg) {Write-Host "$LicenseMsg"} {
}
}
$add_on = $Name.IndexOf("add-on for", 5)
& $isAll
if ($add_on -EQ -1) {CONOUT "Name: $Name"} else {CONOUT "Name: $($Name.Substring(0, $add_on + 7))"}
CONOUT "Description: $Description"
CONOUT "Activation ID: $ID"
if ($null -NE $ProductKeyID) {CONOUT "Extended PID: $ProductKeyID"}
if ($null -NE $ProductKeyID2 -And $Dlv) {CONOUT "Product ID: $ProductKeyID2"}
if ($null -NE $OfflineInstallationId -And $IID) {CONOUT "Installation ID: $OfflineInstallationId"}
if ($null -NE $ProductKeyChannel) {CONOUT "Product Key Channel: $ProductKeyChannel"}
if ($null -NE $PartialProductKey) {CONOUT "Partial Product Key: $PartialProductKey"}
CONOUT "License Status: $LicenseInf"
if ($null -NE $LicenseMsg) {CONOUT "$LicenseMsg"}
if ($LicenseStatus -NE 0 -And $EvaluationEndDate.Substring(0,4) -NE "1601") { if ($LicenseStatus -NE 0 -And $EvaluationEndDate.Substring(0,4) -NE "1601") {
$EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($EvaluationEndDate),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt') $EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($EvaluationEndDate),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt')
Write-Host "Evaluation End Date: $EED UTC" CONOUT "Evaluation End Date: $EED UTC"
}
if ($Dlv) {
if ($null -NE $RemainingWindowsReArmCount) {
CONOUT "Remaining Windows rearm count: $RemainingWindowsReArmCount"
}
if ($null -NE $RemainingSkuReArmCount -And $RemainingSkuReArmCount -NE 4294967295) {
CONOUT "Remaining $reapp rearm count: $RemainingAppReArmCount"
CONOUT "Remaining SKU rearm count: $RemainingSkuReArmCount"
}
if ($null -NE $TrustedTime -And $LicenseStatus -NE 0) {
$TTD = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($TrustedTime),$null,32).ToString('yyyy-MM-dd hh:mm:ss tt')
CONOUT "Trusted time: $TTD"
}
}
if ($LicenseStatus -EQ 0) {
return
}
if ($strSLP -EQ $wslp -And $null -NE $PartialProductKey -And $null -NE $ADActivationObjectName -And $VLActivationType -EQ 1) {
DetectAdbaClient
} }
if ($winID -And $null -NE $cAvmClient -And $null -NE $PartialProductKey) { if ($winID -And $null -NE $cAvmClient -And $null -NE $PartialProductKey) {
@ -6931,16 +7051,27 @@ function GetResult($strSLP, $strSLS, $strID)
$chkSLS = ($null -NE $PartialProductKey) -And ($null -NE $cKmsClient -Or $null -NE $cKmsHost -Or $chkSub) $chkSLS = ($null -NE $PartialProductKey) -And ($null -NE $cKmsClient -Or $null -NE $cKmsHost -Or $chkSub)
if (!$chkSLS) { if (!$chkSLS) {
if ($null -NE $ExpireMsg) {Write-Host; Write-Host " $ExpireMsg"} if ($null -NE $ExpireMsg) {CONOUT "`n $ExpireMsg"}
return return
} }
$objSvc = Get-WmiObject $strSLS -EA 0 try
{
if ($Vista) { $objSvc = New-Object PSObject
$objSvc | select -Expand Properties -EA 0 | foreach { $wmiSvc = [wmisearcher]"SELECT * FROM $strSLS"
if (-Not [String]::IsNullOrEmpty($_.Value)) {set $_.Name $_.Value} $wmiSvc.Options.Rewindable = $false
$wmiSvc.Get() | select -Expand Properties -EA 0 | foreach {
if (-Not [String]::IsNullOrEmpty($_.Value))
{
$objSvc | Add-Member 8 $_.Name $_.Value
if ($null -EQ $IsKeyManagementServiceMachine) {set $_.Name $_.Value}
}
} }
$wmiSvc.Dispose()
}
catch
{
return
} }
if ($strSLS -EQ $wsls -And $NT9) { if ($strSLS -EQ $wsls -And $NT9) {
@ -6950,6 +7081,7 @@ function GetResult($strSLP, $strSLS, $strID)
} }
if ($null -NE $cKmsHost -And $IsKeyManagementServiceMachine -GT 0) { if ($null -NE $cKmsHost -And $IsKeyManagementServiceMachine -GT 0) {
if ($null -NE $ExpireMsg) {CONOUT "`n $ExpireMsg"}
DetectKmsHost DetectKmsHost
} }
@ -6957,7 +7089,9 @@ function GetResult($strSLP, $strSLS, $strID)
DetectKmsClient DetectKmsClient
} }
if ($null -NE $ExpireMsg) {Write-Host; Write-Host " $ExpireMsg"} if ($null -EQ $cKmsHost) {
if ($null -NE $ExpireMsg) {CONOUT "`n $ExpireMsg"}
}
if ($chkSub) { if ($chkSub) {
DetectSubscription DetectSubscription
@ -6997,11 +7131,10 @@ function PrintModePerPridFromRegistry
$vNextPrids = Get-Item -Path $vNextRegkey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty 'property' -ErrorAction SilentlyContinue | Where-Object -FilterScript {$_.ToLower() -like "*retail" -or $_.ToLower() -like "*volume"} $vNextPrids = Get-Item -Path $vNextRegkey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty 'property' -ErrorAction SilentlyContinue | Where-Object -FilterScript {$_.ToLower() -like "*retail" -or $_.ToLower() -like "*volume"}
If ($null -Eq $vNextPrids) If ($null -Eq $vNextPrids)
{ {
Write-Host CONOUT "`nNo registry keys found."
Write-Host "No registry keys found."
Return Return
} }
Write-Host CONOUT "`r"
$vNextPrids | ForEach ` $vNextPrids | ForEach `
{ {
$mode = (Get-ItemProperty -Path $vNextRegkey -Name $_).$_ $mode = (Get-ItemProperty -Path $vNextRegkey -Name $_).$_
@ -7011,7 +7144,7 @@ function PrintModePerPridFromRegistry
3 { $mode = "Device"; Break } 3 { $mode = "Device"; Break }
Default { $mode = "Legacy"; Break } Default { $mode = "Legacy"; Break }
} }
Write-Host $_ = $mode CONOUT "$_ = $mode"
} }
} }
@ -7025,8 +7158,7 @@ function PrintSharedComputerLicensing
$scaPolicyValue = Get-ItemProperty -Path $scaPolicyKey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction SilentlyContinue $scaPolicyValue = Get-ItemProperty -Path $scaPolicyKey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction SilentlyContinue
If ($null -Eq $scaValue -And $null -Eq $scaValue2 -And $null -Eq $scaPolicyValue) If ($null -Eq $scaValue -And $null -Eq $scaValue2 -And $null -Eq $scaPolicyValue)
{ {
Write-Host CONOUT "`nNo registry keys found."
Write-Host "No registry keys found."
Return Return
} }
$scaModeValue = $scaValue -Or $scaValue2 -Or $scaPolicyValue $scaModeValue = $scaValue -Or $scaValue2 -Or $scaPolicyValue
@ -7038,9 +7170,8 @@ function PrintSharedComputerLicensing
{ {
$scaMode = "Enabled" $scaMode = "Enabled"
} }
Write-Host CONOUT "`nStatus: $scaMode"
Write-Host "Status:" $scaMode CONOUT "`r"
Write-Host
$tokenFiles = $null $tokenFiles = $null
$tokenPath = "${env:LOCALAPPDATA}\Microsoft\Office\16.0\Licensing" $tokenPath = "${env:LOCALAPPDATA}\Microsoft\Office\16.0\Licensing"
If (Test-Path $tokenPath) If (Test-Path $tokenPath)
@ -7049,12 +7180,12 @@ function PrintSharedComputerLicensing
} }
If ($null -Eq $tokenFiles) If ($null -Eq $tokenFiles)
{ {
Write-Host "No tokens found." CONOUT "No tokens found."
Return Return
} }
If ($tokenFiles.Length -Eq 0) If ($tokenFiles.Length -Eq 0)
{ {
Write-Host "No tokens found." CONOUT "No tokens found."
Return Return
} }
$tokenFiles | ForEach ` $tokenFiles | ForEach `
@ -7088,16 +7219,9 @@ function PrintLicensesInformation
{ {
$licenseFiles = Get-ChildItem -Path $licensePath -Recurse | Where-Object { !$_.PSIsContainer } $licenseFiles = Get-ChildItem -Path $licensePath -Recurse | Where-Object { !$_.PSIsContainer }
} }
If ($null -Eq $licenseFiles) If ($null -Eq $licenseFiles -Or $licenseFiles.Length -Eq 0)
{ {
Write-Host CONOUT "`nNo licenses found."
Write-Host "No licenses found."
Return
}
If ($licenseFiles.Length -Eq 0)
{
Write-Host
Write-Host "No licenses found."
Return Return
} }
$licenseFiles | ForEach ` $licenseFiles | ForEach `
@ -7154,24 +7278,20 @@ function vNextDiagRun
Return Return
} }
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Office vNext Status ===" CONOUT "=== Office vNext Status ==="
Write-Host "$line2" CONOUT "$line2"
Write-Host CONOUT "`n========== Mode per ProductReleaseId =========="
Write-Host "========== Mode per ProductReleaseId =========="
PrintModePerPridFromRegistry PrintModePerPridFromRegistry
Write-Host CONOUT "`n========== Shared Computer Licensing =========="
Write-Host "========== Shared Computer Licensing =========="
PrintSharedComputerLicensing PrintSharedComputerLicensing
Write-Host CONOUT "`n========== vNext licenses ==========="
Write-Host "========== vNext licenses ==========="
PrintLicensesInformation -Mode "NUL" PrintLicensesInformation -Mode "NUL"
Write-Host CONOUT "`n========== Device licenses =========="
Write-Host "========== Device licenses =========="
PrintLicensesInformation -Mode "Device" PrintLicensesInformation -Mode "Device"
Write-Host "$line3" CONOUT "$line3"
Write-Host CONOUT "`r"
} }
#endregion #endregion
@ -7254,13 +7374,13 @@ function PrintStateData {
} }
[string[]]$pwszStateString = $Marshal::PtrToStringUni($pwszStateData) -replace ";", "`n " [string[]]$pwszStateString = $Marshal::PtrToStringUni($pwszStateData) -replace ";", "`n "
Write-Host " $pwszStateString" CONOUT (" $pwszStateString")
$Marshal::FreeHGlobal($pwszStateData) $Marshal::FreeHGlobal($pwszStateData)
return $TRUE return $TRUE
} }
function PrintLastActivationHRresult { function PrintLastActivationHResult {
$pdwLastHResult = 0 $pdwLastHResult = 0
$cbSize = 0 $cbSize = 0
@ -7273,12 +7393,34 @@ function PrintLastActivationHRresult {
return $FALSE return $FALSE
} }
Write-Host (" LastActivationHResult=0x{0:x8}" -f $Marshal::ReadInt32($pdwLastHResult)) CONOUT (" LastActivationHResult=0x{0:x8}" -f $Marshal::ReadInt32($pdwLastHResult))
$Marshal::FreeHGlobal($pdwLastHResult) $Marshal::FreeHGlobal($pdwLastHResult)
return $TRUE return $TRUE
} }
function PrintLastActivationTime {
$pdwLastTime = 0
$cbSize = 0
if ($Win32::SLGetWindowsInformation(
"Security-SPP-LastWindowsActivationTime",
[ref]$null,
[ref]$cbSize,
[ref]$pdwLastTime
)) {
return $FALSE
}
$actTime = $Marshal::ReadInt64($pdwLastTime)
if ($actTime -ne 0) {
CONOUT (" LastActivationTime={0}" -f [DateTime]::FromFileTimeUtc($actTime).ToString("yyyy/MM/dd:HH:mm:ss"))
}
$Marshal::FreeHGlobal($pdwLastTime)
return $TRUE
}
function PrintIsWindowsGenuine { function PrintIsWindowsGenuine {
$dwGenuine = 0 $dwGenuine = 0
$ppwszGenuineStates = @( $ppwszGenuineStates = @(
@ -7294,9 +7436,9 @@ function PrintIsWindowsGenuine {
} }
if ($dwGenuine -lt 5) { if ($dwGenuine -lt 5) {
Write-Host (" IsWindowsGenuine={0}" -f $ppwszGenuineStates[$dwGenuine]) CONOUT (" IsWindowsGenuine={0}" -f $ppwszGenuineStates[$dwGenuine])
} else { } else {
Write-Host (" IsWindowsGenuine={0}" -f $dwGenuine) CONOUT (" IsWindowsGenuine={0}" -f $dwGenuine)
} }
return $TRUE return $TRUE
@ -7320,7 +7462,7 @@ function PrintDigitalLicenseStatus {
[bool]$bDigitalLicense = $FALSE [bool]$bDigitalLicense = $FALSE
$bDigitalLicense = (($dwReturnCode -ge 0) -and ($dwReturnCode -ne 1)) $bDigitalLicense = (($dwReturnCode -ge 0) -and ($dwReturnCode -ne 1))
Write-Host (" IsDigitalLicense={0}" -f (BoolToWStr $bDigitalLicense)) CONOUT (" IsDigitalLicense={0}" -f (BoolToWStr $bDigitalLicense))
return $TRUE return $TRUE
} }
@ -7338,7 +7480,7 @@ function PrintSubscriptionStatus {
return $FALSE return $FALSE
} }
Write-Host (" SubscriptionSupportedEdition={0}" -f (BoolToWStr $dwSupported)) CONOUT (" SubscriptionSupportedEdition={0}" -f (BoolToWStr $dwSupported))
$pStatus = $Marshal::AllocHGlobal($Marshal::SizeOf([Type]$SubStatus)) $pStatus = $Marshal::AllocHGlobal($Marshal::SizeOf([Type]$SubStatus))
if ($Win32::ClipGetSubscriptionStatus([ref]$pStatus)) { if ($Win32::ClipGetSubscriptionStatus([ref]$pStatus)) {
@ -7349,25 +7491,26 @@ function PrintSubscriptionStatus {
$sStatus = $Marshal::PtrToStructure($pStatus, [Type]$SubStatus) $sStatus = $Marshal::PtrToStructure($pStatus, [Type]$SubStatus)
$Marshal::FreeHGlobal($pStatus) $Marshal::FreeHGlobal($pStatus)
Write-Host (" SubscriptionEnabled={0}" -f (BoolToWStr $sStatus.dwEnabled)) CONOUT (" SubscriptionEnabled={0}" -f (BoolToWStr $sStatus.dwEnabled))
if ($sStatus.dwEnabled -eq 0) { if ($sStatus.dwEnabled -eq 0) {
return $TRUE return $TRUE
} }
Write-Host (" SubscriptionSku={0}" -f $sStatus.dwSku) CONOUT (" SubscriptionSku={0}" -f $sStatus.dwSku)
Write-Host (" SubscriptionState={0}" -f $sStatus.dwState) CONOUT (" SubscriptionState={0}" -f $sStatus.dwState)
return $TRUE return $TRUE
} }
function ClicRun function ClicRun
{ {
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "Client Licensing Check information:" CONOUT "Client Licensing Check information:"
$null = PrintStateData $null = PrintStateData
$null = PrintLastActivationHRresult $null = PrintLastActivationHResult
$null = PrintLastActivationTime
$null = PrintIsWindowsGenuine $null = PrintIsWindowsGenuine
if ($DllDigital) { if ($DllDigital) {
@ -7378,20 +7521,16 @@ function ClicRun
$null = PrintSubscriptionStatus $null = PrintSubscriptionStatus
} }
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
#endregion #endregion
$Host.UI.RawUI.WindowTitle = "Check Activation Status" $Host.UI.RawUI.WindowTitle = "Check Activation Status"
UnQuickEdit
if ($All.IsPresent) { if ($All.IsPresent) {
$B=$Host.UI.RawUI.BufferSize;$B.Height=3000;$Host.UI.RawUI.BufferSize=$B;clear; $B=$Host.UI.RawUI.BufferSize;$B.Height=3000;$Host.UI.RawUI.BufferSize=$B;
} if (!$Pass.IsPresent) {clear;}
$SysPath = "$env:SystemRoot\System32"
if (Test-Path "$env:SystemRoot\Sysnative\reg.exe") {
$SysPath = "$env:SystemRoot\Sysnative"
} }
$wslp = "SoftwareLicensingProduct" $wslp = "SoftwareLicensingProduct"
@ -7405,46 +7544,43 @@ $cSub = ($winbuild -GE 19041) -And (Select-String -Path "$SysPath\wbem\sppwmi.mo
$DllDigital = ($winbuild -GE 14393) -And (Test-Path "$SysPath\EditionUpgradeManagerObj.dll") $DllDigital = ($winbuild -GE 14393) -And (Test-Path "$SysPath\EditionUpgradeManagerObj.dll")
$DllSubscription = ($winbuild -GE 14393) -And (Test-Path "$SysPath\Clipc.dll") $DllSubscription = ($winbuild -GE 14393) -And (Test-Path "$SysPath\Clipc.dll")
$VLActTypes = @("All", "AD", "KMS", "Token") $VLActTypes = @("All", "AD", "KMS", "Token")
$SLKeyPath = "Registry::HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL" $SLKeyPath = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL"
$NSKeyPath = "Registry::HKEY_USERS\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL" $NSKeyPath = "HKEY_USERS\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL"
'cW1nd0ws', 'c0ff1ce15', 'c0ff1ce14', 'ospp14', 'ospp15' | foreach {set $_ $null} 'cW1nd0ws', 'c0ff1ce15', 'c0ff1ce14', 'ospp14', 'ospp15' | foreach {set $_ $false}
$OsppHook = 1 $offsvc = "osppsvc"
try {gsv osppsvc -EA 1 | Out-Null} catch {$OsppHook = 0} if ($NT7 -Or -Not $NT6) {$winsvc = "sppsvc"} else {$winsvc = "slsvc"}
if ($NT7 -Or -Not $NT6) { try {gsv $winsvc -EA 1 | Out-Null; $WsppHook = 1} catch {$WsppHook = 0}
try {sasv sppsvc -EA 1} catch {} try {gsv $offsvc -EA 1 | Out-Null; $OsppHook = 1} catch {$OsppHook = 0}
if ($WsppHook -NE 0) {
try {sasv $winsvc -EA 1} catch {}
$cW1nd0ws = DetectID $wslp $winApp
$c0ff1ce15 = DetectID $wslp $o15App
$c0ff1ce14 = DetectID $wslp $o14App
} }
else
{
try {sasv slsvc -EA 1} catch {}
}
DetectID $wslp $winApp ([ref]$cW1nd0ws)
DetectID $wslp $o15App ([ref]$c0ff1ce15)
DetectID $wslp $o14App ([ref]$c0ff1ce14)
if ($OsppHook -NE 0) { if ($OsppHook -NE 0) {
try {sasv osppsvc -EA 1} catch {} try {sasv $offsvc -EA 1} catch {}
DetectID $oslp $o15App ([ref]$ospp15) $ospp15 = DetectID $oslp $o15App
DetectID $oslp $o14App ([ref]$ospp14) $ospp14 = DetectID $oslp $o14App
} }
if ($null -NE $cW1nd0ws) if ($cW1nd0ws)
{ {
echoWindows echoWindows
GetID $wslp $winApp | foreach -EA 1 { GetID $wslp $winApp | foreach -EA 1 {
GetResult $wslp $wsls $_ GetResult $wslp $wsls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
elseif ($NT6) elseif ($NT6)
{ {
echoWindows echoWindows
Write-Host CONOUT "`nError: product key not found."
Write-Host "Error: product key not found."
} }
if ($winbuild -GE 9200) { if ($winbuild -GE 9200) {
@ -7458,39 +7594,43 @@ if ($c0ff1ce15 -Or $ospp15) {
$doMSG = 1 $doMSG = 1
if ($null -NE $c0ff1ce15) { if ($c0ff1ce15)
{
echoOffice echoOffice
GetID $wslp $o15App | foreach -EA 1 { GetID $wslp $o15App | foreach -EA 1 {
GetResult $wslp $wsls $_ GetResult $wslp $wsls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
if ($null -NE $c0ff1ce14) { if ($c0ff1ce14)
{
echoOffice echoOffice
GetID $wslp $o14App | foreach -EA 1 { GetID $wslp $o14App | foreach -EA 1 {
GetResult $wslp $wsls $_ GetResult $wslp $wsls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
if ($null -NE $ospp15) { if ($ospp15)
{
echoOffice echoOffice
GetID $oslp $o15App | foreach -EA 1 { GetID $oslp $o15App | foreach -EA 1 {
GetResult $oslp $osls $_ GetResult $oslp $osls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
if ($null -NE $ospp14) { if ($ospp14)
{
echoOffice echoOffice
GetID $oslp $o14App | foreach -EA 1 { GetID $oslp $o14App | foreach -EA 1 {
GetResult $oslp $osls $_ GetResult $oslp $osls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
@ -8676,7 +8816,7 @@ if %winbuild% GEQ 10240 for /f "tokens=4" %%a in ('dism /online /english /Get-Ta
if %winbuild% LSS 10240 for /f "tokens=4" %%a in ('%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':cbsxml\:.*';& ([ScriptBlock]::Create($f[1])) -GetTargetEditions;" ^| findstr /i /c:"Target Edition : "') do (if defined _ptarget (set "_ptarget= !_ptarget! %%a ") else (set "_ptarget= %%a ")) if %winbuild% LSS 10240 for /f "tokens=4" %%a in ('%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':cbsxml\:.*';& ([ScriptBlock]::Create($f[1])) -GetTargetEditions;" ^| findstr /i /c:"Target Edition : "') do (if defined _ptarget (set "_ptarget= !_ptarget! %%a ") else (set "_ptarget= %%a "))
if %winbuild% GEQ 10240 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" ( if %winbuild% GEQ 10240 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" (
call :ced_edilist if %winbuild% GEQ 17063 call :ced_edilist
if /i "%osedition:~0,4%"=="Core" set _pro=Professional if /i "%osedition:~0,4%"=="Core" set _pro=Professional
if /i "%osedition%"=="CoreN" set _pro=ProfessionalN if /i "%osedition%"=="CoreN" set _pro=ProfessionalN
set "_dtarget= %_dtarget% !_wtarget! !_pro! " set "_dtarget= %_dtarget% !_wtarget! !_pro! "

6
MAS/Separate-Files-Version/Activators/HWID_Activation.cmd
View File

@ -1378,11 +1378,7 @@ call :dk_color2 %Red% "Checking ClipSVC " %Blue% "[System
:: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping. :: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping.
if exist "%SysPath%\wlms\wlms.exe" ( if exist "%SysPath%\wlms\wlms.exe" (
if %winbuild% LSS 9200 (
echo Checking Eval WLMS Service [Found] echo Checking Eval WLMS Service [Found]
) else (
call :dk_color %Red% "Checking Eval WLMS Service [Found]"
)
) )
@ -1483,6 +1479,7 @@ call :dk_color %Red% "Checking SPP tokens.dat [Not Found] [%toke
if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" ( if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" (
%psc% "Get-WmiObject -Query 'SELECT Description FROM SoftwareLicensingProduct WHERE PartialProductKey IS NOT NULL AND LicenseDependsOn IS NULL' | Select-Object -Property Description" %nul2% | findstr /i "KMS_" %nul1% || (
for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a) for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a)
echo !taskinfo! | find /i "Ready" %nul% || ( echo !taskinfo! | find /i "Ready" %nul% || (
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul% reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul%
@ -1492,6 +1489,7 @@ call :dk_color %Red% "Checking SvcRestartTask Status [!taskinfo!, Syste
if not defined error call :dk_color %Blue% "Reboot your machine using the restart option." if not defined error call :dk_color %Blue% "Reboot your machine using the restart option."
) )
) )
)
:: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers. :: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers.

6
MAS/Separate-Files-Version/Activators/KMS38_Activation.cmd
View File

@ -1530,11 +1530,7 @@ call :dk_color2 %Red% "Checking ClipSVC " %Blue% "[System
:: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping. :: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping.
if exist "%SysPath%\wlms\wlms.exe" ( if exist "%SysPath%\wlms\wlms.exe" (
if %winbuild% LSS 9200 (
echo Checking Eval WLMS Service [Found] echo Checking Eval WLMS Service [Found]
) else (
call :dk_color %Red% "Checking Eval WLMS Service [Found]"
)
) )
@ -1635,6 +1631,7 @@ call :dk_color %Red% "Checking SPP tokens.dat [Not Found] [%toke
if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" ( if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" (
%psc% "Get-WmiObject -Query 'SELECT Description FROM SoftwareLicensingProduct WHERE PartialProductKey IS NOT NULL AND LicenseDependsOn IS NULL' | Select-Object -Property Description" %nul2% | findstr /i "KMS_" %nul1% || (
for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a) for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a)
echo !taskinfo! | find /i "Ready" %nul% || ( echo !taskinfo! | find /i "Ready" %nul% || (
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul% reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul%
@ -1644,6 +1641,7 @@ call :dk_color %Red% "Checking SvcRestartTask Status [!taskinfo!, Syste
if not defined error call :dk_color %Blue% "Reboot your machine using the restart option." if not defined error call :dk_color %Blue% "Reboot your machine using the restart option."
) )
) )
)
:: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers. :: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers.

10
MAS/Separate-Files-Version/Activators/Ohook_Activation_AIO.cmd
View File

@ -1221,8 +1221,8 @@ set upk_result=0
call :dk_actid 0ff1ce15-a989-479d-af46-f275c6370663 call :dk_actid 0ff1ce15-a989-479d-af46-f275c6370663
if "%_actprojvis%"=="1" ( if "%_actprojvis%"=="1" (
for /f "delims=" %%a in ('%psc% "(Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { $_.LicenseFamily -notmatch 'Project' -and $_.LicenseFamily -notmatch 'Visio' }).ID" %nul6%') do call set "_allactid=%%a !_allactid!" for /f "delims=" %%a in ('%psc% "Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { $_.LicenseFamily -notmatch 'Project' -and $_.LicenseFamily -notmatch 'Visio' } | Select-Object -ExpandProperty ID" %nul6%') do call set "_allactid=%%a !_allactid!"
for /f "delims=" %%a in ('%psc% "(Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { '!_allactid!' -contains $_.ID -and ($_.LicenseFamily -match 'Project' -or $_.LicenseFamily -match 'Visio') }).ID" %nul6%') do call set "_allactid=%%a !_allactid!" for /f "delims=" %%a in ('%psc% "Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { '!_allactid!' -contains $_.ID -and ($_.LicenseFamily -match 'Project' -or $_.LicenseFamily -match 'Visio') } | Select-Object -ExpandProperty ID" %nul6%') do call set "_allactid=%%a !_allactid!"
) )
for %%# in (%apps%) do ( for %%# in (%apps%) do (
@ -1801,11 +1801,7 @@ call :dk_color2 %Red% "Checking ClipSVC " %Blue% "[System
:: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping. :: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping.
if exist "%SysPath%\wlms\wlms.exe" ( if exist "%SysPath%\wlms\wlms.exe" (
if %winbuild% LSS 9200 (
echo Checking Eval WLMS Service [Found] echo Checking Eval WLMS Service [Found]
) else (
call :dk_color %Red% "Checking Eval WLMS Service [Found]"
)
) )
@ -1906,6 +1902,7 @@ call :dk_color %Red% "Checking SPP tokens.dat [Not Found] [%toke
if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" ( if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" (
%psc% "Get-WmiObject -Query 'SELECT Description FROM SoftwareLicensingProduct WHERE PartialProductKey IS NOT NULL AND LicenseDependsOn IS NULL' | Select-Object -Property Description" %nul2% | findstr /i "KMS_" %nul1% || (
for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a) for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a)
echo !taskinfo! | find /i "Ready" %nul% || ( echo !taskinfo! | find /i "Ready" %nul% || (
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul% reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul%
@ -1915,6 +1912,7 @@ call :dk_color %Red% "Checking SvcRestartTask Status [!taskinfo!, Syste
if not defined error call :dk_color %Blue% "Reboot your machine using the restart option." if not defined error call :dk_color %Blue% "Reboot your machine using the restart option."
) )
) )
)
:: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers. :: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers.

10
MAS/Separate-Files-Version/Activators/Online_KMS_Activation.cmd
View File

@ -1430,8 +1430,8 @@ set upk_result=0
call :dk_actid 0ff1ce15-a989-479d-af46-f275c6370663 call :dk_actid 0ff1ce15-a989-479d-af46-f275c6370663
if "%_actprojvis%"=="1" ( if "%_actprojvis%"=="1" (
for /f "delims=" %%a in ('%psc% "(Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { $_.LicenseFamily -notmatch 'Project' -and $_.LicenseFamily -notmatch 'Visio' }).ID" %nul6%') do call set "_allactid=%%a !_allactid!" for /f "delims=" %%a in ('%psc% "Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { $_.LicenseFamily -notmatch 'Project' -and $_.LicenseFamily -notmatch 'Visio' } | Select-Object -ExpandProperty ID" %nul6%') do call set "_allactid=%%a !_allactid!"
for /f "delims=" %%a in ('%psc% "(Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { '!_allactid!' -contains $_.ID -and ($_.LicenseFamily -match 'Project' -or $_.LicenseFamily -match 'Visio') }).ID" %nul6%') do call set "_allactid=%%a !_allactid!" for /f "delims=" %%a in ('%psc% "Get-WmiObject -Query 'SELECT ID, Description, LicenseFamily FROM %spp% WHERE ApplicationID=''0ff1ce15-a989-479d-af46-f275c6370663'' AND PartialProductKey IS NOT NULL' | Where-Object { '!_allactid!' -contains $_.ID -and ($_.LicenseFamily -match 'Project' -or $_.LicenseFamily -match 'Visio') } | Select-Object -ExpandProperty ID" %nul6%') do call set "_allactid=%%a !_allactid!"
) )
for %%# in (%apps%) do ( for %%# in (%apps%) do (
@ -2958,11 +2958,7 @@ call :dk_color2 %Red% "Checking ClipSVC " %Blue% "[System
:: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping. :: This "WLMS" service was included in previous Eval editions (which were activable) to automatically shut down the system every hour after the evaluation period expired and prevent SPPSVC from stopping.
if exist "%SysPath%\wlms\wlms.exe" ( if exist "%SysPath%\wlms\wlms.exe" (
if %winbuild% LSS 9200 (
echo Checking Eval WLMS Service [Found] echo Checking Eval WLMS Service [Found]
) else (
call :dk_color %Red% "Checking Eval WLMS Service [Found]"
)
) )
@ -3063,6 +3059,7 @@ call :dk_color %Red% "Checking SPP tokens.dat [Not Found] [%toke
if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" ( if %winbuild% GEQ 9200 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-*EvalEdition~*.mum" (
%psc% "Get-WmiObject -Query 'SELECT Description FROM SoftwareLicensingProduct WHERE PartialProductKey IS NOT NULL AND LicenseDependsOn IS NULL' | Select-Object -Property Description" %nul2% | findstr /i "KMS_" %nul1% || (
for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a) for /f "delims=" %%a in ('%psc% "(Get-ScheduledTask -TaskName 'SvcRestartTask' -TaskPath '\Microsoft\Windows\SoftwareProtectionPlatform\').State" %nul6%') do (set taskinfo=%%a)
echo !taskinfo! | find /i "Ready" %nul% || ( echo !taskinfo! | find /i "Ready" %nul% || (
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul% reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform" /v "actionlist" /f %nul%
@ -3072,6 +3069,7 @@ call :dk_color %Red% "Checking SvcRestartTask Status [!taskinfo!, Syste
if not defined error call :dk_color %Blue% "Reboot your machine using the restart option." if not defined error call :dk_color %Blue% "Reboot your machine using the restart option."
) )
) )
)
:: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers. :: This code checks if SPP has permission access to tokens folder and required registry keys. It's often caused by gaming spoofers.

2
MAS/Separate-Files-Version/Change_Windows_Edition.cmd
View File

@ -393,7 +393,7 @@ if %winbuild% GEQ 10240 for /f "tokens=4" %%a in ('dism /online /english /Get-Ta
if %winbuild% LSS 10240 for /f "tokens=4" %%a in ('%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':cbsxml\:.*';& ([ScriptBlock]::Create($f[1])) -GetTargetEditions;" ^| findstr /i /c:"Target Edition : "') do (if defined _ptarget (set "_ptarget= !_ptarget! %%a ") else (set "_ptarget= %%a ")) if %winbuild% LSS 10240 for /f "tokens=4" %%a in ('%psc% "$f=[io.file]::ReadAllText('!_batp!') -split ':cbsxml\:.*';& ([ScriptBlock]::Create($f[1])) -GetTargetEditions;" ^| findstr /i /c:"Target Edition : "') do (if defined _ptarget (set "_ptarget= !_ptarget! %%a ") else (set "_ptarget= %%a "))
if %winbuild% GEQ 10240 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" ( if %winbuild% GEQ 10240 if not exist "%SystemRoot%\Servicing\Packages\Microsoft-Windows-Server*Edition~*.mum" (
call :ced_edilist if %winbuild% GEQ 17063 call :ced_edilist
if /i "%osedition:~0,4%"=="Core" set _pro=Professional if /i "%osedition:~0,4%"=="Core" set _pro=Professional
if /i "%osedition%"=="CoreN" set _pro=ProfessionalN if /i "%osedition%"=="CoreN" set _pro=ProfessionalN
set "_dtarget= %_dtarget% !_wtarget! !_pro! " set "_dtarget= %_dtarget% !_wtarget! !_pro! "

568
MAS/Separate-Files-Version/Check_Activation_Status.cmd
View File

@ -47,20 +47,40 @@ choice /c 0 /n
exit /b exit /b
:sppmgr: :sppmgr:
param (
[Parameter()]
[switch]
$All,
[Parameter()]
[switch]
$Dlv,
[Parameter()]
[switch]
$IID,
[Parameter()]
[switch]
$Pass
)
function CONOUT($strObj)
{
Out-Host -Input $strObj
}
function ExitScript($ExitCode = 0) function ExitScript($ExitCode = 0)
{ {
Exit $ExitCode Exit $ExitCode
} }
if (-Not $PSVersionTable) { if (-Not $PSVersionTable) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'Windows PowerShell 1.0 is not supported by this script.' "Windows PowerShell 1.0 is not supported by this script."
ExitScript 1 ExitScript 1
} }
if ($ExecutionContext.SessionState.LanguageMode.value__ -NE 0) { if ($ExecutionContext.SessionState.LanguageMode.value__ -NE 0) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'Windows PowerShell is not running in Full Language Mode.' "Windows PowerShell is not running in Full Language Mode."
ExitScript 1 ExitScript 1
} }
@ -68,21 +88,49 @@ $winbuild = 1
try { try {
$winbuild = [System.Diagnostics.FileVersionInfo]::GetVersionInfo("$env:SystemRoot\System32\kernel32.dll").FileBuildPart $winbuild = [System.Diagnostics.FileVersionInfo]::GetVersionInfo("$env:SystemRoot\System32\kernel32.dll").FileBuildPart
} catch { } catch {
$winbuild = [int](Get-WmiObject Win32_OperatingSystem).BuildNumber $winbuild = [int]([wmi]'Win32_OperatingSystem=@').BuildNumber
} }
if ($winbuild -EQ 1) { if ($winbuild -EQ 1) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'Could not detect Windows build.' "Could not detect Windows build."
ExitScript 1 ExitScript 1
} }
if ($winbuild -LT 2600) { if ($winbuild -LT 2600) {
Write-Host "==== ERROR ====`r`n" "==== ERROR ====`r`n"
Write-Host 'This build of Windows is not supported by this script.' "This build of Windows is not supported by this script."
ExitScript 1 ExitScript 1
} }
$SysPath = "$env:SystemRoot\System32"
if (Test-Path "$env:SystemRoot\Sysnative\reg.exe") {
$SysPath = "$env:SystemRoot\Sysnative"
}
if (Test-Path "$SysPath\sppc.dll") {
$SLdll = 'sppc.dll'
} elseif (Test-Path "$SysPath\slc.dll") {
$SLdll = 'slc.dll'
} else {
"==== ERROR ====`r`n"
"Software Licensing Client Dll is not detected."
ExitScript 1
}
if ($All.IsPresent)
{
$isAll = {CONOUT "`r"}
$noAll = {$null}
}
else
{
$isAll = {$null}
$noAll = {CONOUT "`r"}
}
$Dlv = $Dlv.IsPresent
$IID = $IID.IsPresent -Or $Dlv.IsPresent
$NT6 = $winbuild -GE 6000 $NT6 = $winbuild -GE 6000
$NT7 = $winbuild -GE 7600 $NT7 = $winbuild -GE 7600
$NT9 = $winbuild -GE 9600 $NT9 = $winbuild -GE 9600
@ -92,12 +140,29 @@ $Admin = ([Security.Principal.WindowsPrincipal][Security.Principal.WindowsIdenti
$line2 = "============================================================" $line2 = "============================================================"
$line3 = "____________________________________________________________" $line3 = "____________________________________________________________"
function UnQuickEdit
{
$t=[AppDomain]::CurrentDomain.DefineDynamicAssembly((Get-Random), 1).DefineDynamicModule((Get-Random), $False).DefineType((Get-Random))
$t.DefinePInvokeMethod('GetStdHandle', 'kernel32.dll', 22, 1, [IntPtr], @([Int32]), 1, 3).SetImplementationFlags(128)
$t.DefinePInvokeMethod('SetConsoleMode', 'kernel32.dll', 22, 1, [Boolean], @([IntPtr], [Int32]), 1, 3).SetImplementationFlags(128)
$t.DefinePInvokeMethod('GetConsoleWindow', 'kernel32.dll', 22, 1, [IntPtr], @(), 1, 3).SetImplementationFlags(128)
$t.DefinePInvokeMethod('SendMessageW', 'user32.dll', 22, 1, [IntPtr], @([IntPtr], [UInt32], [IntPtr], [IntPtr]), 1, 3).SetImplementationFlags(128)
$k=$t.CreateType()
if ($winbuild -GE 17763) {
if ($k::SendMessageW($k::GetConsoleWindow(), 127, 0, 0) -EQ [IntPtr]::Zero) {
return
}
}
$v=(0x0080, 0x00A0)[!($winbuild -GE 10586)]
$b=$k::SetConsoleMode($k::GetStdHandle(-10), $v)
}
function echoWindows function echoWindows
{ {
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Windows Status ===" CONOUT "=== Windows Status ==="
Write-Host "$line2" CONOUT "$line2"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
function echoOffice function echoOffice
@ -106,18 +171,22 @@ function echoOffice
return return
} }
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Office Status ===" CONOUT "=== Office Status ==="
Write-Host "$line2" CONOUT "$line2"
if (!$All.IsPresent) {Write-Host} & $noAll
$script:doMSG = 0 $script:doMSG = 0
} }
function strGetRegistry($strKey, $strName) function strGetRegistry($strKey, $strName)
{ {
Get-ItemProperty -EA 0 $strKey | select -EA 0 -Expand $strName try {
return [Microsoft.Win32.Registry]::GetValue($strKey, $strName, $null)
} catch {
return $null
}
} }
function CheckOhook function CheckOhook
@ -148,55 +217,57 @@ function CheckOhook
return return
} }
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Office Ohook Status ===" CONOUT "=== Office Ohook Status ==="
Write-Host "$line2" CONOUT "$line2"
Write-Host $host.UI.WriteLine('Yellow', 'Black', "`r`nOhook for permanent Office activation is installed.`r`nYou can ignore the below mentioned Office activation status.")
Write-Host -back 'Black' -fore 'Yellow' 'Ohook for permanent Office activation is installed.' & $noAll
Write-Host -back 'Black' -fore 'Yellow' 'You can ignore the below mentioned Office activation status.'
if (!$All.IsPresent) {Write-Host}
} }
#region WMI #region WMI
function DetectID($strSLP, $strAppId, [ref]$strAppVar) function DetectID($strSLP, $strAppId)
{ {
$fltr = "ApplicationID='$strAppId'" $ppk = (" AND PartialProductKey <> NULL)", ")")[$All.IsPresent]
if (!$All.IsPresent) { $fltr = "SELECT ID FROM $strSLP WHERE (ApplicationID='$strAppId'"
$fltr = $fltr + " AND PartialProductKey <> NULL" $clause = $fltr + $ppk
} $sWmi = [wmisearcher]$clause
Get-WmiObject $strSLP ID -Filter $fltr -EA 0 | select ID -EA 0 | foreach { $sWmi.Options.Rewindable = $false
$strAppVar.Value = 1 return ($sWmi.Get().Count -GT 0)
}
} }
function GetID($strSLP, $strAppId, $strProperty = "ID") function GetID($strSLP, $strAppId)
{ {
$NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001) $NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001)
$IDs = [Collections.ArrayList]@() $IDs = [Collections.ArrayList]@()
$isAdd = (" AND LicenseDependsOn <> NULL)", ")")[$NT5]
$noAdd = " AND LicenseDependsOn IS NULL)"
$query = "SELECT ID FROM $strSLP WHERE (ApplicationID='$strAppId' AND PartialProductKey"
if ($All.IsPresent) { if ($All.IsPresent) {
$fltr = "ApplicationID='$strAppId' AND PartialProductKey IS NULL" $fltr = $query + " IS NULL"
$clause = $fltr $clause = $fltr + $isAdd
$sWmi = [wmisearcher]$clause
$sWmi.Options.Rewindable = $false
try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
if (-Not $NT5) { if (-Not $NT5) {
$clause = $fltr + " AND LicenseDependsOn <> NULL" $clause = $fltr + $noAdd
} $sWmi = [wmisearcher]$clause
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_} $sWmi.Options.Rewindable = $false
if (-Not $NT5) { try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
$clause = $fltr + " AND LicenseDependsOn IS NULL"
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_}
} }
} }
$fltr = "ApplicationID='$strAppId' AND PartialProductKey <> NULL" $fltr = $query + " <> NULL"
$clause = $fltr $clause = $fltr + $isAdd
$sWmi = [wmisearcher]$clause
$sWmi.Options.Rewindable = $false
try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
if (-Not $NT5) { if (-Not $NT5) {
$clause = $fltr + " AND LicenseDependsOn <> NULL" $clause = $fltr + $noAdd
} $sWmi = [wmisearcher]$clause
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_} $sWmi.Options.Rewindable = $false
if (-Not $NT5) { try {$sWmi.Get() | select -Expand Properties -EA 0 | foreach {$IDs += $_.Value}} catch {}
$clause = $fltr + " AND LicenseDependsOn IS NULL"
Get-WmiObject $strSLP $strProperty -Filter $clause -EA 0 | select -Expand $strProperty -EA 0 | foreach {$IDs += $_}
} }
return $IDs return $IDs
@ -233,38 +304,45 @@ function DetectSubscription {
if ($objSvc.SubscriptionEdition.Contains("UNKNOWN") -EQ $false) {$SubMsgEdition = $objSvc.SubscriptionEdition} if ($objSvc.SubscriptionEdition.Contains("UNKNOWN") -EQ $false) {$SubMsgEdition = $objSvc.SubscriptionEdition}
} }
Write-Host CONOUT "`nSubscription information:"
Write-Host "Subscription information:" CONOUT " Edition: $SubMsgEdition"
Write-Host " Edition: $SubMsgEdition" CONOUT " Type : $SubMsgType"
Write-Host " Type : $SubMsgType" CONOUT " Status : $SubMsgStatus"
Write-Host " Status : $SubMsgStatus" CONOUT " Expiry : $SubMsgExpiry"
Write-Host " Expiry : $SubMsgExpiry" }
function DetectAdbaClient
{
CONOUT "`nAD Activation client information:"
CONOUT " Object Name: $ADActivationObjectName"
CONOUT " Domain Name: $ADActivationObjectDN"
CONOUT " CSVLK Extended PID: $ADActivationCsvlkPid"
CONOUT " CSVLK Activation ID: $ADActivationCsvlkSkuId"
} }
function DetectAvmClient function DetectAvmClient
{ {
Write-Host CONOUT "`nAutomatic VM Activation client information:"
Write-Host "Automatic VM Activation client information:"
if (-Not [String]::IsNullOrEmpty($IAID)) { if (-Not [String]::IsNullOrEmpty($IAID)) {
Write-Host " Guest IAID: $IAID" CONOUT " Guest IAID: $IAID"
} else { } else {
Write-Host " Guest IAID: Not Available" CONOUT " Guest IAID: Not Available"
} }
if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostMachineName)) { if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostMachineName)) {
Write-Host " Host machine name: $AutomaticVMActivationHostMachineName" CONOUT " Host machine name: $AutomaticVMActivationHostMachineName"
} else { } else {
Write-Host " Host machine name: Not Available" CONOUT " Host machine name: Not Available"
} }
if ($AutomaticVMActivationLastActivationTime.Substring(0,4) -NE "1601") { if ($AutomaticVMActivationLastActivationTime.Substring(0,4) -NE "1601") {
$EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($AutomaticVMActivationLastActivationTime),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt') $EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($AutomaticVMActivationLastActivationTime),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt')
Write-Host " Activation time: $EED UTC" CONOUT " Activation time: $EED UTC"
} else { } else {
Write-Host " Activation time: Not Available" CONOUT " Activation time: Not Available"
} }
if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostDigitalPid2)) { if (-Not [String]::IsNullOrEmpty($AutomaticVMActivationHostDigitalPid2)) {
Write-Host " Host Digital PID2: $AutomaticVMActivationHostDigitalPid2" CONOUT " Host Digital PID2: $AutomaticVMActivationHostDigitalPid2"
} else { } else {
Write-Host " Host Digital PID2: Not Available" CONOUT " Host Digital PID2: Not Available"
} }
} }
@ -294,32 +372,30 @@ function DetectKmsHost
$KeyManagementServiceLowPriority = "Normal" $KeyManagementServiceLowPriority = "Normal"
} }
Write-Host CONOUT "`nKey Management Service host information:"
Write-Host "Key Management Service host information:" CONOUT " Current count: $KeyManagementServiceCurrentCount"
Write-Host " Current count: $KeyManagementServiceCurrentCount" CONOUT " Listening on Port: $KeyManagementServiceListeningPort"
Write-Host " Listening on Port: $KeyManagementServiceListeningPort" CONOUT " DNS publishing: $KeyManagementServiceDnsPublishing"
Write-Host " DNS publishing: $KeyManagementServiceDnsPublishing" CONOUT " KMS priority: $KeyManagementServiceLowPriority"
Write-Host " KMS priority: $KeyManagementServiceLowPriority"
if (-Not [String]::IsNullOrEmpty($KeyManagementServiceTotalRequests)) { if (-Not [String]::IsNullOrEmpty($KeyManagementServiceTotalRequests)) {
Write-Host CONOUT "`nKey Management Service cumulative requests received from clients:"
Write-Host "Key Management Service cumulative requests received from clients:" CONOUT " Total: $KeyManagementServiceTotalRequests"
Write-Host " Total: $KeyManagementServiceTotalRequests" CONOUT " Failed: $KeyManagementServiceFailedRequests"
Write-Host " Failed: $KeyManagementServiceFailedRequests" CONOUT " Unlicensed: $KeyManagementServiceUnlicensedRequests"
Write-Host " Unlicensed: $KeyManagementServiceUnlicensedRequests" CONOUT " Licensed: $KeyManagementServiceLicensedRequests"
Write-Host " Licensed: $KeyManagementServiceLicensedRequests" CONOUT " Initial grace period: $KeyManagementServiceOOBGraceRequests"
Write-Host " Initial grace period: $KeyManagementServiceOOBGraceRequests" CONOUT " Expired or Hardware out of tolerance: $KeyManagementServiceOOTGraceRequests"
Write-Host " Expired or Hardware out of tolerance: $KeyManagementServiceOOTGraceRequests" CONOUT " Non-genuine grace period: $KeyManagementServiceNonGenuineGraceRequests"
Write-Host " Non-genuine grace period: $KeyManagementServiceNonGenuineGraceRequests" if ($null -NE $KeyManagementServiceNotificationRequests) {CONOUT " Notification: $KeyManagementServiceNotificationRequests"}
Write-Host " Notification: $KeyManagementServiceNotificationRequests"
} }
} }
function DetectKmsClient function DetectKmsClient
{ {
if ($null -NE $VLActivationTypeEnabled) {Write-Host "Configured Activation Type: $($VLActTypes[$VLActivationTypeEnabled])"} if ($null -NE $VLActivationTypeEnabled) {CONOUT "Configured Activation Type: $($VLActTypes[$VLActivationTypeEnabled])"}
Write-Host CONOUT "`r"
if ($LicenseStatus -NE 1) { if ($LicenseStatus -NE 1) {
Write-Host "Please activate the product in order to update KMS client information values." CONOUT "Please activate the product in order to update KMS client information values."
return return
} }
@ -352,33 +428,42 @@ function DetectKmsClient
} }
} }
Write-Host "Key Management Service client information:" CONOUT "Key Management Service client information:"
Write-Host " Client Machine ID (CMID): $($objSvc.ClientMachineID)" CONOUT " Client Machine ID (CMID): $($objSvc.ClientMachineID)"
if ($null -EQ $KmsReg) { if ($null -EQ $KmsReg) {
Write-Host " $KmsDns" CONOUT " $KmsDns"
Write-Host " Registered KMS machine name: KMS name not available" CONOUT " Registered KMS machine name: KMS name not available"
} else { } else {
Write-Host " $KmsReg" CONOUT " $KmsReg"
} }
if ($null -NE $DiscoveredKeyManagementServiceMachineIpAddress) {Write-Host " KMS machine IP address: $DiscoveredKeyManagementServiceMachineIpAddress"} if ($null -NE $DiscoveredKeyManagementServiceMachineIpAddress) {CONOUT " KMS machine IP address: $DiscoveredKeyManagementServiceMachineIpAddress"}
Write-Host " KMS machine extended PID: $KeyManagementServiceProductKeyID" CONOUT " KMS machine extended PID: $KeyManagementServiceProductKeyID"
Write-Host " Activation interval: $VLActivationInterval minutes" CONOUT " Activation interval: $VLActivationInterval minutes"
Write-Host " Renewal interval: $VLRenewalInterval minutes" CONOUT " Renewal interval: $VLRenewalInterval minutes"
if ($null -NE $KeyManagementServiceHostCaching) {Write-Host " KMS host caching: $KeyManagementServiceHostCaching"} if ($null -NE $KeyManagementServiceHostCaching) {CONOUT " KMS host caching: $KeyManagementServiceHostCaching"}
if (-Not [String]::IsNullOrEmpty($KeyManagementServiceLookupDomain)) {Write-Host " KMS SRV record lookup domain: $KeyManagementServiceLookupDomain"} if (-Not [String]::IsNullOrEmpty($KeyManagementServiceLookupDomain)) {CONOUT " KMS SRV record lookup domain: $KeyManagementServiceLookupDomain"}
} }
function GetResult($strSLP, $strSLS, $strID) function GetResult($strSLP, $strSLS, $strID)
{ {
try {$objPrd = Get-WmiObject $strSLP -Filter "ID='$strID'" -EA 1} catch {return} try
$objPrd | select -Expand Properties -EA 0 | foreach { {
if (-Not [String]::IsNullOrEmpty($_.Value)) {set $_.Name $_.Value} $objPrd = [wmisearcher]"SELECT * FROM $strSLP WHERE ID='$strID'"
$objPrd.Options.Rewindable = $false
$objPrd.Get() | select -Expand Properties -EA 0 | foreach { if (-Not [String]::IsNullOrEmpty($_.Value)) {set $_.Name $_.Value} }
$objPrd.Dispose()
}
catch
{
return
} }
$winID = ($ApplicationID -EQ $winApp) $winID = ($ApplicationID -EQ $winApp)
$winPR = ($winID -And -Not $LicenseIsAddon) $winPR = ($winID -And -Not $LicenseIsAddon)
$Vista = ($winID -And $NT6 -And -Not $NT7) $Vista = ($winID -And $NT6 -And -Not $NT7)
$NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001) $NT5 = ($strSLP -EQ $wslp -And $winbuild -LT 6001)
$reapp = ("Windows", "App")[!$winID]
$prmnt = ("machine", "product")[!$winPR]
if ($Description | Select-String "VOLUME_KMSCLIENT") {$cKmsClient = 1; $_mTag = "Volume"} if ($Description | Select-String "VOLUME_KMSCLIENT") {$cKmsClient = 1; $_mTag = "Volume"}
if ($Description | Select-String "TIMEBASED_") {$cTblClient = 1; $_mTag = "Timebased"} if ($Description | Select-String "TIMEBASED_") {$cTblClient = 1; $_mTag = "Timebased"}
@ -403,7 +488,7 @@ function GetResult($strSLP, $strSLS, $strID)
$LicenseInf = "Licensed" $LicenseInf = "Licensed"
$LicenseMsg = $null $LicenseMsg = $null
if ($GracePeriodRemaining -EQ 0) { if ($GracePeriodRemaining -EQ 0) {
if ($winPR) {$ExpireMsg = "The machine is permanently activated."} else {$ExpireMsg = "The product is permanently activated."} $ExpireMsg = "The $prmnt is permanently activated."
} else { } else {
$LicenseMsg = "$_mTag activation expiration: $GracePeriodRemaining minute(s) ($_gpr day(s))" $LicenseMsg = "$_mTag activation expiration: $GracePeriodRemaining minute(s) ($_gpr day(s))"
if ($null -NE $_xpr) {$ExpireMsg = "$_mTag activation will expire $_xpr"} if ($null -NE $_xpr) {$ExpireMsg = "$_mTag activation will expire $_xpr"}
@ -424,8 +509,9 @@ function GetResult($strSLP, $strSLS, $strID)
if ($LicenseStatus -EQ 5 -And -Not $NT5) { if ($LicenseStatus -EQ 5 -And -Not $NT5) {
$LicenseInf = "Notification" $LicenseInf = "Notification"
$LicenseMsg = "Notification Reason: $LicenseReason" $LicenseMsg = "Notification Reason: $LicenseReason"
if ($LicenseReason -EQ "0xC004F00F") {if ($null -NE $cKmsClient) {$LicenseMsg = $LicenseMsg + " (KMS license expired)."} else {$LicenseMsg = $LicenseMsg + " (hardware out of tolerance)."}}
if ($LicenseReason -EQ "0xC004F200") {$LicenseMsg = $LicenseMsg + " (non-genuine)."} if ($LicenseReason -EQ "0xC004F200") {$LicenseMsg = $LicenseMsg + " (non-genuine)."}
if ($LicenseReason -EQ "0xC004F009") {$LicenseMsg = $LicenseMsg + " (grace time expired)."} if ($LicenseReason -EQ "0xC004F009" -Or $LicenseReason -EQ "0xC004F064") {$LicenseMsg = $LicenseMsg + " (grace time expired)."}
} }
if ($LicenseStatus -GT 5 -Or ($LicenseStatus -GT 4 -And $NT5)) { if ($LicenseStatus -GT 5 -Or ($LicenseStatus -GT 4 -And $NT5)) {
$LicenseInf = "Unknown" $LicenseInf = "Unknown"
@ -437,25 +523,61 @@ function GetResult($strSLP, $strSLS, $strID)
} }
if ($winPR -And $PartialProductKey -And -Not $NT9) { if ($winPR -And $PartialProductKey -And -Not $NT9) {
$dp4 = Get-ItemProperty -EA 0 "HKLM:\SOFTWARE\Microsoft\Windows NT\CurrentVersion" | select -EA 0 -Expand DigitalProductId4 $dp4 = strGetRegistry "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion" "DigitalProductId4"
if ($null -NE $dp4) { if ($null -NE $dp4) {
$ProductKeyChannel = ([System.Text.Encoding]::Unicode.GetString($dp4, 1016, 128)).Trim([char]$null) $ProductKeyChannel = ([System.Text.Encoding]::Unicode.GetString($dp4, 1016, 128)).Trim([char]$null)
} }
} }
if ($All.IsPresent) {Write-Host} if ($winPR -And $Dlv -And $null -EQ $RemainingAppReArmCount) {
Write-Host "Name: $Name" try
Write-Host "Description: $Description" {
Write-Host "Activation ID: $ID" $tmp = [wmisearcher]"SELECT RemainingWindowsReArmCount FROM $strSLS"
if ($null -NE $ProductKeyID) {Write-Host "Extended PID: $ProductKeyID"} $tmp.Options.Rewindable = $false
if ($null -NE $OfflineInstallationId -And $IID.IsPresent) {Write-Host "Installation ID: $OfflineInstallationId"} $tmp.Get() | select -Expand Properties -EA 0 | foreach {set $_.Name $_.Value}
if ($null -NE $ProductKeyChannel) {Write-Host "Product Key Channel: $ProductKeyChannel"} $tmp.Dispose()
if ($null -NE $PartialProductKey) {Write-Host "Partial Product Key: $PartialProductKey"} else {Write-Host "Product Key: Not installed"} }
Write-Host "License Status: $LicenseInf" catch
if ($null -NE $LicenseMsg) {Write-Host "$LicenseMsg"} {
}
}
$add_on = $Name.IndexOf("add-on for", 5)
& $isAll
if ($add_on -EQ -1) {CONOUT "Name: $Name"} else {CONOUT "Name: $($Name.Substring(0, $add_on + 7))"}
CONOUT "Description: $Description"
CONOUT "Activation ID: $ID"
if ($null -NE $ProductKeyID) {CONOUT "Extended PID: $ProductKeyID"}
if ($null -NE $ProductKeyID2 -And $Dlv) {CONOUT "Product ID: $ProductKeyID2"}
if ($null -NE $OfflineInstallationId -And $IID) {CONOUT "Installation ID: $OfflineInstallationId"}
if ($null -NE $ProductKeyChannel) {CONOUT "Product Key Channel: $ProductKeyChannel"}
if ($null -NE $PartialProductKey) {CONOUT "Partial Product Key: $PartialProductKey"}
CONOUT "License Status: $LicenseInf"
if ($null -NE $LicenseMsg) {CONOUT "$LicenseMsg"}
if ($LicenseStatus -NE 0 -And $EvaluationEndDate.Substring(0,4) -NE "1601") { if ($LicenseStatus -NE 0 -And $EvaluationEndDate.Substring(0,4) -NE "1601") {
$EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($EvaluationEndDate),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt') $EED = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($EvaluationEndDate),$null,48).ToString('yyyy-MM-dd hh:mm:ss tt')
Write-Host "Evaluation End Date: $EED UTC" CONOUT "Evaluation End Date: $EED UTC"
}
if ($Dlv) {
if ($null -NE $RemainingWindowsReArmCount) {
CONOUT "Remaining Windows rearm count: $RemainingWindowsReArmCount"
}
if ($null -NE $RemainingSkuReArmCount -And $RemainingSkuReArmCount -NE 4294967295) {
CONOUT "Remaining $reapp rearm count: $RemainingAppReArmCount"
CONOUT "Remaining SKU rearm count: $RemainingSkuReArmCount"
}
if ($null -NE $TrustedTime -And $LicenseStatus -NE 0) {
$TTD = [DateTime]::Parse([Management.ManagementDateTimeConverter]::ToDateTime($TrustedTime),$null,32).ToString('yyyy-MM-dd hh:mm:ss tt')
CONOUT "Trusted time: $TTD"
}
}
if ($LicenseStatus -EQ 0) {
return
}
if ($strSLP -EQ $wslp -And $null -NE $PartialProductKey -And $null -NE $ADActivationObjectName -And $VLActivationType -EQ 1) {
DetectAdbaClient
} }
if ($winID -And $null -NE $cAvmClient -And $null -NE $PartialProductKey) { if ($winID -And $null -NE $cAvmClient -And $null -NE $PartialProductKey) {
@ -467,16 +589,27 @@ function GetResult($strSLP, $strSLS, $strID)
$chkSLS = ($null -NE $PartialProductKey) -And ($null -NE $cKmsClient -Or $null -NE $cKmsHost -Or $chkSub) $chkSLS = ($null -NE $PartialProductKey) -And ($null -NE $cKmsClient -Or $null -NE $cKmsHost -Or $chkSub)
if (!$chkSLS) { if (!$chkSLS) {
if ($null -NE $ExpireMsg) {Write-Host; Write-Host " $ExpireMsg"} if ($null -NE $ExpireMsg) {CONOUT "`n $ExpireMsg"}
return return
} }
$objSvc = Get-WmiObject $strSLS -EA 0 try
{
if ($Vista) { $objSvc = New-Object PSObject
$objSvc | select -Expand Properties -EA 0 | foreach { $wmiSvc = [wmisearcher]"SELECT * FROM $strSLS"
if (-Not [String]::IsNullOrEmpty($_.Value)) {set $_.Name $_.Value} $wmiSvc.Options.Rewindable = $false
$wmiSvc.Get() | select -Expand Properties -EA 0 | foreach {
if (-Not [String]::IsNullOrEmpty($_.Value))
{
$objSvc | Add-Member 8 $_.Name $_.Value
if ($null -EQ $IsKeyManagementServiceMachine) {set $_.Name $_.Value}
}
} }
$wmiSvc.Dispose()
}
catch
{
return
} }
if ($strSLS -EQ $wsls -And $NT9) { if ($strSLS -EQ $wsls -And $NT9) {
@ -486,6 +619,7 @@ function GetResult($strSLP, $strSLS, $strID)
} }
if ($null -NE $cKmsHost -And $IsKeyManagementServiceMachine -GT 0) { if ($null -NE $cKmsHost -And $IsKeyManagementServiceMachine -GT 0) {
if ($null -NE $ExpireMsg) {CONOUT "`n $ExpireMsg"}
DetectKmsHost DetectKmsHost
} }
@ -493,7 +627,9 @@ function GetResult($strSLP, $strSLS, $strID)
DetectKmsClient DetectKmsClient
} }
if ($null -NE $ExpireMsg) {Write-Host; Write-Host " $ExpireMsg"} if ($null -EQ $cKmsHost) {
if ($null -NE $ExpireMsg) {CONOUT "`n $ExpireMsg"}
}
if ($chkSub) { if ($chkSub) {
DetectSubscription DetectSubscription
@ -533,11 +669,10 @@ function PrintModePerPridFromRegistry
$vNextPrids = Get-Item -Path $vNextRegkey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty 'property' -ErrorAction SilentlyContinue | Where-Object -FilterScript {$_.ToLower() -like "*retail" -or $_.ToLower() -like "*volume"} $vNextPrids = Get-Item -Path $vNextRegkey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty 'property' -ErrorAction SilentlyContinue | Where-Object -FilterScript {$_.ToLower() -like "*retail" -or $_.ToLower() -like "*volume"}
If ($null -Eq $vNextPrids) If ($null -Eq $vNextPrids)
{ {
Write-Host CONOUT "`nNo registry keys found."
Write-Host "No registry keys found."
Return Return
} }
Write-Host CONOUT "`r"
$vNextPrids | ForEach ` $vNextPrids | ForEach `
{ {
$mode = (Get-ItemProperty -Path $vNextRegkey -Name $_).$_ $mode = (Get-ItemProperty -Path $vNextRegkey -Name $_).$_
@ -547,7 +682,7 @@ function PrintModePerPridFromRegistry
3 { $mode = "Device"; Break } 3 { $mode = "Device"; Break }
Default { $mode = "Legacy"; Break } Default { $mode = "Legacy"; Break }
} }
Write-Host $_ = $mode CONOUT "$_ = $mode"
} }
} }
@ -561,8 +696,7 @@ function PrintSharedComputerLicensing
$scaPolicyValue = Get-ItemProperty -Path $scaPolicyKey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction SilentlyContinue $scaPolicyValue = Get-ItemProperty -Path $scaPolicyKey -ErrorAction SilentlyContinue | Select-Object -ExpandProperty "SharedComputerLicensing" -ErrorAction SilentlyContinue
If ($null -Eq $scaValue -And $null -Eq $scaValue2 -And $null -Eq $scaPolicyValue) If ($null -Eq $scaValue -And $null -Eq $scaValue2 -And $null -Eq $scaPolicyValue)
{ {
Write-Host CONOUT "`nNo registry keys found."
Write-Host "No registry keys found."
Return Return
} }
$scaModeValue = $scaValue -Or $scaValue2 -Or $scaPolicyValue $scaModeValue = $scaValue -Or $scaValue2 -Or $scaPolicyValue
@ -574,9 +708,8 @@ function PrintSharedComputerLicensing
{ {
$scaMode = "Enabled" $scaMode = "Enabled"
} }
Write-Host CONOUT "`nStatus: $scaMode"
Write-Host "Status:" $scaMode CONOUT "`r"
Write-Host
$tokenFiles = $null $tokenFiles = $null
$tokenPath = "${env:LOCALAPPDATA}\Microsoft\Office\16.0\Licensing" $tokenPath = "${env:LOCALAPPDATA}\Microsoft\Office\16.0\Licensing"
If (Test-Path $tokenPath) If (Test-Path $tokenPath)
@ -585,12 +718,12 @@ function PrintSharedComputerLicensing
} }
If ($null -Eq $tokenFiles) If ($null -Eq $tokenFiles)
{ {
Write-Host "No tokens found." CONOUT "No tokens found."
Return Return
} }
If ($tokenFiles.Length -Eq 0) If ($tokenFiles.Length -Eq 0)
{ {
Write-Host "No tokens found." CONOUT "No tokens found."
Return Return
} }
$tokenFiles | ForEach ` $tokenFiles | ForEach `
@ -624,16 +757,9 @@ function PrintLicensesInformation
{ {
$licenseFiles = Get-ChildItem -Path $licensePath -Recurse | Where-Object { !$_.PSIsContainer } $licenseFiles = Get-ChildItem -Path $licensePath -Recurse | Where-Object { !$_.PSIsContainer }
} }
If ($null -Eq $licenseFiles) If ($null -Eq $licenseFiles -Or $licenseFiles.Length -Eq 0)
{ {
Write-Host CONOUT "`nNo licenses found."
Write-Host "No licenses found."
Return
}
If ($licenseFiles.Length -Eq 0)
{
Write-Host
Write-Host "No licenses found."
Return Return
} }
$licenseFiles | ForEach ` $licenseFiles | ForEach `
@ -690,24 +816,20 @@ function vNextDiagRun
Return Return
} }
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "$line2" CONOUT "$line2"
Write-Host "=== Office vNext Status ===" CONOUT "=== Office vNext Status ==="
Write-Host "$line2" CONOUT "$line2"
Write-Host CONOUT "`n========== Mode per ProductReleaseId =========="
Write-Host "========== Mode per ProductReleaseId =========="
PrintModePerPridFromRegistry PrintModePerPridFromRegistry
Write-Host CONOUT "`n========== Shared Computer Licensing =========="
Write-Host "========== Shared Computer Licensing =========="
PrintSharedComputerLicensing PrintSharedComputerLicensing
Write-Host CONOUT "`n========== vNext licenses ==========="
Write-Host "========== vNext licenses ==========="
PrintLicensesInformation -Mode "NUL" PrintLicensesInformation -Mode "NUL"
Write-Host CONOUT "`n========== Device licenses =========="
Write-Host "========== Device licenses =========="
PrintLicensesInformation -Mode "Device" PrintLicensesInformation -Mode "Device"
Write-Host "$line3" CONOUT "$line3"
Write-Host CONOUT "`r"
} }
#endregion #endregion
@ -790,13 +912,13 @@ function PrintStateData {
} }
[string[]]$pwszStateString = $Marshal::PtrToStringUni($pwszStateData) -replace ";", "`n " [string[]]$pwszStateString = $Marshal::PtrToStringUni($pwszStateData) -replace ";", "`n "
Write-Host " $pwszStateString" CONOUT (" $pwszStateString")
$Marshal::FreeHGlobal($pwszStateData) $Marshal::FreeHGlobal($pwszStateData)
return $TRUE return $TRUE
} }
function PrintLastActivationHRresult { function PrintLastActivationHResult {
$pdwLastHResult = 0 $pdwLastHResult = 0
$cbSize = 0 $cbSize = 0
@ -809,12 +931,34 @@ function PrintLastActivationHRresult {
return $FALSE return $FALSE
} }
Write-Host (" LastActivationHResult=0x{0:x8}" -f $Marshal::ReadInt32($pdwLastHResult)) CONOUT (" LastActivationHResult=0x{0:x8}" -f $Marshal::ReadInt32($pdwLastHResult))
$Marshal::FreeHGlobal($pdwLastHResult) $Marshal::FreeHGlobal($pdwLastHResult)
return $TRUE return $TRUE
} }
function PrintLastActivationTime {
$pdwLastTime = 0
$cbSize = 0
if ($Win32::SLGetWindowsInformation(
"Security-SPP-LastWindowsActivationTime",
[ref]$null,
[ref]$cbSize,
[ref]$pdwLastTime
)) {
return $FALSE
}
$actTime = $Marshal::ReadInt64($pdwLastTime)
if ($actTime -ne 0) {
CONOUT (" LastActivationTime={0}" -f [DateTime]::FromFileTimeUtc($actTime).ToString("yyyy/MM/dd:HH:mm:ss"))
}
$Marshal::FreeHGlobal($pdwLastTime)
return $TRUE
}
function PrintIsWindowsGenuine { function PrintIsWindowsGenuine {
$dwGenuine = 0 $dwGenuine = 0
$ppwszGenuineStates = @( $ppwszGenuineStates = @(
@ -830,9 +974,9 @@ function PrintIsWindowsGenuine {
} }
if ($dwGenuine -lt 5) { if ($dwGenuine -lt 5) {
Write-Host (" IsWindowsGenuine={0}" -f $ppwszGenuineStates[$dwGenuine]) CONOUT (" IsWindowsGenuine={0}" -f $ppwszGenuineStates[$dwGenuine])
} else { } else {
Write-Host (" IsWindowsGenuine={0}" -f $dwGenuine) CONOUT (" IsWindowsGenuine={0}" -f $dwGenuine)
} }
return $TRUE return $TRUE
@ -856,7 +1000,7 @@ function PrintDigitalLicenseStatus {
[bool]$bDigitalLicense = $FALSE [bool]$bDigitalLicense = $FALSE
$bDigitalLicense = (($dwReturnCode -ge 0) -and ($dwReturnCode -ne 1)) $bDigitalLicense = (($dwReturnCode -ge 0) -and ($dwReturnCode -ne 1))
Write-Host (" IsDigitalLicense={0}" -f (BoolToWStr $bDigitalLicense)) CONOUT (" IsDigitalLicense={0}" -f (BoolToWStr $bDigitalLicense))
return $TRUE return $TRUE
} }
@ -874,7 +1018,7 @@ function PrintSubscriptionStatus {
return $FALSE return $FALSE
} }
Write-Host (" SubscriptionSupportedEdition={0}" -f (BoolToWStr $dwSupported)) CONOUT (" SubscriptionSupportedEdition={0}" -f (BoolToWStr $dwSupported))
$pStatus = $Marshal::AllocHGlobal($Marshal::SizeOf([Type]$SubStatus)) $pStatus = $Marshal::AllocHGlobal($Marshal::SizeOf([Type]$SubStatus))
if ($Win32::ClipGetSubscriptionStatus([ref]$pStatus)) { if ($Win32::ClipGetSubscriptionStatus([ref]$pStatus)) {
@ -885,25 +1029,26 @@ function PrintSubscriptionStatus {
$sStatus = $Marshal::PtrToStructure($pStatus, [Type]$SubStatus) $sStatus = $Marshal::PtrToStructure($pStatus, [Type]$SubStatus)
$Marshal::FreeHGlobal($pStatus) $Marshal::FreeHGlobal($pStatus)
Write-Host (" SubscriptionEnabled={0}" -f (BoolToWStr $sStatus.dwEnabled)) CONOUT (" SubscriptionEnabled={0}" -f (BoolToWStr $sStatus.dwEnabled))
if ($sStatus.dwEnabled -eq 0) { if ($sStatus.dwEnabled -eq 0) {
return $TRUE return $TRUE
} }
Write-Host (" SubscriptionSku={0}" -f $sStatus.dwSku) CONOUT (" SubscriptionSku={0}" -f $sStatus.dwSku)
Write-Host (" SubscriptionState={0}" -f $sStatus.dwState) CONOUT (" SubscriptionState={0}" -f $sStatus.dwState)
return $TRUE return $TRUE
} }
function ClicRun function ClicRun
{ {
if ($All.IsPresent) {Write-Host} & $isAll
Write-Host "Client Licensing Check information:" CONOUT "Client Licensing Check information:"
$null = PrintStateData $null = PrintStateData
$null = PrintLastActivationHRresult $null = PrintLastActivationHResult
$null = PrintLastActivationTime
$null = PrintIsWindowsGenuine $null = PrintIsWindowsGenuine
if ($DllDigital) { if ($DllDigital) {
@ -914,20 +1059,16 @@ function ClicRun
$null = PrintSubscriptionStatus $null = PrintSubscriptionStatus
} }
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
#endregion #endregion
$Host.UI.RawUI.WindowTitle = "Check Activation Status" $Host.UI.RawUI.WindowTitle = "Check Activation Status"
UnQuickEdit
if ($All.IsPresent) { if ($All.IsPresent) {
$B=$Host.UI.RawUI.BufferSize;$B.Height=3000;$Host.UI.RawUI.BufferSize=$B;clear; $B=$Host.UI.RawUI.BufferSize;$B.Height=3000;$Host.UI.RawUI.BufferSize=$B;
} if (!$Pass.IsPresent) {clear;}
$SysPath = "$env:SystemRoot\System32"
if (Test-Path "$env:SystemRoot\Sysnative\reg.exe") {
$SysPath = "$env:SystemRoot\Sysnative"
} }
$wslp = "SoftwareLicensingProduct" $wslp = "SoftwareLicensingProduct"
@ -941,46 +1082,43 @@ $cSub = ($winbuild -GE 19041) -And (Select-String -Path "$SysPath\wbem\sppwmi.mo
$DllDigital = ($winbuild -GE 14393) -And (Test-Path "$SysPath\EditionUpgradeManagerObj.dll") $DllDigital = ($winbuild -GE 14393) -And (Test-Path "$SysPath\EditionUpgradeManagerObj.dll")
$DllSubscription = ($winbuild -GE 14393) -And (Test-Path "$SysPath\Clipc.dll") $DllSubscription = ($winbuild -GE 14393) -And (Test-Path "$SysPath\Clipc.dll")
$VLActTypes = @("All", "AD", "KMS", "Token") $VLActTypes = @("All", "AD", "KMS", "Token")
$SLKeyPath = "Registry::HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL" $SLKeyPath = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL"
$NSKeyPath = "Registry::HKEY_USERS\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL" $NSKeyPath = "HKEY_USERS\S-1-5-20\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SL"
'cW1nd0ws', 'c0ff1ce15', 'c0ff1ce14', 'ospp14', 'ospp15' | foreach {set $_ $null} 'cW1nd0ws', 'c0ff1ce15', 'c0ff1ce14', 'ospp14', 'ospp15' | foreach {set $_ $false}
$OsppHook = 1 $offsvc = "osppsvc"
try {gsv osppsvc -EA 1 | Out-Null} catch {$OsppHook = 0} if ($NT7 -Or -Not $NT6) {$winsvc = "sppsvc"} else {$winsvc = "slsvc"}
if ($NT7 -Or -Not $NT6) { try {gsv $winsvc -EA 1 | Out-Null; $WsppHook = 1} catch {$WsppHook = 0}
try {sasv sppsvc -EA 1} catch {} try {gsv $offsvc -EA 1 | Out-Null; $OsppHook = 1} catch {$OsppHook = 0}
if ($WsppHook -NE 0) {
try {sasv $winsvc -EA 1} catch {}
$cW1nd0ws = DetectID $wslp $winApp
$c0ff1ce15 = DetectID $wslp $o15App
$c0ff1ce14 = DetectID $wslp $o14App
} }
else
{
try {sasv slsvc -EA 1} catch {}
}
DetectID $wslp $winApp ([ref]$cW1nd0ws)
DetectID $wslp $o15App ([ref]$c0ff1ce15)
DetectID $wslp $o14App ([ref]$c0ff1ce14)
if ($OsppHook -NE 0) { if ($OsppHook -NE 0) {
try {sasv osppsvc -EA 1} catch {} try {sasv $offsvc -EA 1} catch {}
DetectID $oslp $o15App ([ref]$ospp15) $ospp15 = DetectID $oslp $o15App
DetectID $oslp $o14App ([ref]$ospp14) $ospp14 = DetectID $oslp $o14App
} }
if ($null -NE $cW1nd0ws) if ($cW1nd0ws)
{ {
echoWindows echoWindows
GetID $wslp $winApp | foreach -EA 1 { GetID $wslp $winApp | foreach -EA 1 {
GetResult $wslp $wsls $_ GetResult $wslp $wsls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
elseif ($NT6) elseif ($NT6)
{ {
echoWindows echoWindows
Write-Host CONOUT "`nError: product key not found."
Write-Host "Error: product key not found."
} }
if ($winbuild -GE 9200) { if ($winbuild -GE 9200) {
@ -994,39 +1132,43 @@ if ($c0ff1ce15 -Or $ospp15) {
$doMSG = 1 $doMSG = 1
if ($null -NE $c0ff1ce15) { if ($c0ff1ce15)
{
echoOffice echoOffice
GetID $wslp $o15App | foreach -EA 1 { GetID $wslp $o15App | foreach -EA 1 {
GetResult $wslp $wsls $_ GetResult $wslp $wsls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
if ($null -NE $c0ff1ce14) { if ($c0ff1ce14)
{
echoOffice echoOffice
GetID $wslp $o14App | foreach -EA 1 { GetID $wslp $o14App | foreach -EA 1 {
GetResult $wslp $wsls $_ GetResult $wslp $wsls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
if ($null -NE $ospp15) { if ($ospp15)
{
echoOffice echoOffice
GetID $oslp $o15App | foreach -EA 1 { GetID $oslp $o15App | foreach -EA 1 {
GetResult $oslp $osls $_ GetResult $oslp $osls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }
if ($null -NE $ospp14) { if ($ospp14)
{
echoOffice echoOffice
GetID $oslp $o14App | foreach -EA 1 { GetID $oslp $o14App | foreach -EA 1 {
GetResult $oslp $osls $_ GetResult $oslp $osls $_
Write-Host "$line3" CONOUT "$line3"
if (!$All.IsPresent) {Write-Host} & $noAll
} }
} }