Active Directory User & Groups Flatten Scan for Powershell V2.0 with output flattened to a single element.

AlternateADUserGroupFlattenScanPsV2

Try { Import-Module ActiveDirectory -ErrorAction Stop }
Catch { Write-Host "Unable to load Active Directory module."; Break; }

$hostname = [system.environment]::MachineName
$users = Get-ADUser -Filter * -Server $hostname

$users = $users | % {
            $un = Get-ADUser "$_" -Properties * -Server $hostname
            $groups = Foreach ($group in $un.MemberOf){
                        (Get-ADGroup $group -Server $hostname).Name
                        }
            if($groups -ne $null){
                $groups = $groups | Sort
                $groups = [string]::Join(",",($groups))
            } else {
                $groups = [string]::Empty
            }
            $user = New-Object -typename PSObject | 
                    Add-Member -MemberType NoteProperty -Name DistinguishedName -Value $un.DistinguishedName -passthru |
                    Add-Member -MemberType NoteProperty -Name Enabled -Value $un.Enabled -passthru |
                    Add-Member -MemberType NoteProperty -Name SamAccountName -Value $un.SamAccountName -passthru |
                    Add-Member -MemberType NoteProperty -Name EmailAddress -Value $un.EmailAddress -passthru |
                    Add-Member -MemberType NoteProperty -Name whenChanged -Value (([DateTime]$un.whenChanged) -f 'F') -passthru |
                    Add-Member -MemberType NoteProperty -Name whenCreated -Value (([DateTime]$un.whenCreated) -f 'F') -passthru |
                    Add-Member -MemberType NoteProperty -Name Groups -Value $groups -passthru
            return $user
        }

$output = '' | Select name, raw
$output.name = 'AD Users & Groups'
$output.raw = ''
foreach($result in $users) {
 $output.raw += $result | Select SamAccountName, DistinguishedName, Enabled, EmailAddress, whenCreated, whenChanged, Groups
 $output.raw += "`r`n"
}

$output