ufooo

Пользователь

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

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

Код:

@Echo Off
reg.exe query "HKU\S-1-5-19">nul 2>&1
if %errorlevel% equ 1 goto UACPrompt
bcdedit /delete {ntldr} /f
exit /b
:UACPrompt
mshta "vbscript:CreateObject("Shell.Application").ShellExecute("%~fs0", "", "", "runas", 1) & Close()"
exit /b

Отправлено: 13:59, 15-05-2015