Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  SolidWorks
  Netzwerk-Benutzer-Informationen abrufen

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS
  
Intertool 2024
Autor Thema:  Netzwerk-Benutzer-Informationen abrufen (444 mal gelesen)
nahe
Ehrenmitglied



Sehen Sie sich das Profil von nahe an!   Senden Sie eine Private Message an nahe  Schreiben Sie einen Gästebucheintrag für nahe

Beiträge: 1747
Registriert: 18.01.2001

arbeite mit:
Dell Precision 7750
i7 2,6 GHz 6 Kerne
32GB RAM
512GB SSD
NVIDIA Quadro RTX 4000
------------------------
SWX-2020 SP5.0
EPDM
----------------
Windows 10
----------------
VB.net
VB
VBA
ein wenig Swift am Mac

erstellt am: 08. Jul. 2021 07:49    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


CUserinfo.zip

 
Hallo zusammen,

falls das mal wer braucht,
anbei eine VBA Klasse um die Netzwerk-Benutzer-Daten abzurufen

Zur Verwendung
einfach ein VAB Makro erstellen
die Klasse "CUserinfo.cls" importieren

dann ein Funktion erstellen
z.B.:

Sub main()
  Dim ui As New CUserinfo
 
  ui.GetUserInfo

  MsgBox "Benutzer: " & ui.UserName & " / " & "Name: " & ui.FullName, vbOKOnly, ""

End Sub

Hinweise
wird bei GetUserInfo kein Parameter angegeben,
dann werden die Daten vom aktuellen Benutzer abgerufen

wird ein Benutzername übergeben,
dann werden die Daten vom diesem Benutzer abgerufen

folgende Daten werden ausgewertet

  UserName      As String
  Company      As String
  Country      As String
  FullName      As String
  zip          As String
  City          As String
  MailAdress    As String
  Department    As String
  Description  As Variant
  streetAddress As String
  GivenName    As String
  SureName      As String
  Title        As String
  OfficePhone  As String
  MobilePhone  As String
  Manager      As String

------------------
Grüße
Heinz

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2024 CAD.de | Impressum | Datenschutz