Заметки лентяя
На текущем этапе искусственный интеллект может подражать человеку, но он все равно отличим от него. У него нет так называемой человечности, он не может любить.
А если создать робота ребенка для любви, сможет ли он любить и заменить настоящего ребенка?
А если он может любить, то вправе ли он требовать любви от других?
Artificial Intelligence, 2001
Для корректности бэкапа требуется выгнать всех пользователей из системы, году еще в 17ом написал скрипт, сегодня немного подпилил. В этом скрипте стоит отметить как заметку - использование "функции". Скрипт проверен и на Windows server 2008 и на Windows server 2019. Для работы требует повышения прав, поэтому в лучше запихать в планировщик задач.
@echo off
:://Скрипт логофа пользователей всех кроме заданного или текущего
::// logoff.bat name_exclude path_log_file
cd %~dp0
set tmp=tmp.txt
set nprg=%~nx0
set pprg=%~dp0
set ver=0.2
set logout=%systemroot%\System32\logoff.exe
set sys32=%systemroot%\system32\
if "%~1" == "help" (
echo -------------------------------------------------
echo.
echo Batch-script '%nprg% ver %ver%'
echo.
echo -------------------------------------------------
echo Use %nprg% name_user_exclude path_log_file
echo.
echo Example:
echo %nprg% admin C:\logFile.log
echo.
echo If run without param, exluded is user runed script, without log
echo.
echo If run
echo %nprg% "" path_log_file
echo exluded is user runed script, with your logFile
exit /b 0
)
echo %date% Batch-script '%nprg% ver %ver%' is on
echo %date% Use %nprg% help
:://Если параметр не передан, то юзенэйм равно текущий юзер
if "%~1" == "" ( set usern=%username%) else ( set usern=%~1 )
if "%~2" == "" ( Call :Log "Log file not specifed!" ) else ( set log_file=%~2 )
Call :Log "-------------------------------------------------"
Call :Log "Exclude %usern%"
echo.
cd %pprg%
Setlocal EnableDelayedExpansion
%sys32%\query.exe user | %sys32%\findstr.exe /v /i %usern%> %tmp%
::// Вариации: токен 1 или 2 - это имя пользователя; токен 2 или 3 - ID
for /f "skip=1 tokens=1-3" %%a in ( 'cmd /c type %tmp%') DO (
echo.
echo -------------------------------------------------
echo.
Call :FindToken "%%c"
if !errorlevel!==0 (
set "user=%%a"
rem Удаляем ">" из имени текущего пользователя, если не удалить, то функция лога не отработает
set "user=!!user:>=!!"
set "ID=%%c"
) else (
set "user=%%a"
set "ID=%%b"
)
Call :Log "Found user=!user! ID=!ID!"
if "!usern!" neq "!user!" (
start /WAIT !logout! !ID!
if !errorlevel! equ 0 (
set "stateLogOff=succesfully"
) else (
set "stateLogOff=FAILED"
)
Call :Log " Session user '!user!' ended !stateLogOff!"
)
)
Endlocal
echo.
Call :Log "-------------------------------------------------"
del /Q %tmp%
Exit
:://Возвращает 1, если в токене № 3 есть нечисловые символы - "^" заворачивает условие в другую сторону О_О
:FindToken
echo.%~1|>nul %sys32%\findstr.exe /R "[^0-9]" && exit /b 1
echo.%~1|>nul %sys32%\findstr.exe /R "[^0-9]" || exit /b 0
:://Функция логирования
:Log
set ech=%~1
echo %time% %ech%
if defined log_file ( echo %date% %time% %ech% >>%log_file% )
exit /b 0
Посмотрел фильм «Лептирица» (1973 година, сербский, с русской озвучкой) - фильм ужасов из Сербии (Югославии).
Фильм длится около часа, к сожалению качество аудиодорожки не на высоте, поэтому все слова разобрать нельзя. Сюжет встает на свои места, если просмотреть до конца. Для понимания языка надо посмотреть данную киноленту несколько раз.
 |  |   |
 |
| дорожка, которая ведет не туда, куда мы думаем, она выводит к дороге, по ней можно не ходить. |
