[Iska]

PowerShell:

Код:

net.exe view | Select-String -Pattern "\\\\(.*?) " | ForEach-Object -Process {
    $IPHostEntry = [Net.Dns]::GetHostEntry($_.Matches[0].Groups[1].Value)
    
    Write-Host $("{0, -30}" -f $IPHostEntry.HostName) -NoNewline
    
    $IPHostEntry.AddressList | ForEach-Object -Process {
        Write-Host $("{0, -17}" -f $_.IPAddressToString) -NoNewline
    }
    Write-Host
}