| | | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS | | | | Next-Level-Design mit AI in SOLIDWORKS Cloud-Lösungen |
Autor
|
Thema: API: Nutzername ermitteln ? (4482 mal gelesen)
|
u.clemens Mitglied Konstrukteur
Beiträge: 964 Registriert: 04.07.2000 engineer's law o cheap o fast o good check only two !
|
erstellt am: 17. Jul. 2003 14:59 <-- editieren / zitieren --> Unities abgeben:
hallo API -Experten, wenn ich irgendein Feature erstelle, kann ich anschließend unter Feature-Eigenschaften meinen Namen unter "Erstellt von:" lesen. Irgendwo her weiß SWX also, mit welchen Namen der Nutzer sich am Rechner angemeldet hat - und trägt es dort ein. Kann man diese Information auch mit API unter VB erhalten ? Wenn ja, wie ? Nochmal deutlich: Ich brauche NICHT den Namen, wer das Feature irgendwann mal erstellt hat (das ist klar: Feature.CreatedBy), sondern den Namen des Nutzers der gerade am Rechner sitzt.
------------------ mfg uc Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
gismo Mitglied SWX Support
Beiträge: 1047 Registriert: 05.03.2001
|
erstellt am: 17. Jul. 2003 15:25 <-- editieren / zitieren --> Unities abgeben: Nur für u.clemens
HI Uc, ich nutze dies Funktion auch in einigen meiner Makros. Allerdings ist das eie Windows API . Aber ich denke, dass das keine Rolle spielt: Code:
' diese Funktion liest den Namen des aktuell im System angemeldeten Users aus Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _ (ByVal lpBuffer As String, nSize As Long) As Long
Aufruf dann mit: Code:
' Spasseshalber lese ich noch schnell den angemeldeteten User aus strUserName = String(100, Chr$(0)) retval = GetUserName(strUserName, 100) strUserName = Left$(strUserName, InStr(strUserName, Chr$(0)) - 1) UsrName.Caption = strUserName
------------------ Viele Grüße aus dem Schwarzwald gismo Meine bescheidene Website Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
u.clemens Mitglied Konstrukteur
Beiträge: 964 Registriert: 04.07.2000 engineer's law o cheap o fast o good check only two !
|
erstellt am: 17. Jul. 2003 17:00 <-- editieren / zitieren --> Unities abgeben:
|
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|