Отключил удаление файлов - перевел на вызов исключения

This commit is contained in:
Maxmov Valery committed 2018-03-15 10:58:08 +03:00
1 parent f8affaa43c
commit 2edeb060ec
3 files changed
+10 -41

No files matched your search

+2
View File
@@ -2,3 +2,5 @@ bdd-log.xml
*.ospx
/*.orig
/exec.log
+1 -1
View File
@@ -6,7 +6,7 @@
Указанным продуктом пользовались долгое время, он очень хорош, но потребность в развитии и невозможность реализации некоторых сценариев работы в публичной версии сподвигли к реализации нового решения.
### Особенности данного решения:
### Особенности данного решения
- Возможность расширения функциональности под свои нужды без потери совместимости с публичной версией
- Централизованная установка и обновление скриптов без необходимости утяжелять репозиторий проекта
@@ -190,18 +190,19 @@
КонецЕсли;
Для Каждого ФайлДляУдаления Из СписокДляУдаления Цикл
ЕдиныйТекстОшибки = ЕдиныйТекстОшибки + ?(ПустаяСтрока(ЕдиныйТекстОшибки), "", Символы.ПС)
+ "Необходимо удалить файлы " + ФайлДляУдаления.Значение;
КонецЦикла;
Если НЕ ПустаяСтрока(ЕдиныйТекстОшибки) Тогда
ВызватьИсключение ЕдиныйТекстОшибки;
КонецЕсли;
Для Каждого ФайлДляУдаления Из СписокДляУдаления Цикл
УдалитьФайлыРекурсивно(ФайлДляУдаления.Значение, УдаленныеФайлы);
КонецЦикла;
Возврат Истина;
КонецФункции
@@ -250,37 +251,3 @@
Возврат Список;
КонецФункции
Процедура УдалитьФайлыРекурсивно(ИмяФайла, УдаленныеФайлы)
Файл = Новый Файл(ИмяФайла);
Если НЕ Файл.Существует() Тогда
Возврат;
КонецЕсли;
Если Файл.ЭтоКаталог() Тогда
Файлы = НайтиФайлы(Файл.ПолноеИмя, "*");
Для Каждого ПодчиненныйФайл Из Файлы Цикл
УдалитьФайлыРекурсивно(ПодчиненныйФайл.ПолноеИмя, УдаленныеФайлы);
КонецЦикла;
КонецЕсли;
Если Файл.Существует() Тогда
Если НЕ Файл.ЭтоКаталог() Тогда
УдаленныеФайлы.Добавить(Файл.ПолноеИмя);
КонецЕсли;
УдалитьФайлы(Файл.ПолноеИмя);
КонецЕсли;
КонецПроцедуры