DesktopBackgroundLocker (блокировка смены фона рабочего стола)

Moxito

Пользователь
Сообщения
423
Реакции
48
Баллы
43
DesktopBackgroundLocker (блокировка смены фона рабочего стола)
Автор: Moxito
Специально создано для учебных заведений.
Программа блокирует смену фона рабочего стола.
Автор не несёт ответственность.

CMD/BATCH:
@echo off
chcp 866> nul 2>&1
color 7
set "ver=1.0"
title DesktopBackgroundLocker %ver%
echo DesktopBackgroundLocker %ver%
echo Автор: Moxito
echo Специально создано для учебных заведений.
echo.
echo Программа блокирует смену фона рабочего стола.
echo Автор не несёт ответственность.
echo.
echo Начало операций через три секунды...
ping -n 4 localhost> nul 2>&1
echo y | reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies" /v "ActiveDesktop"> nul 2>&1
if %errorlevel% EQU 0 (
echo [1] Операция 1 успешно выполнена.
) else (
echo [1] Операцию 1 не удалось выполнить.
)
echo y | reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\ActiveDesktop" /v "NoChangingWallPaper" /t "REG_DWORD" /d "1"> nul 2>&1
if %errorlevel% EQU 0 (
echo [2] Операция 2 успешно выполнена.
) else (
echo [2] Операцию 2 не удалось выполнить.
)
echo y | reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies" /v "System"> nul 2>&1
if %errorlevel% EQU 0 (
echo [3] Операция 3 успешно выполнена.
) else (
echo [3] Операцию 3 не удалось выполнить.
)
echo y | reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System" /v "Wallpaper" /t "REG_DWORD" /d "%WINDIR%\Wallpaper.png"> nul 2>&1
if %errorlevel% EQU 0 (
echo [4] Операция 4 успешно выполнена.
) else (
echo [4] Операцию 4 не удалось выполнить.
)
echo y | reg add "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System" /v "WallpaperStyle" /t "REG_DWORD" /d "1"> nul 2>&1
if %errorlevel% EQU 0 (
echo [5] Операция 5 успешно выполнена.
) else (
echo [5] Операцию 5 не удалось выполнить.
)
echo.
echo Смена фона рабочего стола заблокирована.
echo.
echo Нажмите любую клавишу, чтобы выйти из приложения.
pause>Nul
exit /b 0
 

Вложения

Сверху Снизу