KLASS
Moderator | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
@echo off
::Запрос UAC на повышение прав (при запуске из планировщика с наивысшими правами не выводится)
reg query "HKU\S-1-5-19\Environment" >nul 2>&1 & cls
if "%Errorlevel%" NEQ "0" ( cmd /u /c echo. CreateObject^("Shell.Application"^).ShellExecute "%~f0", "", "", "runas", 1 > "%Temp%\GetAdmin.vbs"
"%Temp%\GetAdmin.vbs" & del "%Temp%\GetAdmin.vbs" & cls & exit )
::Скрыть окно комстроки после запуска батника
%1@mshta vbscript:Execute("CreateObject(""Wscript.Shell"").Run """"""%~f0"""" :"",0:Close()")& exit/b
setlocal enableextensions
if /i "%PROCESSOR_ARCHITEW6432%%PROCESSOR_ARCHITECTURE%"=="x86" (
set "sys=%SystemRoot%\System32"
set "arch=x86"
) else if /i "%PROCESSOR_ARCHITEW6432%%PROCESSOR_ARCHITECTURE%"=="AMD64x86" (
set "sys=%SystemRoot%\SysNative"
set "arch=x64"
) else if /i "%PROCESSOR_ARCHITEW6432%%PROCESSOR_ARCHITECTURE%"=="AMD64" (
set "sys=%SystemRoot%\System32"
set "arch=x64"
)
echo Start ProcessHacker for %arch%
%sys%\taskkill.exe /im ProcessHacker.exe > nul 2> nul
cd /d "%~dp0%arch%"
start "" /wait "%~dp0%arch%\ProcessHacker.exe" -installkph
%sys%\sc.exe stop KProcessHacker3 > nul
%sys%\reg.exe add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\KProcessHacker3\Parameters" /v "SecurityLevel" /t REG_DWORD /d 0 /f > nul
%sys%\sc.exe start KProcessHacker3 > nul
start "" /wait "%~dp0%arch%\ProcessHacker.exe"
start "" /wait "%~dp0%arch%\ProcessHacker.exe" -uninstallkph
|
