Импорт файлов типов XLS, DBF, и TXT в табличное поле (Простой читальщик xls файлов)

31.01.08

Интеграция - Загрузка и выгрузка в Excel

Отчёт предназначен для чтения файлов *.xls, *.dbf и *тхт с разделителями в табличное поле данного отчёта для последующей обработки.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Бесплатно
ЧтениеЭкселя
.1200051633 9,09Kb
2203
2203 Скачать бесплатно
ТекстПроцедур
.1200052202 10,14Kb
1338
1338 Скачать бесплатно
ЧтениеЭкселя_01
.1200290800 9,66Kb
1322
1322 Скачать бесплатно
Чтение_XLS_TXT
.1200322299 14,20Kb
1556
1556 Скачать бесплатно
Импорт_XLS_DBF_TXT_файлов
.1201589470 21,05Kb
2218
2218 Скачать бесплатно

В последнем отчёте (доработанном) реализованы следующие действия:

  1. Открытие, анализ и чтение файлов;
  2. Построчный вывод сначала в таблицу значений, в которой можно производить анализ по каждому значению, а затем в табличное поле формы;
  3. Сортировка табличного поля по колонкам;
  4. Удаление строк до или после текущей строки;
  5. Создание колонки с нумерацией строк, возможностью перенумеровать строки и удалению данной колонки;
  6. Именование колонок по текущей строке;
  7. Именование колонки по текущей ячейке;
  8. Произвольное именование колонки;
  9. Удаление колонок;
  10. Создание колонок.

По сравнению с предыдущими версиями в данном отчёте оптимизирован код, открытие и чтение файла с количеством 5…10 000 строк происходит за 1…5 секунд. Анализ документа производится по строкам с доступом к каждому значению, что позволяет анализировать документ ещё на стадии непосредственного чтения документа и сократить общее время на обработку документа.

Основное назначение данного продукта это вывести в таблицу значений и в табличное поле формы данных импортируемого файла для последующего анализа и использования по необходимости, создание документов, заполнение справочников и т.д..

Дополнительные функции позволяют вывести или сохранить документ в удобном виде, хотя аналогичные функции можно произвести и в широко распространённых программах электронных таблиц.

Буду благодарен всем, кто поможет улучшить данный продукт, даст совет, выразит критику и выскажет своё мнение.

Выражаю благодарность всем, кто рецензировал предыдущие версии данного отчёта, выражал своё мнение, давал советы...

См. также

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен и синхронизацию в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

26280 23652 руб.

12.06.2017    142697    812    297    

424

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена | Можно выполнить переход с УПП на БП 3 или запускать выгрузку данных за выбранный период времени | Переносятся документы, начальные остатки и вся справочная информация | Есть фильтр по организации и множество других параметров выгрузки | Поддерживается несколько сценариев работы: как первичный полный перенос, так и перенос только новых документов | Перенос данных возможен в "1С: Бухгалтерия 3.0" версии ПРОФ, КОРП или базовую | Переход с "1С: УПП1.3" / "1С:КА 1.1" на "1С:БП3.0" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

48278 43450 руб.

25.02.2015    171672    308    258    

384

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 Россия Управленческий учет Платные (руб)

Перенос данных из 1С:Управление торговлей 10.3 в 1С:Управление торговлей 11.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УТ 10.3 (10.3.88.x) и УТ 11.5 (11.5.20.x), также подходят для релиза 11.5 (11.5.19.x).

35000 31500 руб.

23.07.2020    52587    230    72    

188

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.237.x) и БП 3.0 (3.0.166.x). Правила подходят для версии ПРОФ и КОРП.

35000 31500 руб.

15.12.2021    24557    173    51    

131

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из ERP в ЗУП 3 | из КА 2 в ЗУП | Готовые правила конвертации данных (КД 2) для переноса остатков, документов с движениями и справочной информации 3 | Есть перенос начальной задолженности по зарплате и начальной штатной расстановки на выбранную дату | Обороты за прошлые годы (данные для расчета среднего) переносятся свернуто в документ "Перенос данных" | Есть фильтр по организациям | Документы за текущий период переносятся сразу с движениями, поэтому не потребуется делать перерасчеты | Перенос можно проверить перед покупкой, обращайтесь!

