Включение или отключение всех пользователей, кроме указанных в значении задаваемой переменной

::&& 20151222105223 Tue
::Небольшой файлик для отключения или включения всех пользователей, кроме указанных в переменной userEx 
@echo off 
color 0A
 
::Режим работы с переменными
SetLocal EnableExtensions EnableDelayedExpansion
 
:User.OnOff
 
set userEx="root roman admin usr guest" 
 
set yesno=%1
 
if /i "%yesno:~0,1%"=="n" (
    set uoOn1=no
) else (
    if /i "%yesno:~0,1%"=="f" (
        set uoOn1=no
    ) else (
        set uoOn1=yes
    )
)
 
for /f "tokens=1,2,3,4,5,6,7,8,9 skip=4" %%i in ('net user^|findstr /V "The command completed successfully."') do ( 
    if /i not #%%i#==## call :User.OneDisable %%i 
    if /i not #%%j#==## call :User.OneDisable %%j  
    if /i not #%%k#==## call :User.OneDisable %%k  
    if /i not #%%l#==## call :User.OneDisable %%l  
    if /i not #%%m#==## call :User.OneDisable %%m  
    if /i not #%%n#==## call :User.OneDisable %%n  
    if /i not #%%o#==## call :User.OneDisable %%o  
    if /i not #%%p#==## call :User.OneDisable %%p  
    if /i not #%%q#==## call :User.OneDisable %%q  
    ) 
 
 
exit
 
::
::---------------------------------------------------------------------------------------
::Отключение или включение одного пользователя, который не входит в список
::%1 - имя одного пользователя
::%2 - список
::%3 - уes, y, o  - включить иначе - выключить
::            net user %uoUser% /active:%uoOn%
::        echo %ERRORLEVEL%
::        pause >nul
::
::        exit /b
::
::
::    echo %ERRORLEVEL%    
::    echo %uoUser%
::    echo %uoListex%
::    echo %uoOn%
::
 
:User.OneDisable
    set uoUser=%1
    ::Если имя пользователя указано
    if /i NOT .%uoUser%.==.. (
        echo %userEx% | findstr /I %uoUser%  >nul
        IF ERRORLEVEL 1 (
            echo %uoUser% /active:%uoOn1%
            net user %uoUser% /active:%uoOn1%
        )        
    )
exit /b
::---------------------------------------------------------------------------------------