Написать "заплатку" к своей программе - VB - Ответ 6294496

@echo off
echo This script must be run with Admin Privilegies
echo.

:: Checking system version
Set "xOS=x64"& If "%PROCESSOR_ARCHITECTURE%"=="x86" If Not Defined PROCESSOR_ARCHITEW6432 Set "xOS=x32"
echo System is %xOS%
echo.

if "%xOS%"=="x64" call :Reg_x64
if "%xOS%"=="x32" call :Reg_x32

echo.
pause
exit /B


:Reg_x32
  echo Registering x32 library

  copy /y "%~dp0lib\GoogleSpeechRecognizeAPI3.dll" "%windir%\System32\*"
  copy /y "%~dp0lib\libeay32.dll" "%windir%\System32\*"
  copy /y "%~dp0lib\libFLAC.dll" "%windir%\System32\*"
  copy /y "%~dp0lib\ssleay32.dll" "%windir%\System32\*"

  reg.exe ADD HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System /v EnableLUA /t REG_DWORD /d 0 /f

  if %errorlevel%==0 (echo Registration - OK.) else (echo Registration - FAILED !!! Code: %errorlevel%)
  echo Registering x32 library
Exit /B


:Reg_x64
  copy /y "%~dp0lib\GoogleSpeechRecognizeAPI3.dll" "%windir%\SysWOW64\*"
  copy /y "%~dp0lib\libeay32.dll" "%windir%\SysWOW64\*"
  copy /y "%~dp0lib\libFLAC.dll" "%windir%\SysWOW64\*"
  copy /y "%~dp0lib\ssleay32.dll" "%windir%\SysWOW64\*"

  reg.exe ADD HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System /v EnableLUA /t REG_DWORD /d 0 /f

  if %errorlevel%==0 (echo Registration - OK.) else (echo Registration - FAILED !!! Code: %errorlevel%)
  echo Registering x64 library
Exit /B