Quantcast
Channel: Ru.Board
Viewing all articles
Browse latest Browse all 1053986

Microsoft Office 2019-2021-2024 (2 часть) (4269) / Офисный пакет приложений, обход лицензионных ограничений

$
0
0
Ratiborus:
Хотите легко установить ProPlus 2024 Volume с фирменного диска от M$? Ну что-же, сейчас мы это и сделаем.

[more=1. Скачивайте последний образ диска Office с сервера M$]
http://officecdn.microsoft.com.edgesuite.net/db/492350F6-3A01-4F97-B9C0-C7C6DDF67D60/media/ru-ru/ProPlus2024Retail.img
[/more]

[more=2. А здесь батник-установщик. И всё.]

Код:

@echo off
set "CD=%~dp0"
set "CD=%CD:~0,-1%"
:: Для установки с образа от M$ "ProPlus2024Retail.img". Для работы батника с рядом расположенной папкой Office, закомментируйте эту строку.
set "CD=E:"
set "OPath=%ProgramFiles%\Common Files\microsoft shared"
set "arch=x64"
set "cult=ru-ru"
set "ver=16.0.17928.20148"
set "id=492350f6-3a01-4f97-b9c0-c7c6ddf67d60"
set "productexclusion="
:: Приложения которые устанавливать не нужно
:: set "productexclusion=ProPlus2024Volume.excludedapps.16=excel,access,lync,onenote,outlook,powerpoint"
set "pkeys=XJ2XN-FW8RK-P4HMP-DKDBV-GCVGB,FQQ23-N4YCY-73HQ3-FM9WC-76HF4,B7TN8-FJ8V3-7QYCP-HQPMV-YY89G"
set "inst=i320.cab"
If "%PROCESSOR_ARCHITECTURE%"== "AMD64" set "inst=i640.cab"

::-----------------------------------------------------------------------------------------------------------------
rem Проверка на запуск установки с правами администратора
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
if '%errorlevel%' neq '0' (
echo Requesting Administrative Privileges...
goto UACPrompt
) else ( goto admin )
:UACPrompt
echo set UAC = createObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
set params = %*:"="
echo UAC.ShellExecute "cmd.exe", "/c %~s0 %params%", "", "runas", 1 >> "%temp%\getadmin.vbs"
"%temp%\getadmin.vbs"
del "%temp%\getadmin.vbs"
exit /B
::-----------------------------------------------------------------------------------------------------------------


:admin

IF EXIST "%OPath%" (
sc.exe stop ClickToRunSvc >nul 2>&1
taskkill.exe /t /f /IM OfficeClickToRun.exe >nul 2>&1
taskkill.exe /t /f /IM IntegratedOffice.exe >nul 2>&1
taskkill.exe /t /f /IM OfficeC2RClient.exe >nul 2>&1

rd /Q /S "%OPath%\ClickToRun" >nul 2>&1

)

mkdir "%OPath%" >nul 2>&1
mkdir "%OPath%\ClickToRun" >nul 2>&1

expand "%CD%\Office\Data\%ver%\%inst%" -F:* "%OPath%\ClickToRun" >nul 2>&1

cd /D "%OPath%\ClickToRun" >nul 2>&1
START /min "" "%OPath%\ClickToRun\OfficeClickToRun.exe" platform=%arch% culture=%cult% ^
productstoadd=ProPlus2024Volume.16_ru-ru_x-none^|ProofingTools.16_ru-ru_x-none^|ProjectPro2024Volume.16_ru-ru_x-none^|VisioPro2024Volume.16_ru-ru_x-none ^
%productexclusion% cdnbaseurl.16=http://officecdn.microsoft.com/pr/%id% baseurl.16="%CD%" ^
version.16=%ver% mediatype.16=Local sourcetype.16=Local updatesenabled.16=True autoactivate=1 ^
acceptalleulas.16=True displaylevel=True bitnessmigration=False deliverymechanism=%id% pidkeys=%pkeys%



[/more]

В 13 строке можно указать приложения, которые не хотите устанавливать.

Viewing all articles
Browse latest Browse all 1053986

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>