Как узнать установленные версии Net Java Office без хлопот.

Albert_researcher

Модератор
Команда форума
Бывает ситуация, когда установка программы не проходит или нет вывода результата в Excel. Проблема может быть в отсутствии нужной версии java, отсуствие нужных обновлений в Office или что бывает часто, забывают установить Net Framework и программа не устанавливается. Предлагаю создать небольшой батник, который бы позволил оценить чего не хватает. Может возникнуть ситуация, когда в командной строке или на каких-то компьютерах работает, а где-то данные не выдаются (Ошибка: Не удается найти указанный раздел или параметр в реестре). Проблема в том, что на 64-битных компьютерах пытаются запустить батник из 32-разрядного приложения. Решение простое: используйте для запуска батника "Проводник", а не "Total Commander".

@echo off
chcp 866
echo Net Framework
@dir %WINDIR%\Microsoft.Net\Framework\v* /O:-N /B
echo ;
java -version
echo ;
IF %PROCESSOR_ARCHITECTURE% == x86 (IF NOT DEFINED PROCESSOR_ARCHITEW6432 goto bit32)
goto bit64
:bit32
rem OUTLOOK CHECK
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\17.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2019
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\16.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=365
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\15.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2013
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\14.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2010
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\12.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2007
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\11.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2003
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\10.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=XP
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\9.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2000
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\8.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=98
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\7.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=97
goto :MI
)
set OUTLOOK=NOT Installed !!
:MI
echo OUTLOOK %OUTLOOK%
rem OFFICE VERSION CHECK
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\17.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2019
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\16.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=Office 365
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\15.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2013
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\14.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2010
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\12.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2007
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\11.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2003
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\10.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=XP
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\8.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=98
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\7.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=97
goto :MI2
)
:MI2
echo Microsoft Office Excel %Excel%
goto :ext
:bit64
rem OUTLOOK CHECK
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\17.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2019
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\16.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=365
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2013
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\14.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2010
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\12.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2007
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\11.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2003
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\10.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=XP
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\9.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=2000
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\8.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=98
goto :MI
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\7.0\Outlook\InstallRoot 2>nul
if %errorlevel%==0 (
set OUTLOOK=97
goto :MI
)
set OUTLOOK=NOT Installed !!
:MI
echo OUTLOOK %OUTLOOK%
rem OFFICE VERSION CHECK
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\17.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2019
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\16.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=Office 365
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2013
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\14.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2010
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\12.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2007
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\11.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=2003
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\10.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=XP
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\8.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=98
goto :MI2
)
reg query HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\7.0\Excel\InstallRoot 2>nul
if %errorlevel%==0 (
set Excel=97
goto :MI2
)
:MI2
echo Microsoft Office Excel %Excel%
:ext
reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Installer\UserData\S-1-5-18\Components\D94C8360B8BB1DC41B1950E1F8237563\00002109210000000000000000F01FEC" /v "ComponentVersion"
reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Installer\UserData\S-1-5-18\Components\D94C8360B8BB1DC41B1950E0F8237563\00002109210000000000000000F01FEC" /v "ComponentVersion"
Echo All right, if Microsoft Office Excel 2007 (12.0.6787.5000) SP3 MSO (12.0.6785.5000)
winver

 
Последнее редактирование:
Верх