NetStats.ps1

function SetupForm{
    
    [reflection.assembly]::loadwithpartialname("System.Windows.Forms") | Out-Null;
    [reflection.assembly]::loadwithpartialname("System.Drawing") | Out-Null;

    $form = New-Object System.Windows.Forms.Form;
    $dgv = New-Object System.Windows.Forms.DataGridView;
    
    $form.Text = "TCP Connection Status";
    $form.Name = "form";
    $form.Controls.Add($dgv);
    
    $dgv.Width = $form.Width - 10;
    $dgv.Height = $form.Height
    $dgv.Anchor = [System.Windows.Forms.AnchorStyles]::Left -bor [System.Windows.Forms.AnchorStyles]::Right -bor [System.Windows.Forms.AnchorStyles]::Bottom -bor [System.Windows.Forms.AnchorStyles]::Top
    
    $timer = New-Object System.Windows.Forms.Timer;
    $timer.Interval = 1000;
    $timer.add_Tick({
        $result = [System.Net.NetworkInformation.IpGlobalProperties]::GetIPGlobalProperties().GetActiveTcpConnections();
        $dgv.Datasource = $result;
    });
    

    $timer.Enabled = $TRUE;
    $form.Visible = $TRUE;
    
    [System.Windows.Forms.Application]::Run($form);
}

SetupForm