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. А здесь батник-установщик. И всё.]
Код:
[/more]
В 13 строке можно указать приложения, которые не хотите устанавливать.
Хотите легко установить 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 строке можно указать приложения, которые не хотите устанавливать.