Aktuell angemeldeten Benutzer in Datei schreiben (Nachname, Vorname)
Hallo zusammen,
ich suche eine Möglichkeit den aktuell angemeldeten Windowsbenutzer nach dem Format Nachname, Vorname in eine Datei (z.B. Textdatei) zu schreiben.
Wahrscheinlich ist die einzigste Möglichkeit, die Infos aus dem AD auszulesen, oder?
Hat jemand einen Lösungsvorschlag für mich?
Danke schon mal.
Gruß
Tobias
ich suche eine Möglichkeit den aktuell angemeldeten Windowsbenutzer nach dem Format Nachname, Vorname in eine Datei (z.B. Textdatei) zu schreiben.
Wahrscheinlich ist die einzigste Möglichkeit, die Infos aus dem AD auszulesen, oder?
Hat jemand einen Lösungsvorschlag für mich?
Danke schon mal.
Gruß
Tobias
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 78479
Url: https://administrator.de/contentid/78479
Ausgedruckt am: 22.11.2024 um 13:11 Uhr
4 Kommentare
Neuester Kommentar
Hallo Lamerking!
Grüße
bastla
Wahrscheinlich ist die einzigste Möglichkeit, die Infos aus dem AD auszulesen, oder?
Dafür würde ich auch plädieren - Umsetzung per VBScript etwa so:Const strLog = "D:\UserLog.txt"
Set objNetwork = WScript.CreateObject("WScript.Network")
If strComp(objNetwork.UserDomain, objNetwork.ComputerName, vbTextCompare) <> 0 Then 'kein lokaler Account
Set fso = CreateObject("Scripting.FileSystemObject")
Set objUser = GetObject("LDAP://" & CreateObject("ADSystemInfo").UserName)
fso.OpenTextFile(strLog, 8, True).WriteLine objUser.sn & ", " & objUser.givenName
End If
Grüße
bastla
Hallo Lamerking!
Als Test (der genau das selbe Ergebnis - ab dem ersten "CN" - bringen müsste), kannst Du folgende Scriptzeile verwenden:
Grüße
bastla
Leider steht in der ausgegeben Datei lediglich ein Komma drinne ;)
Du bist sicher, dass für den entsprechenden Benutzer im AD Vor- und Zuname eingetragen sind? (Bei meinen Tests in 2 verschiedenen Domänen war das Ergebnis jeweils ok.)Hab mal testweise die Zeile "LDAP:" mit "LDAP:OU=users,DC=unser,DC=domänen,DC=name" ergänzt.
Abgesehen davon, dass es "CN=users" heißen müsste ("OU" nur für selbst erstellte Organisationseinheiten), wäre, da es hier ja um einen bestimmten User geht, mit "LDAP://CN=Vollständiger Benutzername" zu beginnen, also:Set objUser = GetObject("LDAP://CN=Vollständiger Benutzername,CN=users,DC=unser,DC=domänen,DC=name")
WScript.Echo CreateObject("ADSystemInfo").UserName
Grüße
bastla