53111 47800 руб.

03.12.2020    37029    98    66    

93

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Платформа 1C v8.2 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Управление производственным предприятием Россия Платные (руб)

Регулярный обмен, выгрузка, перенос из КА 1.1, УПП 1.3, УТ 10.3 для обмена с любыми конфигурациями, поддерживающими обмен в формате EnterpriseData (КД3) - БП 3.0, ERP, КА 2, УТ 11, Розница 2, УНФ 1.6 и другими. Правила для старых и доработанных конфигураций не требуют синхронного обновления и совместимы с новыми и будущими конфигурациями. Обмен по расписанию, через папку, FTP, почту.

15300 руб.

18.02.2016    187495    597    521    

530

SALE! 10%

Перенос данных 1C Взаиморасчеты Оптовая торговля Логистика, склад и ТМЦ Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Управленческий учет Платные (руб)

Можно проверить до покупки, оставьте заявку! Воспользовались более 268 компаний! Перенос данных из УТ 10.3 в УТ 11 | из УТ 10.3 в КА 2 | из УТ 10.3 в ERP. Предлагаем качественное и проверенное временем решение для перехода с УТ 10.3. Можно перенести начальные остатки, нормативно-справочную информацию и все возможные документы. При выгрузке можно установить отбор по периоду, организациям и складам. При выходе новых релизов конфигураций 1C оперативно выпускаем обновление переноса данных.

55778 50200 руб.

24.04.2015    195551    155    244    

284

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Перенос данных из ERP в БП 3 | из КА 2 в БП 3 | из УТ 11 в БП 3 | из ЕРП в БП 3 | Сэкономьте время - используйте готовое решение для перехода! | Перенос разработан в формате КД 2 (правила конвертации данных) | Переносятся все возможные виды документов, начальных остатков и нормативно-справочная информация| Можно опционально выгружать каждую пару "номенклатура+характеристика" как отдельную номенклатуру | Есть выгрузка настроек счетов учета и зарплатных данных из ERP / КА 2 | Можно проверить на вашем сервере перед покупкой

55778 50200 руб.

15.04.2019    72550    184    151    

125
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. vasilykushnir 63 11.01.08 14:52 Сейчас в теме
C почином, Санек. Поддержим коллегу!
2. Abadonna 3969 11.01.08 16:01 Сейчас в теме
Кушнир-то фиг проверил, нет у него восьмерки, а я проверил ;)
Рабочая, как новичку- плюс
12. PeRom 51 25.09.08 11:00 Сейчас в теме
>открытие и чтение файла с количеством 5…10 000 строк происходит за 1…5 секунд
Как этого добился? Что используешь?
Последнюю обработку скачать не могу, а в текстовых тот-же принцип, что и у меня:
Код
Файл = Новый COMОбъект("Excel.Application");
Файл.DisplayAlerts = 0;                   //не задавать вопросы
Файл.Application.AutomationSecurity = 3;  //уровень безопасности
Книга = Файл.Workbooks.Open(ФайлХЛ);//строка выполняется 5-6 минут, какая альтернатива?
Лист = Книга.Worksheets(2);
Пока (НЕ ПустаяСтрока(Строка(Лист.Cells(строкаXL,1).Value))) или
   (НЕ ПустаяСтрока(Строка(Лист.Cells(строкаXL,2).Value))) Цикл
   строкаXL = строкаXL+1;
КонецЦикла;                                       
COMSafeArrayМассив = Лист.range(Лист.Cells(1,1),Лист.Cells(строкаXL,249)).Value;
Книга.Close();
Показать полностью

