Powershell - GUI für offene Netzwerk-Sessions (net session) und offene Dateihandles (net file)

$w_async = Add-Type –memberDefinition @” 
[DllImport("user32.dll")]   
public static extern bool ShowWindowAsync(IntPtr hWnd, int nCmdShow); 
“@ -name “Win32ShowWindowAsync” -namespace Win32Functions –passThru
function Hide-PowerShell() { 
    [void]$w_async::ShowWindowAsync((Get-Process –id $pid).MainWindowHandle, 2) 
}

function GenerateForm{

#region Import the Assemblies
[reflection.assembly]::loadwithpartialname("System.Drawing") | Out-Null  
[reflection.assembly]::loadwithpartialname("System.Windows.Forms") | Out-Null  
#endregion

#region Form Objects
$form1 = New-Object System.Windows.Forms.Form
$btn_refresh_files = New-Object System.Windows.Forms.Button
$btn_refresh_sessions = New-Object System.Windows.Forms.Button
$btn_disconnect_file = New-Object System.Windows.Forms.Button
$btn_disconnect_all_files = New-Object System.Windows.Forms.Button
$btn_disconnect_all_session = New-Object System.Windows.Forms.Button
$btn_disconnect_session = New-Object System.Windows.Forms.Button
$dg_files = New-Object System.Windows.Forms.DataGridView
$label2 = New-Object System.Windows.Forms.Label
$label1 = New-Object System.Windows.Forms.Label
$dg_sessions = New-Object System.Windows.Forms.DataGridView
$InitialFormWindowState = New-Object System.Windows.Forms.FormWindowState
#endregion Form Objects

#----------------------------------------------
# Event Script Blocks
#----------------------------------------------

$handler_btn_disconnect_session_Click= 
{
    if ($dg_sessions.SelectedRows.Count -gt 0 ){
        $computer = $dg_sessions.Rows[$dg_sessions.SelectedRows[0].Index].Cells['Computer'].Value  
        start-process  "net" -ArgumentList "session \\$computer /DELETE /YES" -Wait -WindowStyle Hidden  
        &$refresh_sessions
    }
}

$handler_btn_disconnect_all_session_Click= 
{
    if ((&$msgbox 'Möchten sie wirklich alle offenen Verbindungen beenden?' 'Alle Sitzungen beenden' 4 48) -eq 6){  
        if ($dg_sessions.RowCount -gt 0 ){
            foreach($row in $dg_sessions.Rows){
                start-process  "net" -ArgumentList "session \\$($row.Cells['Computer'].Value) /DELETE /YES" -Wait -WindowStyle Hidden  
            }
            &$refresh_sessions
        }
    }
}

$handler_btn_disconnect_file_Click= 
{
    if ($dg_files.SelectedRows.Count -gt 0 ){
        $id = $dg_sessions.Rows[$dg_sessions.SelectedRows[0].Index].Cells['ID'].Value  
        start-process  "net" -ArgumentList "file $id /CLOSE /YES" -Wait -WindowStyle Hidden  
        &$refresh_files
    }
}

$handler_btn_disconnect_all_files_Click= 
{
    if ((&$msgbox 'Möchten sie wirklich alle offenen Dateihandles beenden?' 'Alle offene Dateien schließen' 4 48) -eq 6){  
        if ($dg_files.RowCount -gt 0 ){
            foreach($row in $dg_files.Rows){
                start-process  "net" -ArgumentList "file \\$($row.Cells['ID'].Value) /CLOSE" -Wait -WindowStyle Hidden  
            }
            &$refresh_files
        }
    }
}

$handler_form1_Load= 
{
    &$refresh_sessions
    &$refresh_files
}

$handler_btn_refresh_sessions_Click= 
{
    &$refresh_sessions
}

$handler_btn_refresh_files_Click= 
{
    &$refresh_files
}

$OnLoadForm_StateCorrection=
{#Correct the initial state of the form to prevent the .Net maximized form issue
	$form1.WindowState = $InitialFormWindowState
}

$refresh_sessions = {
    # get open network sessions
    $sessions = @()
    $raw = net session /list | out-string
    $langID = [System.Globalization.CultureInfo]::CurrentUICulture.LCID
    switch($langID){
        1031{$matches = ([regex]'(?ms)^Benutzername\s+([^\r\n]*)\s+^Computer\s+([^\r\n]*).*?^Ruhezeit\s+([^\r\n]*)').Matches($raw)}  
        default{$matches = ([regex]'(?ms)^User name\s+([^\r\n]*)\s+^Computer\s+([^\r\n]*).*?^Idle time\s+([^\r\n]*)').Matches($raw)}  
    }
    $matches | %{
        $sessions += new-Object PSObject -Property @{'Computer'=$_.Groups[2];'Benutzername'=$_.Groups[1];'Leerlauf'=$_.Groups[3]}  
    }
    $sessions = $sessions | select Computer,Benutzername,Leerlauf | sort Computer
    $arrList = New-Object System.Collections.ArrayList
    if ($sessions.Length -gt 1){
        $arrList.AddRange($sessions)
    }else{
        $arrList.Add($sessions)
    }
    $dg_sessions.DataSource = $arrList
}

$refresh_files = {
    # Get opened files
    $openfiles = @()
    net file | select -Skip 4 | ?{$_ -match '^\d+'} | %{  
        $cols = $_ -Split '\s{2,}'  
        $openfiles += new-Object PSObject -Property @{'ID'=$cols;'Geöffnete Datei'=$cols[1];'Zugriff durch'=$cols[2]}  
    }
    $openfiles = $openfiles | select 'Geöffnete Datei','Zugriff durch','ID' | sort 'Geöffnete Datei'  
    $arrList = New-Object System.Collections.ArrayList
    if ($openfiles.Length -gt 1){
        $arrList.AddRange($openfiles)
    }else{
        $arrList.Add($openfiles)
    }
    $dg_files.DataSource = $arrList
}


$msgbox = {
param(
    [string]$text,
    [string]$title,
    [System.Windows.Forms.MessageBoxButtons]$buttons,
    [System.Windows.Forms.MessageBoxIcon]$icon
)
    return [System.Windows.Forms.MessageBox]::Show($text,$title,$buttons,$icon)
}

#----------------------------------------------
#region Form Code
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 422
$System_Drawing_Size.Width = 471
$form1.ClientSize = $System_Drawing_Size
$form1.DataBindings.DefaultDataSourceUpdateMode = 0
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 450
$System_Drawing_Size.Width = 479
$form1.MinimumSize = $System_Drawing_Size
$form1.Name = "form1"  
$form1.Text = "Sitzungen / Geöffnete Dateien verwalten"  
$form1.add_Load($handler_form1_Load)

$btn_refresh_files.Anchor = 6

$btn_refresh_files.DataBindings.DefaultDataSourceUpdateMode = 0

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 12
$System_Drawing_Point.Y = 389
$btn_refresh_files.Location = $System_Drawing_Point
$btn_refresh_files.Name = "btn_refresh_files"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 87
$btn_refresh_files.Size = $System_Drawing_Size
$btn_refresh_files.TabIndex = 9
$btn_refresh_files.Text = "Aktualisieren"  
$btn_refresh_files.UseVisualStyleBackColor = $True
$btn_refresh_files.add_Click($handler_btn_refresh_files_Click)

$form1.Controls.Add($btn_refresh_files)

$btn_refresh_sessions.Anchor = 6

$btn_refresh_sessions.DataBindings.DefaultDataSourceUpdateMode = 0

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 12
$System_Drawing_Point.Y = 185
$btn_refresh_sessions.Location = $System_Drawing_Point
$btn_refresh_sessions.Name = "btn_refresh_sessions"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 87
$btn_refresh_sessions.Size = $System_Drawing_Size
$btn_refresh_sessions.TabIndex = 8
$btn_refresh_sessions.Text = "Aktualisieren"  
$btn_refresh_sessions.UseVisualStyleBackColor = $True
$btn_refresh_sessions.add_Click($handler_btn_refresh_sessions_Click)

$form1.Controls.Add($btn_refresh_sessions)

$btn_disconnect_file.Anchor = 10

$btn_disconnect_file.DataBindings.DefaultDataSourceUpdateMode = 0

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 224
$System_Drawing_Point.Y = 389
$btn_disconnect_file.Location = $System_Drawing_Point
$btn_disconnect_file.Name = "btn_disconnect_file"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 115
$btn_disconnect_file.Size = $System_Drawing_Size
$btn_disconnect_file.TabIndex = 7
$btn_disconnect_file.Text = "Auswahl schließen"  
$btn_disconnect_file.UseVisualStyleBackColor = $True
$btn_disconnect_file.add_Click($handler_btn_disconnect_file_Click)

$form1.Controls.Add($btn_disconnect_file)

$btn_disconnect_all_files.Anchor = 10

$btn_disconnect_all_files.DataBindings.DefaultDataSourceUpdateMode = 0

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 345
$System_Drawing_Point.Y = 389
$btn_disconnect_all_files.Location = $System_Drawing_Point
$btn_disconnect_all_files.Name = "btn_disconnect_all_files"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 114
$btn_disconnect_all_files.Size = $System_Drawing_Size
$btn_disconnect_all_files.TabIndex = 6
$btn_disconnect_all_files.Text = "Alle schließen"  
$btn_disconnect_all_files.UseVisualStyleBackColor = $True
$btn_disconnect_all_files.add_Click($handler_btn_disconnect_all_files_Click)

$form1.Controls.Add($btn_disconnect_all_files)

$btn_disconnect_all_session.Anchor = 10

$btn_disconnect_all_session.DataBindings.DefaultDataSourceUpdateMode = 0

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 310
$System_Drawing_Point.Y = 185
$btn_disconnect_all_session.Location = $System_Drawing_Point
$btn_disconnect_all_session.Name = "btn_disconnect_all_session"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 149
$btn_disconnect_all_session.Size = $System_Drawing_Size
$btn_disconnect_all_session.TabIndex = 5
$btn_disconnect_all_session.Text = "Alle Verbindungen trennen"  
$btn_disconnect_all_session.UseVisualStyleBackColor = $True
$btn_disconnect_all_session.add_Click($handler_btn_disconnect_all_session_Click)

$form1.Controls.Add($btn_disconnect_all_session)

$btn_disconnect_session.Anchor = 10

$btn_disconnect_session.DataBindings.DefaultDataSourceUpdateMode = 0

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 183
$System_Drawing_Point.Y = 185
$btn_disconnect_session.Location = $System_Drawing_Point
$btn_disconnect_session.Name = "btn_disconnect_session"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 121
$btn_disconnect_session.Size = $System_Drawing_Size
$btn_disconnect_session.TabIndex = 4
$btn_disconnect_session.Text = "Auswahl trennen"  
$btn_disconnect_session.UseVisualStyleBackColor = $True
$btn_disconnect_session.add_Click($handler_btn_disconnect_session_Click)

$form1.Controls.Add($btn_disconnect_session)

$dg_files.AllowUserToAddRows = $False
$dg_files.AllowUserToDeleteRows = $False
$dg_files.AllowUserToResizeRows = $False
$dg_files.Anchor = 14
$dg_files.SelectionMode = 1
$dg_files.RowHeadersVisible = $false
$dg_files.AutoSizeColumnsMode = 16
$dg_files.ReadOnly = $true
$dg_files.BackgroundColor = [System.Drawing.Color]::White

$dg_files.DataBindings.DefaultDataSourceUpdateMode = 0
$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 12
$System_Drawing_Point.Y = 239
$dg_files.Location = $System_Drawing_Point
$dg_files.Name = "dg_files"  
$dg_files.RowHeadersWidth = 20
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 144
$System_Drawing_Size.Width = 447
$dg_files.Size = $System_Drawing_Size
$dg_files.TabIndex = 3

$form1.Controls.Add($dg_files)

$label2.Anchor = 6
$label2.DataBindings.DefaultDataSourceUpdateMode = 0
$label2.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",9.75,1,3,0)  

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 12
$System_Drawing_Point.Y = 213
$label2.Location = $System_Drawing_Point
$label2.Name = "label2"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 144
$label2.Size = $System_Drawing_Size
$label2.TabIndex = 2
$label2.Text = "Offene Dateien"  

$form1.Controls.Add($label2)

$label1.DataBindings.DefaultDataSourceUpdateMode = 0
$label1.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",9.75,1,3,0)  

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 12
$System_Drawing_Point.Y = 9
$label1.Location = $System_Drawing_Point
$label1.Name = "label1"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 144
$label1.Size = $System_Drawing_Size
$label1.TabIndex = 1
$label1.Text = "Offene Sitzungen"  

$form1.Controls.Add($label1)

$dg_sessions.AllowUserToAddRows = $False
$dg_sessions.AllowUserToDeleteRows = $False
$dg_sessions.AllowUserToResizeRows = $False
$dg_sessions.Anchor = 15
$dg_sessions.SelectionMode = 1
$dg_sessions.ReadOnly = $true
$dg_sessions.RowHeadersVisible = $false
$dg_sessions.AutoSizeColumnsMode = 16
$dg_sessions.BackgroundColor = [System.Drawing.Color]::White

$dg_sessions.DataBindings.DefaultDataSourceUpdateMode = 0
$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 12
$System_Drawing_Point.Y = 35
$dg_sessions.Location = $System_Drawing_Point
$dg_sessions.MultiSelect = $False
$dg_sessions.Name = "dg_sessions"  
$dg_sessions.RowHeadersWidth = 20
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 144
$System_Drawing_Size.Width = 447
$dg_sessions.Size = $System_Drawing_Size
$dg_sessions.TabIndex = 0

$form1.Controls.Add($dg_sessions)

#endregion Generated Form Code

#Save the initial state of the form
$InitialFormWindowState = $form1.WindowState
#Init the OnLoad event to correct the initial state of the form
$form1.add_Load($OnLoadForm_StateCorrection)
#Show the Form
$form1.ShowDialog()| Out-Null
} # End Function

# Powershell-Konsolenfenster verstecken
Hide-PowerShell
#Form Funktion aufrufen
GenerateForm