Hi,
Operator hatte mir mal, in einem anderen Thread, ein kleines VB-Script zukommen lassen. Ich hab es ein wenig angepaßt, vielleicht hilft dir das ja.
Wenn du es als Logon-Script verwendest, dann werden der Username und der Clientname, von dem die Anmeldung kommt, in eine Datei geschrieben.
' Fehlermeldungen unterdrücken
On Error Resume Next
Dim clientName, userName, computername
Set objShell = CreateObject("Wscript.Shell")
'Name des Clients, von dem die Anmeldung kommt
clientName = objShell.ExpandEnvironmentStrings("%CLIENTNAME%")
'Login des Users
userName = objShell.ExpandEnvironmentStrings("%USERNAME%")
'Name des Terminalservers, auf dem die Anmeldung stattfand
computername = objShell.ExpandEnvironmentStrings("%COMPUTERNAME%")
Set objFile = CreateObject("Scripting.FileSystemObject")
Set strFileWrite = objFile.OpenTextFile("\\asp-pdc\perflog$\logfile_" & computername &".txt", 8, False)
StrFileWrite.WriteLine now & Chr(9) & computername & Chr(9) & clientName & Chr(9) & userName & Chr(9) & "logon"
strFileWrite.Close
|
Grüße
Timo