открываю файл с несколькими листами, макросами и паролем. Как ещё можно считать из него инфу и желательно без ВК?
3. vasilykushnir 63 11.01.08 17:13 Сейчас в теме
А на каком фигу я ее проверю? Просто коллега по цеху смотрю пырвую обработку выложил - решил поддержать доброе начинание, дабы не заклевали новичка.
4. imsoftware 176 12.01.08 18:38 Сейчас в теме
Просто и понятно. +1
5. Abadonna 3969 12.01.08 21:00 Сейчас в теме
Предусмотри и еще один режим на тот случай, если первая строчка ёкселя содержит заголовки колонок, в это случае создавать колонки не Колонка1...КолонкаX, например, Наименование-Количество-Цена. Будет юзабельнее
6. Шёпот теней 1782 14.01.08 08:00 Сейчас в теме
(5) Спасибо, Abadonna!

У меня так и работает. Да! Если это ещё кому то нужно, обязательно вставлю... Просто хотелось максимальной простоты, понятности и универсальности... Особенно для новичков... Когда месяц назад стал изучать 8-ку был в ужасе... теперь ничего...

Спасибо, ещё раз... Удачи!
7. Шёпот теней 1782 14.01.08 09:18 Сейчас в теме
(5) По совету "Abadonna" дополнил отчёт перенаименованием колонок табличного поля по выбранной строке или по выбранной ячейки см. файл и описание к файлу "ЧтениеЭкселя_01"

Спасибо всем кто выразил своё мнение в комментариях и/или скачиваниях данного отчёта.

Всем удачи и успехов!
8. serg1c 23 14.01.08 11:59 Сейчас в теме
Ну вообще-то обработкой текстовый файл можно назвать только с натяжкой!
А файлы .efd вообще как обработка не котируются.
Я не понял. Или убрали с сайта .ert или так и было?
9. serg1c 23 14.01.08 12:18 Сейчас в теме
Я видать не понял.
Это для 8-ки что-ли?
10. Шёпот теней 1782 14.01.08 18:04 Сейчас в теме
Спасибо магнтогорцам за советы и общение...

Всем удачи!
11. Abadonna 3969 14.01.08 18:10 Сейчас в теме
(8,9) А фигли понимать?
Вверху четко написано, хоть и мелкими буквами: "Внешняя компонента для 1С: Предприятие 8.0"
Правда она не внешняя, но для 8.0 - точно ;)
13. Dirk Diggler 08.01.10 04:15 Сейчас в теме
Отличная обработка. Пару идей выскажу. Лично мне не хватает:

  • возможности редактировать содержимое таблицы
  • загрузки нескольких листов по выбору
  • Удаления столбцов и строк
  • переноса в выбранную табличную часть
15. Шёпот теней 1782 18.01.10 15:05 Сейчас в теме
(13) загрузка из листов реализовано здесь: http://infostart.ru/public/22279/ ... думаю что реализовать загрузку из нескольких листов в одну ТЗ труда не составит ...
14. uri1978 138 18.01.10 12:58 Сейчас в теме
Спасибо. Буду использовать как пример для написания своей обработки.
То что нужно!
;)
16. Шёпот теней 1782 18.01.10 15:13 Сейчас в теме
(14) ... и вам спасибо ...

по поводу любой работы с XLS все ноги растут так или иначе от господина Душелова ... и эта разработка была написана на основе чтения его обработок ... и пользуясь случаем хочется выразить ему багодарность ...

быстрота чтения из Ексель достигается чтением листа не по ячейкам, хотя и это иногда нужно, а сразу весь лист оператором UsedRange.Value ... а при записи использовать в ексель файл использовать запись всей ТЗ используя МассивКОМ = Новый COMSafeArray("VT_VARIANT", ВсегоКолонок, ВсегоСтрок);
...

всё это есть в обработке: http://infostart.ru/public/22279/ ...

... вот ...
17. Шёпот теней 1782 19.01.10 08:09 Сейчас в теме
для uri1978 ... и кому интересно ... есть интересный сайт http://www.citforum.ru/programming/windows/ ... тут можно найти некоторые ответы ...

на вопрос:как при использовании UsedRange.Value избежать автоматического перевода текста "0100100" в число (100100) прямого ответа у меня нет ...

КТО знает подскажите ... ?

я делаю так ... в ексель при помощи функции "СЦЕПИТЬ" добавляю к явному текстовому полю знак апострофа ... а потом его удаляю ...

