Abmeldevorgang verhindern solange Anwendung läuft

Sprache: VB

Manchmal ist es nützlich, dass ein User sich nicht abmelden kann solange eine Anwendung läuft. Das nachfolgende Snippet verhindert dies.

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        AddHandler Microsoft.Win32.SystemEvents.SessionEnding, AddressOf SesionEnding
    End Sub


    Sub SesionEnding(ByVal sender As System.Object, ByVal e As Microsoft.Win32.SessionEndingEventArgs)
        If (e.Reason = Microsoft.Win32.SessionEndReasons.Logoff) OrElse (e.Reason = Microsoft.Win32.SessionEndReasons.SystemShutdown) Then
            e.Cancel = True
            MessageBox.Show("Solange die Anwendund xxx aktiv ist, ist eine Abmeldung nicht möglich!")
        End If
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        AddHandler Microsoft.Win32.SystemEvents.SessionEnding, AddressOf SesionEnding
    End Sub


    Sub SesionEnding(ByVal sender As System.Object, ByVal e As Microsoft.Win32.SessionEndingEventArgs)
        If (e.Reason = Microsoft.Win32.SessionEndReasons.Logoff) OrElse (e.Reason = Microsoft.Win32.SessionEndReasons.SystemShutdown) Then
            e.Cancel = True
            MessageBox.Show("Solange die Anwendund xxx aktiv ist, ist eine Abmeldung nicht möglich!")
        End If
    End Sub

Abgelegt unter Logoff

Alte URL: /snippet/abmeldevorgang-verhindern-solange-anwendung-laeuft/359

1 Kommentar