####################################################
# SetCompADDescription.ps1 by diamon
# 2013-03-27
#
#Записывает в описание компьютера в active directory имя залогиненого на нем пользователя
####################################################
cls
 
Import-Module ActiveDirectory
 
$Сomputers = Get-ADComputer -Properties OperatingSystem, Description, ManagedBy -Filter "OperatingSystem -NotLike '*server*'"
 
foreach ($Сomputer in $Сomputers) {
	$СomputerName=$Сomputer.Name
	$Available = Get-WMIObject Win32_PingStatus -filter "Address='$СomputerName'"
	if ($Available.StatusCode -eq 0) {
		$LoggedonUserName = (Get-WMIObject -Class Win32_ComputerSystem -ErrorAction SilentlyContinue -ComputerName $СomputerName).UserName
		if ($LoggedonUserName -ne $null) { $DisplayName=(Get-ADUser ($LoggedonUserName.Split('\')[1])).name }
		else { $DisplayName=$null }
		Write-Host $Сomputer.Name,"`tDescription=",$Сomputer.Description,"`tLoggedUser=",$LoggedonUserName,"`tDisplayName=",$DisplayName
		if (($Сomputer.Description -ne $DisplayName) -and ($DisplayName -ne $null)) {
				Write-Host "`nОтсутствует (или устаревшее) описание`nМеняем на новое - ", $DisplayName, "`n"
				Set-ADComputer -Identity $Сomputer -Description $DisplayName
		}
	}
	else {
	Write-Host "$СomputerName недоступен" -ForegroundColor Red
	}
}