Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - [решено] Удаления УЗ локальных админов

Ответить
Настройки темы
CMD/BAT - [решено] Удаления УЗ локальных админов

Новый участник


Сообщения: 2
Благодарности: 0

Профиль | Сайт | Отправить PM | Цитировать


Написал скрипт, и хотел с Вами поделиться, может кому пригодиться в работе!
Код: Выделить весь код
@Echo OFF
chcp 866 >nul
rem "Определяем УЗ которые удалять не надо" 
Set DADM="HOMECREDIT\Domain Admins"
Set SADM="HOMECREDIT\SmallAdmins"
rem "Указываем SID" 
Set AdmGroupSID=S-1-5-32-544
Set LocalAdmSID=S-1-5-%%-500
rem "Ищем встроеную УЗ Администратора" 
For /F "UseBackQ Tokens=1* Delims==" %%I In (`WMIC UserAccount Where "LocalAccount = True And SID Like '%LocalAdmSID%'" Get Name /Value ^| Find "="`) Do Set LocalAdm="%%J"
rem "Ищем группу Администраторы" 
For /F "UseBackQ Tokens=1* Delims==" %%I In (`WMIC Group Where "LocalAccount = True And SID Like '%AdmGroupSID%'" Get Name /Value ^| Find "="`) Do Set AdmGroup="%%J"
rem "Получаем список УЗ и работем с ним"
net localgroup %AdmGroup% > temp.txt
for /f "skip=6 Tokens=*" %%a in (temp.txt) do call :convert %%a
:convert
chcp 1251 >nul
echo %*>>admin.txt
set AdmAcc="%*"
chcp 866 >nul
del temp.txt
:CHECK
IF %AdmAcc%==%DADM% set AdmAcc==%SADM%
IF %AdmAcc%==%SADM% set AdmAcc==%LocalAdm%
IF NOT %AdmAcc%==%LocalAdm% (net localgroup %AdmGroup% %AdmAcc% /Delete)
IF NOT %ERRORLEVEL%==0 (EXIT)

Отправлено: 00:18, 05-03-2011

 


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - [решено] Удаления УЗ локальных админов

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Доступ - права доступа для 2-х админов на компе vladimirn Microsoft Windows 2000/XP 9 06-04-2010 09:59
Прочее - отслеживать создание локальных админов magwolf Сетевые технологии 3 04-01-2009 16:24
Характерные особенности админов Ment69 Флейм 45 18-11-2008 06:30
Вопрос по доступу админов на сервера Win2k3 Stephen Microsoft Windows NT/2000/2003 8 27-07-2007 04:52
Вниманию всех Админов! Sadok Сетевые технологии 1 29-08-2003 07:10




 
Переход