п.с. видимо надо копировать надо не UsedRange.Value а другим оператором копирования колонок с заданным форматом ...

дополнительные операторы можно посмотреть тут : http://msdn.microsoft.com/en-us/library/aa215923(office.11).aspx

... вот ...
18. gaglo 19.01.10 10:57 Сейчас в теме
(17) Заинтересовался... ибо вопрос сформулирован несколько расплывчато. Что есть "явное текстовое поле"? Ячейкам в Экселе задан формат "текстовый"? Последующее упоминание апострофов наводит на мысль, что формат всё-таки "общий", и тогда поле "явно текстовое" только для человеков.
По результатам моих экспериментов для чтения через Value выводы таковы:
- если ячейке Экселя явно задан формат "текстовый", то в 1С попадает значение как строка;
- если задан формат "числовой", то в 1С попадет число;
- если формат ячеек (по умолчанию) "общий", то по дороге неизбежно происходит то самое автоматическое преобразование: значения становятся числами, если только их возможно полностью преобразовать в число, иначе становятся строками (.10 будет числом, .10.24 - станет строкой);
- формат ячеек Экселя должен быть установлен до ввода значений в них!! иначе придется "обновить" значения в ячейках с измененным форматом, хотя бы банальным F2-Enter, чем я иногда и занимаюсь (с помощью кнопки и макроса).
Насчет другого оператора копирования колонок сильно сомневаюсь; можно попробовать забирать UsedRange.Text, тогда все ячейки превратятся в строки; поможет ли это в деле последующего разбора? Пока непонятно...
PS Тут же и попробовал - UsedRange.Text как массив не берется (не то что Value), а по одной ячейке неинтересно ;-[
Шёпот теней; +1 Ответить
19. Шёпот теней 1782 19.01.10 12:58 Сейчас в теме
(18) ... нууу... просто СПАСИБО ... и не ПРОСТО то же... ВОТ ...

хм... проблема в том, что если в Екселе стоит формат.общий и там стоит "001" то если колонку с данной ячейкой сделат формат.текстовое то ексель делает "001" как (1) ... приходится копировать колонку и вставлять её как текст что не всегда получится ... ))) ... поэтому делаю как в (17) ...

полностью согласен поячеечное чтение не "фонтан"...
мне больше нравится сохранять данные из 1С в 1С через mxl или ЗначениеВФайл/ЗначениеИзФайла ...

... вот ...
33. gaglo 20.01.10 13:06 Сейчас в теме
(19) Мы вдвоем взаимно согласны друг с другом!
Но теперь мне непонятно: как можно сделать в Экселе формат общий и значение 001? Руками не получается, даже если я набираю клавишами 001; стоит нажать Enter, и в ячейке остается и значение 1, и видимое представление "1", но без всяких нулей. Речь идет, что ли, о табличке -продукте быстрой выгрузки из 1С?
34. Шёпот теней 1782 20.01.10 14:22 Сейчас в теме
(33) ... правила - ОБЩИЕ ... применение - "ЧАСТНОЕ" ...

форматОбщий не даст сделать "001" ... либо текствоый либо какой-нибудь придумать форматСпециальный ...

... наверное ...

если сохранять методами 1С "вывести" и "сохранить копию" там то же будет куча вопросов ... т.к. формат подберЁтся весьма странный ... вОООбщем теория всегда Общая а практика всегда - Частная ...

... ВОТ ...
20. пользователь 19.01.10 13:14
Сообщение было скрыто модератором.
...
21. пользователь 19.01.10 13:16
Сообщение было скрыто модератором.
...
22. пользователь 19.01.10 13:22
Сообщение было скрыто модератором.
...
23. Шёпот теней 1782 19.01.10 14:11 Сейчас в теме
(22) ... всё стало понятно ... оказывается то была реклама...)))

сначало чем не устраивает поячеечное чтение обработки с диска ИТС ... а потом купите у меня ... моя лучше... ))))

... вотоднаковот ...


