colinardo
Goto Top

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

Heute kam von jemandem eine Frage ob man nicht den Dialog für das Auflisten von aktiven Netzwerksessions und Dateihandles auf einem Windows System einfach aufrufen kann. Da dieser Dialog in der MMC (storagemgmt.msc) integriert ist nur mit Umwegen aufzurufen ist, habe ich die zwei Dialoge mal auf die schnelle mit Powershell in einer GUI zusammengefasst.

Zur Info der Dialog automatisiert nur die Shell-Befehle net session und net file in einer GUI.

Für alle die solche Aufgaben lieber mit einer GUI erledigen ist dieser Powershell-Code vielleicht mal dienlich face-wink

Der Dialog sieht dann folgendermaßen aus:

0f01fe727d9e2ecd20def846ba47fffa
back-to-topPowershell-Code
$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

Wer es brauchen kann, viel Spaß damit face-smile

Grüße @colinardo

Content-Key: 251468

Url: https://administrator.de/contentid/251468

Ausgedruckt am: 29.03.2024 um 14:03 Uhr

Mitglied: Penny.Cilin
Penny.Cilin 10.10.2014 um 12:46:56 Uhr
Goto Top
@colinardo

Perfekt! face-smile


Gruss Penny.
Mitglied: AnkhMorpork
AnkhMorpork 10.10.2014 um 17:57:26 Uhr
Goto Top
Gehörst du eigentlich zu den Entwicklern der PS?

Mir scheint es fast so ... geniale Sache!

Gruß

ankh
Mitglied: colinardo
colinardo 10.10.2014 aktualisiert um 18:02:12 Uhr
Goto Top
Zitat von @AnkhMorpork:

Gehörst du eigentlich zu den Entwicklern der PS?
nee face-smile, mache Powershell intensiv auch erst seit ca. 1,5 Jahren. Aber damals hat mich das Fieber gepackt was so alles mit der Powershell möglich ist face-smile macht einfach nur Spaß !

Grüße Uwe
Mitglied: AnkhMorpork
AnkhMorpork 10.10.2014 um 19:13:31 Uhr
Goto Top
Zitat von @colinardo:

> Zitat von @AnkhMorpork:
>
> Gehörst du eigentlich zu den Entwicklern der PS?
nee face-smile, mache Powershell intensiv auch erst seit ca. 1,5 Jahren. Aber damals hat mich das Fieber gepackt was so alles mit der
Powershell möglich ist face-smile macht einfach nur Spaß !

Grüße Uwe

Man, man ... meinen Respekt dazu! Und weiter so!

Gruß

ankh
Mitglied: Dani
Dani 11.10.2014, aktualisiert am 12.10.2014 um 18:57:43 Uhr
Goto Top
Guten Abend @colinardo,
einfach perfekt! Du lernst anscheinend schnell... face-wink
Gibt es bestimmte Anforderungen bezüglich der Powershellversion und des Betriebssystems? Du hast zwar von einem Windows-Serversystem gesprochen, aber ist sehr allgemein gehalten.


Gruß,
Dani

P.S. Ich vermute er arbeitet für ein Unternehmen mit Haupsitz in Unterschleißheim. face-smile
Mitglied: colinardo
colinardo 11.10.2014 aktualisiert um 23:23:51 Uhr
Goto Top
Hallo Dani,
Zitat von @Dani:
Gibt es bestimmte Anforderungen bezüglich der Powershellversion und des Betriebssystems? Du hast zwar von einem
Windows-Serversystem gesprochen, aber ist sehr allgemein gehalten.
habe es hier auf einem Windows 7/8 und einem Server 2008R2 getestet. Die Ausgabe von net session und net file sollte sich in den Versionen nicht groß unterscheiden. Habe die Ausgabe mit Regex gecaptured und gilt für deutsche und englische Systeme. Einfach ausprobieren und Rückmeldung geben face-wink

Grüße Uwe
Mitglied: colinardo
colinardo 19.10.2014 aktualisiert um 14:20:56 Uhr
Goto Top
Zur Info: Die Serie der GUIs geht in die nächste Runde ...
PowerShell VPN Monitoring

Grüße Uwe
Mitglied: cced-de
cced-de 06.09.2018 um 14:24:15 Uhr
Goto Top
Super Script,

genial wäre eine solche Abfrage, über das Netz auf einen Server..
Welche Files sind auf dem Server von welchem User geöffnet... Diese dann bei Bedarf schließen...

Ich versuche gerade sowas mit Batch umzusetzen face-sad
Siehe Hier...