PDA

Показать полную графическую версию : как определить ip у пользователя , ели знаешь только его имя


djoniAg
22-05-2005, 13:47
Как определить ip у пользователя , ели знаешь только его имя ?
Такая вот задачка, есть сеть около 150 машин , на серверах 2000 server, AD, всё админится через radmin , соответсвено, я еще недолго работаю в этой компании и всех по именам машин не знаю. Вопрос как мне определить кто , какой пользователь, и где залогинился? те я так понимаю можно на каждой машинке настроить например в HKLUser run небольшоя скриптик который бы отсылал мне ip и логин при входе , у меня это какимто образом бы обрабатывалось в удобном виде и вот тебе табличка с именим пользователя , ip, именем компьютера и времни входа
Но наверно не я один об этом думал , и может кто нибудь знает подходяший совтик ?
заранее благодарен

fossil
22-05-2005, 19:15
djoniAg
Напиши программу. В сети таких статей полно и под любой язык.

RaZZoRRo
24-05-2005, 10:16
можно использовать и стороннее програмное обеспечение : BGinfo - например , данная програмка выводит на экране монитора пользователя : его IP адрес , имя учетной записи под которой работает пользователь , "имя машины" ..... вариантов настройки достаточно много...

gf100
24-05-2005, 12:52
Напрашивается: ping <имя машины>
Не подходит для определения учетной записи.

fossil
24-05-2005, 19:03
gf100 И что? Эта команда определит имя машины? :)

gf100
25-05-2005, 09:54
fossil Нет. Только выдаст ip адрес по имени машины и определит время прохождения (скорость) пакетов.

rivera
25-05-2005, 15:37
nbtstat /?
там весь список комманд!
хорошая вещь

djoniAg
30-05-2005, 19:50
вот ответили на соседнем форуме - может кому пригодится:
Const ForAppending = 8
Set filesys = CreateObject("Scripting.FileSystemObject")
Set WshNetwork = CreateObject("WScript.Network")
Set filetxt = filesys.OpenTextFile("\\server\share\logon.html", ForAppending, TRUE)
strComputer = WshNetwork.ComputerName
strUser = WshNetwork.UserName
strDate = FormatDateTime(Date(), 1)
strTime = FormatDateTime(Time(), 4)
filetxt.WriteLine("<tr><td>" & strUser & "<td>" & strComputer & "<td>"& strDate & " " & strTime & "<tr>")
filetxt.Close




© OSzone.net 2001-2012