п.с. Eugeneer - не перебАрщивай с манией ...
24. пользователь 19.01.10 14:53
Сообщение было скрыто модератором.
...
32. larisab 160 20.01.10 08:44 Сейчас в теме
(24) И это при том что сабж 2008 года :o
25. пользователь 19.01.10 14:58
Сообщение было скрыто модератором.
...
26. пользователь 19.01.10 15:01
Сообщение было скрыто модератором.
...
27. Шёпот теней 1782 19.01.10 15:09 Сейчас в теме
(26) ... вместо цыц ... взял бы и научил бы нас как в 1С ... "в 1с ...вся экселевская таблица.....полностью загружается в таблицу значений 1С......ОДНИМ методом..... " ...

все бы тебе были благодарны ... а то, что ты умный мы и так знаем ...

... вОт ...

п.с. по поводу 2010 года... это была моя самая первая обработка написаннная в 2007 году на 1С 8.0 ... и прекрасно помню как с БОЛЬШИМ интересом читал подобные обработки ...
28. Шёпот теней 1782 19.01.10 16:59 Сейчас в теме
жаль... жаль... что Eugeneer так и не научил нас : ... "в 1с ...вся экселевская таблица.....полностью загружается в таблицу значений 1С......ОДНИМ методом..... " ...

видимо умность и жадность рядом ходят .... хм... или на одной шеи сидят ...

... ВОТведьВОТ ...
29. пользователь 19.01.10 17:27
Сообщение было скрыто модератором.
...
30. пользователь 19.01.10 17:38
Сообщение было скрыто модератором.
...
31. Шёпот теней 1782 20.01.10 08:39 Сейчас в теме
(30) ... Eugeneer ! ... у вас ко мне мания ...

... данная обработка и txt - загружает, и dbf - грузит (хотя и dbf лучше открывать как xls - меньше проблем с кодовыми страницами) ...

... воообщем НЕпонятно чтоТО или чтоТО не о ТОМ ...

... вотВобщемТАКвот ...
35. Ish_2 1113 24.01.10 11:36 Сейчас в теме
Шепот , ты не поверишь !
Искать , заморачиваться было некогда .Нужно было быстро,"с ходу" загрузить некий xls именно в ТЗ как самый удобный формат для дальнейшей обработки.
Воспользовался.
ilya.don; Шёпот теней; +2 Ответить
36. aleks_pro 27.10.11 16:38 Сейчас в теме
Выдает ошибочку. Будем смотреть
Шёпот теней; +1 Ответить
37. Stepan_1c 13.12.11 04:59 Сейчас в теме
Спасибо за работу=)
Шёпот теней; +1 Ответить
38. lushka 6 27.12.11 11:03 Сейчас в теме
Спасибо, очень выручили :)
39. Boudybuilder 35 22.03.12 14:42 Сейчас в теме
Спасибо за работу. Будем смотреть что за зверь такой.
Ато я тут парюсь со своей разработкой.
Хотелось чтоб скачивать значения из прайса можно было в регистр НоменклатураКонтрагентов , а потом уже загружать из разных фирм прасов цены , вот так чтоб каждый день свеженькую информацию иметь .
Да и кстати прайсы то у всех с разными структурами колонок. Один тут такой хитрый прайс есть , не знаю пока как его обрабатывать , та характеристика в отдельной колонке, но не в отдельных строках , а по одной номенкдлатуре все характеристики збиты в одну яейку через запятую , а вот это уже мне не нравится...
Другое дело когда товар сразной характеристикой разложен отдкльно по строках , да еще и колонка с кодом товара есть. Но ниче. Нет ничего невозможного , будем пробовать делать.
40. Boudybuilder 35 22.03.12 14:42 Сейчас в теме
(Спасибо за работу. Будем смотреть что за зверь такой.
Ато я тут парюсь со своей разработкой.
Хотелось чтоб скачивать значения из прайса можно было в регистр НоменклатураКонтрагентов , а потом уже загружать из разных фирм прасов цены , вот так чтоб каждый день свеженькую информацию иметь .
Да и кстати прайсы то у всех с разными структурами колонок. Один тут такой хитрый прайс есть , не знаю пока как его обрабатывать , та характеристика в отдельной колонке, но не в отдельных строках , а по одной номенкдлатуре все характеристики збиты в одну яейку через запятую , а вот это уже мне не нравится...
Другое дело когда товар сразной характеристикой разложен отдкльно по строках , да еще и колонка с кодом товара есть. Но ниче. Нет ничего невозможного , будем пробовать делать
Шёпот теней; +1 Ответить
41. Шёпот теней 1782 22.03.12 22:54 Сейчас в теме
42. 7OH 70 03.12.13 18:31 Сейчас в теме
А не подскажете пример, такой же, но с возможностью редактировать загруженное.
Загрузить на чтение у меня и так получилось.
При программном создании колонки - получается только читать.
43. Шёпот теней 1782 04.12.13 09:00 Сейчас в теме
(42) для возможности непосредственного редактирования надо указать ТИП колонок таблицы ... вот ...
44. user1960924 20.06.23 18:48 Сейчас в теме
Спасибо, помогло, до сих пор работает))
Я обычно этот код использовал, но твой удобнее)

