Get SQL Servers Instances and Ports

Get-SQLInstancesPort.ps1

function Get-SQLInstancesPort
{
    
    param ([string]$Server)

    # REF: https://docs.microsoft.com/en-us/answers/questions/486485/get-a-list-of-instances-and-and-port-numbers-runni.html

    # $Server = 'SQL1' # TESTING
    
    [system.reflection.assembly]::LoadWithPartialName("Microsoft.SqlServer.Smo")|Out-Null
    [system.reflection.assembly]::LoadWithPartialName("Microsoft.SqlServer.SqlWmiManagement")|Out-Null
    $mc = new-object Microsoft.SqlServer.Management.Smo.Wmi.ManagedComputer $Server
    $Instances = $mc.ServerInstances
    
    foreach ($Instance in $Instances) {
        $port = @{Name = "Port"; Expression = {$_.ServerProtocols['Tcp'].IPAddresses['IPAll'].IPAddressProperties['TcpPort'].Value}}
        $Parent = @{Name = "Parent"; Expression = {$_.Parent.Name}}
        $Instance|Select $Parent, Name, $Port
    }

 }