18 lines
530 B
PowerShell
18 lines
530 B
PowerShell
|
# SpearHead Systems george.mocanu@sphs.ro
|
||
|
# Check for Windows 2012 Server
|
||
|
|
||
|
Import-Module RemoteDesktopServices
|
||
|
|
||
|
$path = "RDS:\LicenseServer\LicenseKeyPacks\"
|
||
|
|
||
|
Write-Host "<<<rds_licenses>>>"
|
||
|
foreach($pack in Get-ChildItem $path)
|
||
|
{
|
||
|
$checkName = $pack.Name -replace '\s',''
|
||
|
$newPath = Join-Path $path $pack
|
||
|
$total = (Get-Item $newPath\TotalLicenses).CurrentValue
|
||
|
$usage = (Get-Item $newPath\IssuedLicensesCount).CurrentValue
|
||
|
Write-Host $checkName " " $total " " $usage
|
||
|
}
|
||
|
exit
|