Выгрузить файл на FTP в 1С:
// Глобальная процедура
Процедура глФТП(СписокКоманд) Экспорт
Текст = СоздатьОбъект("Текст");
Для Инд = 1 По СписокКоманд.РазмерСписка() Цикл
Текст.ДобавитьСтроку(СписокКоманд.ПолучитьЗначение(Инд));
КонецЦикла;
Текст.Записать(КаталогИБ() + "ftp\par.ftp");
ФС.УстТекКаталог(КаталогИБ() + "ftp\");
КомандаСистемы("ftp -s:" + КаталогИБ() + "ftp\par.ftp");
ФС.УдалитьФайл(КаталогИБ() + "ftp\par.ftp");
КонецПроцедуры
// При вызове передаем ей список значений с командами, например:
Процедура Сформировать()
Список = СоздатьОбъект("СписокЗначений");
Список.ДобавитьЗначение("open " + СокрЛП(Адрес));
Список.ДобавитьЗначение(СокрЛП(Пользователь));
Список.ДобавитьЗначение(СокрЛП(Пароль));
Список.ДобавитьЗначение("get " + СокрЛП(ПутьКФайлу));
Список.ДобавитьЗначение("quit");
глФТП(Список);
КонецПроцедуры
Уведомления
Очистить все
Конфигурирование, программирование, администрирование, общие вопросы.
1
Записи
1
Пользователи
0
Likes
324
Просмотры
Создатель темы 13/02/2020 9:01 дп