&НаКлиенте
Процедура ПутьНачалоВыбора(Элемент, ДанныеВыбора, ВыборДобавлением, СтандартнаяОбработка)
Имя = "";
ПоместитьФайл(Имя,,Путь,Истина);
КонецПроцедуры

&НаСервере
Процедура ЗагрузкаНаСервере()
ТекстовыйДокумент = Новый ТекстовыйДокумент;
ТекстовыйДокумент.Прочитать(Путь);
Количество = ТекстовыйДокумент.КоличествоСтрок();

Для Счетчик = 2 По Количество Цикл
Строка = ТекстовыйДокумент.ПолучитьСтроку(Счетчик);
МсвСтрока = Новый Массив;
МсвСтрока = СтрРазделить(Строка, ",", Истина);
НовыйСотрудник = Справочники.Сотрудники.СоздатьЭлемент();

НовыйСотрудник.Фамилия = СокрЛП(МсвСтрока[0]);
НовыйСотрудник.ИмяОтчество = СокрЛП(МсвСтрока[1]);
НовыйСотрудник.Логин = СокрЛП(МсвСтрока[2]);
НовыйСотрудник.Пароль = СокрЛП(МсвСтрока[3]);
НовыйСотрудник.Роль = СокрЛП(МсвСтрока[4]);
НовыйСотрудник.Наименование = СокрЛП(МсвСтрока[0]) + " " + СокрЛП(МсвСтрока[1]);

Попытка
НовыйСотрудник.Записать();
Исключение
Сообщить("Не удалось импортировать данные");
КонецПопытки;
КонецЦикла;
КонецПроцедуры

&НаКлиенте
Процедура Загрузка(Команда)
ЗагрузкаНаСервере();
КонецПроцедуры
Показать
45. user1960924 21.06.23 04:13 Сейчас в теме
Так же могу приложить код для тестов

&НаКлиенте
Процедура ПлатформаНачалоВыбора(Элемент, ДанныеВыбора, ВыборДобавлением, СтандартнаяОбработка)
	СтандартнаяОбработка = Ложь;
	Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
	Диалог.Заголовок = "Выберите файл базы 1C";
	Диалог.ПредварительныйПросмотр = Ложь;
	Диалог.МножественныйВыбор = Ложь;
	Диалог.ПроверятьСуществованиеФайла = Истина;
	Диалог.Каталог = "c:\";
	Если Диалог.Выбрать() Тогда
		Платформа = Диалог.ПолноеИмяФайла;
		КонецЕсли;
	КонецПроцедуры  
	
	&НаКлиенте
Процедура ПутьКБазеНачалоВыбора(Элемент, ДанныеВыбора, ВыборДобавлением, СтандартнаяОбработка)
	СтандартнаяОбработка = Ложь;
	Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
	Диалог.Заголовок = "Выберите путь к базе тестирования";
	Диалог.МножественныйВыбор = Ложь;
	Диалог.Каталог = "";
	Если Диалог.Выбрать() Тогда
		ПутьКБазе = Диалог.Каталог;
		КонецЕсли;
КонецПроцедуры
Показать
Оставьте свое сообщение