Всем здравствуйте!
&НаСервере
Процедура СерверрНаСервере()
Документ = новый ТекстовыйДокумент;
СтрНом = "Номенклатура;" + "КоличествоОстаток;" + "СуммаОстаток";
Документ.ДобавитьСтроку(СтрНом);
Для каждого Строка из Объект.Результат Цикл
СтрНом = ПереводВСтроку(Строка.номенклатура) + ";" + ПереводВСтроку(Строка.КоличествоОстаток) + ";" + ПереводВСтроку(Строка.СуммаОстаток);
Документ.ДобавитьСтроку(СтрНом);
КонецЦикла;
КонецПроцедуры
Что нужно добавить после "КонецЦикла", чтобы сохранить файл в формате csv на сервер, именно на сервер, не на компьютер пользователя.
Заранее спасибо!
&НаСервере
Процедура СерверрНаСервере()
Документ = новый ТекстовыйДокумент;
СтрНом = "Номенклатура;" + "КоличествоОстаток;" + "СуммаОстаток";
Документ.ДобавитьСтроку(СтрНом);
Для каждого Строка из Объект.Результат Цикл
СтрНом = ПереводВСтроку(Строка.номенклатура) + ";" + ПереводВСтроку(Строка.КоличествоОстаток) + ";" + ПереводВСтроку(Строка.СуммаОстаток);
Документ.ДобавитьСтроку(СтрНом);
КонецЦикла;
КонецПроцедуры
Что нужно добавить после "КонецЦикла", чтобы сохранить файл в формате csv на сервер, именно на сервер, не на компьютер пользователя.
Заранее спасибо!
По теме из базы знаний
- Как в 1С 8.x скопировать файл с клиента на сервер в два клика?
- Купить лицензии 1С:Предприятие 8.3 – цены на клиентские и серверные лицензии (ПРОФ, КОРП, мобильные) от 7700 рублей
- Работа с файлами в управляемых формах клиент серверной версии 8.3 и выше
- Пример работы с файлами odt в клиент-серверной модели работы
- Основные возможности работы с файлами в типовой конфигурации на БСП
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(8) Документ = новый ТекстовыйДокумент;
СтрНом = "Номенклатура;" + "КоличествоОстаток;" + "СуммаОстаток";
Документ.ДобавитьСтроку(СтрНом);
Для каждого Строка из Объект.Результат Цикл
СтрНом = ПереводВСтроку(Строка.номенклатура) + ";" + ПереводВСтроку(Строка.КоличествоОстаток) + ";" + ПереводВСтроку(Строка.СуммаОстаток);
Документ.ДобавитьСтроку(СтрНом);
КонецЦикла;
Документ.Записать(Объект.УкажитеПуть);
как было реализовано на клиенте, в путе указывается файл с расширением нужным и всё.
СтрНом = "Номенклатура;" + "КоличествоОстаток;" + "СуммаОстаток";
Документ.ДобавитьСтроку(СтрНом);
Для каждого Строка из Объект.Результат Цикл
СтрНом = ПереводВСтроку(Строка.номенклатура) + ";" + ПереводВСтроку(Строка.КоличествоОстаток) + ";" + ПереводВСтроку(Строка.СуммаОстаток);
Документ.ДобавитьСтроку(СтрНом);
КонецЦикла;
Документ.Записать(Объект.УкажитеПуть);
как было реализовано на клиенте, в путе указывается файл с расширением нужным и всё.
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот