Поиск всех пользователей в домене AD
Иногда возникает ситуация, когда Вам нужно найти на каком компьютере какой пользователь осуществил вход (для AD), в этой ситуации есть одно несложное решение простой bat файл и утилитка.
Создадим папку в ней расположим следующие файлы: NetUsers.exe.tar
и bat файл со следующим содержанием:
@echo off
set MyDomain=здесь имя Вашего домена
set OUTPUT=result.txt
if «%STDOUT_REDIRECTED%» == «» (
set STDOUT_REDIRECTED=yes
cmd.exe /c %0 %* >%OUTPUT%
exit /b %ERRORLEVEL%
)
net view /DOMAIN:%MyDomain% > comps.txt
rem Переходим на диск с *.bat
%~d0
rem Переходим в директорию с *.bat
cd %~p0
cls
FOR /F «eol=К skip=4 tokens=1 » %%i in (comps.txt) do (
IF /I %%i NEQ %COMPUTERNAME% NetUsers.exe %%i
)
exit
После запуска Вы получите текстовый файл в этой папке с именами пользователей и на каких компьютерах они осуществили вход.
Так же можно по имени компьютера определить какой пользователь осуществил вход на него. Следующий vbs скрипт ответит Вам на этот вопрос:
Computer = InputBox(«Имя компьютера»)
Set objWMIService = GetObject(«winmgmts:» _
& «{impersonationLevel=impersonate}!\\» & Computer & «\root\cimv2»)
Set colComputer = objWMIService.ExecQuery _
(«Select * from Win32_ComputerSystem»)
For Each objComputer in colComputer
Wscript.Echo «Logged-on user: » & objComputer.UserName
Next
Оффтоп: если Вы хотите поменять окна в своей квартире, то не стоит бросаться на первое попавшееся объявление и покупать по низкой цене, в этом деле главное качество и правильный выбор — окна ПВХ будут стоять на страже много лет и пускай они будут качественные.