IsAdmin - Hat der aktuelle User Adminrechte? Die Funktion ermittelt, ob der current user Administrator-Rechte hat
Autor:   Helmut Suhren	Bewertung:     [ Jetzt bewerten ]	Views:  19.393
ohne Homepage	System:  Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 22 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.9 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Die nachfolgende Funktion ermittelt, ob der aktuell angemeldete User über Administrator-Rechte verfügt.

Imports System.Threading
Imports System.Security.Principal
...

''' <summary>
''' Prüft, ob der aktuell angemeldete User Adminrechte besitzt
''' </summary>
Public Function IsAdmin() As Boolean
  IsAdmin = CType(Thread.CurrentPrincipal, WindowsPrincipal).IsInRole( _
    WindowsBuiltInRole.Administrator)
End Function

Aufrufbeispiel:

If IsAdmin() Then
  MsgBox("Der angemeldete Benutzer besitzt Adminrechte!")
Else
  MsgBox("Der angemeldete Benutzer hat KEINE Adminrechte!")
End If