to AKA. На небольшой компании реализовал запоминание последнего имяни пользователя зашедшего через терминал... Пользователи счастливы!!! Рекомендую! Сделать просто:
1) На стороне сервера вставляем скрипт (vbs) либо в автозагрузку, либо политикой...
On Error Resume Next
'--------------------------------------------------------------------------------------
Dim fso
Dim WshShell
Dim WshEnv
Dim DirTFTPD
Dim ClientName
Dim UserName
Dim AbuseFile
'--------------------------------------------------------------------------------------
Set fso = CreateObject("Scripting.FileSystemObject")
Set WshShell = Wscript.CreateObject("Wscript.Shell")
Set WshEnv = WshShell.Environment("Process")
'--------------------------------------------------------------------------------------
' папка из которой терминал читает имя последнего пользователя
DirTFTPD = "C:\tftpdroot\USERS\"
'--------------------------------------------------------------------------------------
ClientName = WshEnv("ClientName")
UserName = WshEnv("UserName")
FileTS=DirTFTPD+ClientName
'--------------------------------------------------------------------------------------
Set AbuseFile = fso.CreateTextFile(FileTS, true)
AbuseFile.write UserName
AbuseFile.Close()
'--------------------------------------------------------------------------------------
'MsgBox(ClientName+" | "+UserName)
2) На стороне клиента перед запуском "rdesktop ..." читаем файл с именем терминала и подставляем в -u 'ИмяПользователя'...
Вот собственно и всё... Делов на 10 мин., а пользователи в восторге
to AKA. На небольшой компании реализовал запоминание последнего имяни пользователя зашедшего через терминал... Пользователи счастливы!!! Рекомендую! Сделать просто:
1) На стороне сервера вставляем скрипт (vbs) либо в автозагрузку, либо политикой...
On Error Resume Next
'--------------------------------------------------------------------------------------
Dim fso
Dim WshShell
Dim WshEnv
Dim DirTFTPD
Dim ClientName
Dim UserName
Dim AbuseFile
'--------------------------------------------------------------------------------------
Set fso = CreateObject("Scripting.FileSystemObject")
Set WshShell = Wscript.CreateObject("Wscript.Shell")
Set WshEnv = WshShell.Environment("Process")
'--------------------------------------------------------------------------------------
' папка из которой терминал читает имя последнего пользователя
DirTFTPD = "C:\tftpdroot\USERS\"
'--------------------------------------------------------------------------------------
ClientName = WshEnv("ClientName")
UserName = WshEnv("UserName")
FileTS=DirTFTPD+ClientName
'--------------------------------------------------------------------------------------
Set AbuseFile = fso.CreateTextFile(FileTS, true)
AbuseFile.write UserName
AbuseFile.Close()
'--------------------------------------------------------------------------------------
'MsgBox(ClientName+" | "+UserName)
2) На стороне клиента перед запуском "rdesktop ..." читаем файл с именем терминала и подставляем в -u 'ИмяПользователя'...
Вот собственно и всё... Делов на 10 мин., а пользователи в восторге :)