admin-ps/zagruzka-dannyh-iz-excel
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

v3.0.0.104

Browse Source
This commit is contained in:
Профи-Софт
2026-07-21 17:28:23 +00:00
parent 0082bb833f
commit 49a4b89f00
2 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Configuration.xml
+1 -1
View File
@@ -56,7 +56,7 @@
<ScriptVariant>Russian</ScriptVariant> <ScriptVariant>Russian</ScriptVariant>
<DefaultRoles/> <DefaultRoles/>
<Vendor>ООО "Профи-Софт", код партнера 42575-13, г.Байконур.</Vendor> <Vendor>ООО "Профи-Софт", код партнера 42575-13, г.Байконур.</Vendor>
<Version>3.0.0.103</Version> <Version>3.0.0.104</Version>
<Caption/> <Caption/>
<ShortCaption/> <ShortCaption/>
<DefaultLanguage>Language.Русский</DefaultLanguage> <DefaultLanguage>Language.Русский</DefaultLanguage>
DataProcessors/ЗагрузкаДанныхИзExcel/Forms/Форма/Ext/Form/Module.bsl
+7 -2
View File
@@ -185,9 +185,14 @@
Функция ЗагрузитьФайлНаСервере(ПутьКФайлу) Экспорт Функция ЗагрузитьФайлНаСервере(ПутьКФайлу) Экспорт
ФайлНаДиске = Новый Файл(ПутьКФайлу); ФайлНаДиске = Новый Файл(ПутьКФайлу);
Если Не ФайлНаДиске.Существует() Тогда Сообщить("Файл не найден: " + ПутьКФайлу); Возврат Неопределено; КонецЕсли; Если Не ФайлНаДиске.Существует() Тогда Сообщить("Файл не найден: " + ПутьКФайлу); Возврат Неопределено; КонецЕсли;
Расширение = НРег(ФайлНаДиске.Расширение); // Копируем файл во временную папку для чтения сервером
ВремКаталог = КаталогВременныхФайлов();
ИмяФайла = "temp_load" + Формат(ТекущаяДатаСеанса(), "ДФ=yyyyMMddHHmmss") + ФайлНаДиске.Расширение;
ПутьВрем = ВремКаталог + ИмяФайла;
КопироватьФайл(ПутьКФайлу, ПутьВрем);
ТаблДок = Новый ТабличныйДокумент; ТаблДок = Новый ТабличныйДокумент;
ТаблДок.Прочитать(ПутьКФайлу); ТаблДок.Прочитать(ПутьВрем);
УдалитьФайлы(ПутьВрем);
Возврат ПоместитьВоВременноеХранилище(ТаблДок); Возврат ПоместитьВоВременноеХранилище(ТаблДок);
КонецФункции КонецФункции