1c/OpenIntegrations
1
0
Fork 0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-13 20:05:19 +02:00
Code Issues Releases Activity

Update opi_translate.os

Browse Source
This commit is contained in:
Anton
2024-06-01 17:09:42 +03:00
parent 326123f11b
commit a9ba1f4924
1 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
.github/workflows/os/opi_translate.os vendored
View File

@@ -183,13 +183,11 @@
Процедура СкопироватьФайлы(Знач КаталогИсточник, Знач КаталогПриемник)
Если Прав(КаталогИсточник, 1) <> "\" Тогда
КаталогИсточник = КаталогИсточник + "\";
КонецЕсли;
Если Прав(КаталогПриемник, 1) <> "\" Тогда
КаталогПриемник = КаталогПриемник + "\";
КонецЕсли;
Сообщить("Каталог источник: " + КаталогИсточник);
Сообщить("Каталог приемника: " + КаталогПриемник);
Сообщить("Создание каталога " + КаталогПриемник);
СоздатьКаталог(КаталогПриемник);
МассивФайлов = НайтиФайлы(КаталогИсточник, "*.*", Истина);
@@ -204,8 +202,10 @@
Если Файл.ЭтоКаталог() Тогда
СоздатьКаталог(ПолноеИмяПриемник);
Сообщить("Создание каталога " + ПолноеИмяПриемник);
Иначе
КопироватьФайл(ПолноеИмяИсточник, ПолноеИмяПриемник);
Сообщить("Копирование файла" + ПолноеИмяИсточник + " в " + ПолноеИмяПриемник);
КонецЕсли;
КонецЦикла;
@@ -227,4 +227,4 @@
КонецПроцедуры
ПриСозданииОбъекта();
//ПриСозданииОбъекта();