vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#

https://www.vbarchiv.net
Rubrik: System/Windows · Computer/Benutzer/Ländereinstellungen   |   VB-Versionen: VB.NET08.01.03
Welcher User ist angemeldet? (VB.NET)

Dieser Tipp zeigt, wie sich der Name des aktuell angemeldeten Benutzers unter VB.NET ermitteln lässt.

Autor:   Dieter OtterBewertung:  Views:  36.635 
www.tools4vb.deSystem:  Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 Beispielprojekt auf CD 

Wie lässt sich der Name des aktuell angemeldeten Benutzers ermitteln?
Unter VB5/6 wird man hierfür i.a.R. die GetUserName API-Funktion verwenden, auf die man natürlich auch unter VB.NET zurückgreifen könnte. Da viele Funktionen, die bisher nur das Windows-API zur Verfügung gestellt hatte nun im umfangreichen .NET Framework enthalten sind, sollte man diese als VB.NET Entwickler auch benutzen

Verantworlich hierfür ist in unserem Fall das System.Security.Principal-Namespace, das Sie über die Imports-Anweisung in ihr Projekt "importieren" können. Achten Sie aber darauf, dass die Imports-Anweisung vor Deklarationen, einschließlich Module- oder Class-Anweisungen, und vor Verweisen auf Identifizierer platziert werden muss!

Innerhalb des System.Security.Principal Namespace-Objekts findet man eine Klasse namens WindowsPrincipal, über die man Informationen eines Windows-Benutzer ermitteln kann. Die GetCurrent-Methode der WindowsIdentity-Klasse liefert uns letztendlich das gewünschte WindowsIdentity-Objekt für den aktuell angemeldeten Benutzer.

' Klasse importieren
Imports System.Security.Principal
 
Public Class Form1
  Inherits System.Windows.Forms.Form
 
  Public Function GetUserName() As String
    ' Name des aktuell angemeldeten
    ' Benutzers ermitteln
    Dim oUser As New WindowsPrincipal(WindowsIdentity.GetCurrent)
 
    ' Rückgabewert: Server\UserName
    ' Wir möchten aber nur den Benutzername!
    With oUser.Identity.Name()
      Return(.Substring(.IndexOf("\") + 1))
    End With
  End Function
 
End Class



Anzeige

Kauftipp Unser Dauerbrenner!Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv  Vol.6
(einschl. Beispielprojekt!)

Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
- nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
- Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.
 
 
Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.


Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.