Skip to content

Commit 5626a2a

Browse files
committed
Исправлена ошибка проверки наличия файла 1cv8.exe
1 parent 24ab09d commit 5626a2a

File tree

1 file changed

+21
-3
lines changed

1 file changed

+21
-3
lines changed

src/v8runner.os

Lines changed: 21 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -490,13 +490,29 @@
490490
КонецЕсли;
491491

492492
МассивКаталогов1С = Новый Массив;
493+
494+
МассивФайлов = Новый Массив;
493495
Для Каждого ВозможныйПуть Из КаталогиУстановкиПлатформы Цикл
494496

495497
Лог.Отладка("Выполняю попытку поиска версии в каталоге " + ВозможныйПуть);
496498

497-
МассивФайлов = НайтиФайлы(ВозможныйПуть, ВерсияПлатформы+"*");
499+
РезультатПоиска = НайтиФайлы(ВозможныйПуть, ВерсияПлатформы+"*");
500+
//Если в данном каталоге установки платформы нет каталого с искомой версией не делать ничего, перейти к следующему возможному пути
501+
//Если есть каталоги с искомой версией тогда добавить их в общий массив результатов поиска
502+
Если НЕ РезультатПоиска.Количество() Тогда
503+
Продолжить;
504+
Иначе
505+
506+
Для Каждого Каталог ИЗ РезультатПоиска Цикл
507+
МассивФайлов.Добавить(Каталог);
508+
КонецЦикла;
509+
//Зафиксировать возможный путь, как подтвержденный путь где есть версии по заданной маске.
510+
ПодтвержденныйПуть = ВозможныйПуть;
511+
КонецЕсли;
512+
498513
Если МассивФайлов.Количество() = 0 Тогда
499514
Лог.Отладка("Не найдено ни одного каталога с версией.");
515+
500516
Продолжить;
501517
КонецЕсли;
502518
Если МассивКаталогов1С = Неопределено Тогда
@@ -522,12 +538,14 @@
522538
Если ИменаВерсий.Количество() > 0 Тогда
523539
МаксВерсия = ИменаВерсий[0];
524540
Для Сч = 1 По ИменаВерсий.Количество()-1 Цикл
525-
Если МаксВерсия < ИменаВерсий[Сч] Тогда
541+
//Прежде чем проверять версию на максимум проверить ее на наличие исполняемого файла толстого клиента 1cv8.exe
542+
НужныйПуть = Новый Файл(ОбъединитьПути(ПодтвержденныйПуть, ИменаВерсий[Сч], "bin\1cv8.exe"));
543+
Если НужныйПуть.Существует() И МаксВерсия < ИменаВерсий[Сч] Тогда
526544
МаксВерсия = ИменаВерсий[Сч];
527545
КонецЕсли;
528546
КонецЦикла;
529547

530-
НужныйПуть = Новый Файл(ОбъединитьПути(ВозможныйПуть, МаксВерсия, "bin\1cv8.exe"));
548+
НужныйПуть = Новый Файл(ОбъединитьПути(ПодтвержденныйПуть, МаксВерсия, "bin\1cv8.exe"));
531549
Лог.Отладка("Версия найдена: " + НужныйПуть.ПолноеИмя);
532550
КонецЕсли;
533551

0 commit comments

Comments
 (0)