К сожалению 1С пока не позволяет своими средствами обмениваться файлами с SFTP сервером.
Столкнувшись с этой проблемой, оптимальным для себя выбрал вариант с использованием бесплатного SFTP клиента:WinSCP.
Я не нашел в сети примеров работы 1С с этой утилитой через COM-соединение, поэтому выкладываю свой. Возможно кому-то будет полезен.
Столкнувшись с этой проблемой, оптимальным для себя выбрал вариант с использованием бесплатного SFTP клиента:WinSCP.
Я не нашел в сети примеров работы 1С с этой утилитой через COM-соединение, поэтому выкладываю свой. Возможно кому-то будет полезен.
Первом делом необходимо скачать установочный пакет (можно так же использовать portable-версию) и COM-библиотеку с сайта WinSCP и зарегистрировать ее:
%WINDIR%Microsoft.NETFrameworkверсияRegAsm.exe WinSCP.dll /codebase /tlb
Подробнее об установке здесь
Теперь можно работать с ней из 1С:
//СОЕДИНЕНИЕ
Попытка
//Задаем параметры подключения
sessionOptions = Новый COMОбъект("WinSCP.SessionOptions"); //Создаем объект SessionOptions
sessionOptions.HostName = "example.com";
sessionOptions.UserName = "user";
sessionOptions.Password = "mypassword";
sessionOptions.SshHostKeyFingerprint = "ssh-rsa 1024 xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx:xx";
session = Новый COMОбъект("WinSCP.Session"); //Создаем объект Session
//параметр необходимо использовать если пути регистрации DLL и исполняемого файла различны
session.ExecutablePath = "C:Program Files (x86)WinSCPwinscp.exe";
// Подключаемся
session.Open(sessionOptions);
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
//ВЫГРУЗКА
Попытка
ПутьВыгрузки = Объект.КаталогВыгрузки+"*";
ПутьЗагрузкиНаФТП = Объект.КаталогЗагрузкиНаФТПСервере;
//Выгружаем файлы
transferResult = session.PutFiles(ПутьВыгрузки, ПутьЗагрузкиНаФТП);
//Проверяем результат на возможные ошибки
transferResult.Check();
//Обрабатываем результат выгрузки
Для каждого ВыгруженныйФайл Из transferResult.Transfers Цикл
Сообщить("Выгружен файл: "+ВыгруженныйФайл.FileName);
ПереместитьФайл(ВыгруженныйФайл.FileName, ХранилищеВыгруженныхФайлов);
КонецЦикла;
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
//ЗАГРУЗКА
Попытка
ПутьЗагрузки = Объект.КаталогЗагрузки+"*";
ПутьВыгрузкиНаФТП = Объект.КаталогВыгрузкиНаФТПСервере;
//Загружаем файлы с удаленного сервера
transferResult = session.GetFiles(ПутьВыгрузкиНаФТП, ПутьЗагрузки);
//Проверяем возможные ошибки
transferResult.Check();
//Обрабатываем результат
Для каждого ЗагруженныйФайл Из transferResult.Transfers Цикл
Сообщить("Загружен файл: "+ЗагруженныйФайл.FileName);
session.RemoveFiles(ЗагруженныйФайл.FileName); //Удаляем уже скаченные файлы
КонецЦикла;
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
//Разрываем соединение
session.Dispose();
Все необходимые файлы и пример обработки обмена во вложении.
Я привел пример только основных возможностей, которые сам использовал. У библиотеки довольно много классов и методов и при необходимости возможности использования можно значительно расширить. Мануал здесь
Related Posts
Получение логина и пароля техподдержки 1С из базы
Класс для вывода отчета в Excel
Счет-фактура для УПП
Библиотека классов для создания внешней компоненты 1С на C#- Акт об оказании услуг (со скидками) — внешняя печатная форма для Управление торговлей 11.1.10.86
Прайс-лист с артикулом в отдельной колонке
Мир этому дому!
Спасибо за интересную информацию — взял на заметку. Отдельное спасибо за ссылки по теме — будем разбираться.
Так ведь 8.3 умеет ЗащищенноеСоединениеOpenSSL
Да действительно, заявлено что 8.3 умеет устанавливать FTPСоединение по SSL, не пробовал. Я привел рабочий пример для 8.2. Спасибо за информацию
(2) Vladuha, SFTP и FTPS — это разные вещи. SFTP — это фтп ssh сервера, а FTPS — это фтп через SSL/TLS.
(4) awk, ваша правда, перепутал
норм, а я когда-то лет 7 назад для 8.1 настраивал какого-то ftp-клиента на сервере, прописывал профили, а потом вызывал через КомандаСистемы…
COM — это хорошо
а 8.3 — лучше 🙂
(4) о я тоже думал 8.3 SSL научили, а там тунели запилили
(6) vano-ekt,
Как выяснилось, 8.3 тоже не умеет работать с SFTP
Спасибо, свое время тоже пришлось поизвращатся с sftp
Добрый день!
Очень благодарен за информацию!
Только у меня не получается подключиться.
Не пойму что нужно указать в поле «SshHostKeyFingerprint»
где взять значение для этого поля?
Через обычного клиента WinSCP подключаюсь нормально. Там просто указываю адрес, юзера и пароль.
Всё, нашел… прошу прощения за неумный вопрос 🙂
исходники открыты.
Установил приложение, зарегил библиотеку, но все равно при попытке создать COM-объект в 1С, ругается
{Форма.Форма.Форма(17)}: Ошибка при вызове конструктора (COMОбъект): Класс не зарегистрирован: Класс не зарегистрирован
Кто-нибудь сталкивался?
(13) John83, NET Framework какой? Может это поможет:
(11) d_control, что нашел?
Ребята, а что таки писать в поле sessionOptions.SshHostKeyFingerprint ?
я вот пишу так:
система мне отвечает так:
Соединение неожиданно разорвано. Сервер вернул код завершения команды 0.
вот от куда беру код:
(16) sandybaev,
какая именно команда возвращает ошибку, .Open ? С этими же параметрами через саму программу подключиться удается?
(17) ram3, Все, брат. Получилось. В параметр SshHostKeyFingerprint Я передал публичный ключ сгенерированный самим sftp серваком. А ошибка подключения была в изменненом пароле администратора (я об этом узнал потом).
Огромное спасибо вроде все заработало.
ТОлько единственное не пойму зачем ты перемещаешь файл этой командой —
ПереместитьФайл(ВыгруженныйФайл.FileName, ХранилищеВыгруженныхФайлов);
Если на сервер ты уже закидываешь эти файлы командой
session.PutFiles(ПутьВыгрузки, ПутьЗагрузкиНаФТП); ?
(18) sandybaev,
.PutFiles это выгрузка на сервер, а мне еще нужно было сохранять локально все успешно выгруженные файлы, поэтому я сначала проверял результат .Check() , а потом в цикле по коллекции результатов выгрузки сохранял эти же файлы локально, для истории
(19) ram3, мм. сорри.
(19) ram3,
Не подскажешь.
Как теперь я могу создавать и менять папки на sftp серваке.
Просто тут пишу обработку для обмена а она по ТЗ должна уметь создавать и менять папки.
Заранее спасибо.
(21) sandybaev,
создавать — CreateDirectory, читай мануалы , думаю там все найдешь.
и плюсани уж за публикацию)
(22) ram3, Все, плюсанул вроде как. Почитаю на досуге. Спасибо большое. Тебе бы дальше эту тему развить. желательно с обилием скринов 🙂
(22) ram3, отличная публикация! Есть вопрос по такой задаче: необходимо синхронизировать файлы командой SynchronizeDirectories. Пишу:
transferResult = session.SynchronizeDirectories(Local, ПутьЗагрузкиЛокальный, ПутьКФайламНаСервере, Ложь, Ложь, , «*.wav»);
Но не знаю, что ставить в первый параметр. По-идее, там должен быть класс SynchronizationMode mode (Например: SynchronizationMode.Local, SynchronizationMode.Remote and SynchronizationMode.Both).
Как его объявить в 1С?
(25) ram3, пробовал, не получилось. Есть ещё какие-нибудь предложения?
(24) kashafeev,
думаю можно так:
SynchronizationMode = Новый COMОбъект(«WinSCP.SynchronizationMode»);
но не уверен, надо пробовать.
(26) kashafeev,
а так:
WinSCP = Новый COMОбъект(«WinSCP»);
SynchronizationMode = WinSCP.SynchronizationMode;
мне это не нужно было, сейчас к сожалению времени нет разбираться. Посмотри примеры на сайте разработчика, может что найдешь
Для 7.7 нечто подобное реально?
(28) Пользователь 1С, почему нет? С COM Объектами 7.7 вроде как умеет. Код только немного переписать
спасибо за чудесную реализацию!!!
в сети навалом обработок, но все они работают через командную строку, а тут COM-соединение. То что доктор прописал )))) в благодарность скачал, хотя и качать ничего не нужно, все понятно из текста статьи
(26) kashafeev,
SynchronizationMode mode: 0 — local, 1 — remote, , 2 — both
SynchronizationCriteria criteria: 0 — None, 1 — Time, 2 — Size, 3 — Either
Спасибо большое. Статья очень помогла.
ребята помогите
есть коренвая директория сервера /public
в ней я программно создаю поддиректорию командой session.CreateDirectory(«/public» + «ОбластьКонтрагента»)
все ок, создается теперь надо дальше в директории области контрагента создать еще одну папку (последнюю) под названием «НаименованиеКонтрагента»
как это сделать через функции WinSCPnet.dll?
перерыл из форум и хэлп, ничего нет.
Помогите
Как подключится без пароля с приват ключем.
sessionOptions = Новый COMОбъект(«WinSCP.SessionOptions»); //Создаем объект SessionOptions
sessionOptions.HostName = «1.1.1.1»;
sessionOptions.UserName = «log»;
//sessionOptions.Password = «mypassword»;
sessionOptions.PortNumber = «22»;
sessionOptions.SshHostKeyFingerprint = «ssh-rsa 2048 010101010110101001012010»;
sessionOptions.SshPrivateKeyPath = «С:1111.ppk»;
session = Новый COMОбъект(«WinSCP.Session»); //Создаем объект Session
//параметр необходимо использовать если пути регистрации DLL и исполняемого файла различны
session.ExecutablePath = «C:Program Files (x86)WinSCPwinscp.exe»;
// Подключаемся
session.Open(sessionOptions);
Ошибка:
{Обработка.Обработка1.Форма.Форма.Форма(20)}: Ошибка при вызове метода контекста (Open): Произошла исключительная ситуация (WinSCPnet): Disconnected: No supported authentication methods available (server sent: publickey)
(34) ferre, файл ключ с паролем?
(34) ferre, если да то добавь sessionOptions.SshPrivateKeyPassphrase = «ТвойПарольНаКлюч»;
Коллеги, подскажите как зарегистрировать WinSCP.dll, дело в том, что я в принципе такого файла найти не могу, нашел WinSCPnet.dll.
Зарегистрировал библиотеку командой
в ответ получил
Сборка экспортирована в «C:Windowssystem32WinSCPnet.tlb»; библиотека типов зарегистрирована успешно
Пытаюсь соединиться по sftp, 1 ска выдает ошибку:
Что не так сделано?
(37) Dimka74,
(37) Dimka74, в статье описание для версии 515, возможно сейчас что-то изменилось. Здесь есть вся информация по установке и регистрации
(38) Спасибо за ответ, от туда информацию и черпал.
Может быть теперь ошибка в коде 1с?
Если изменилась библиотека, быть может теперь надо и код 1с править?
Например раньше надо было так:
а сейчас надо так:
Хотя может быть мои знания устарели, и передача файла по SFTP в 1с возможна без лишних плясок — напрямую из платформы?
(39) Dimka74,
Если изменилась библиотека, быть может теперь надо и код 1с править?
Я бы не стал называть это ошибкой, с версией 515 все работает. Если хотите использовать свежую версию, возможно придется адаптировать код. В заголовке статьи написано ПРИМЕР, это не готовое решение на все времена, и пожизненную поддержку никто не обещал.
На сколько я знаю, платформа 1С пока не поддерживает sFTP, только FTPS.
что значит ошибка:
{ВнешняяОбработка.WinSCP.Форма.Форма.Форма(51)}: Ошибка при вызове метода контекста (Open): Произошла исключительная ситуация (WinSCPnet): Алгоритм обмена ключей diffie-hellman-group1-sha1 не был проверен!
как проверить алгоритм?
при подключение оболочкой спрашивает про тоже самое, но тут можно нажать ДА и все ок.
а как нажать Да через КОМ-соединение?
в оболочке нашел как сдвинуть свой алгоритм наверх.
но как в ком… пока ищю
добавил в парамтерах сессии
bool GiveUpSecurityAndAcceptAnyTlsHostCertificate Give up security and accept any FTPS/WebDAVS server TLS/SSL certificate. To be used in exceptional situations only, when security is not required. When set, log files will include warning about insecure connection. To maintain security, use TlsHostCertificateFingerprint.
но не помогло
версия последняя на седня 5.9.1. так и не победил.
искать старые может. в них видимо такой проверки не было
победил!
Коллеги, после установки 1С платформы 8.3.9 и обновления WinSCP на 5.9.2 у меня просто «Неизвестная ошибка»
{ВнешняяОбработка.ЗагрузкаФайлаСFTPСервера.Форма.Форма.Форма(92)}: Ошибка при вызове метода контекста (Open)
session.Open(sessionOptions);
по причине:
Неизвестная ошибка
Даже и не знаю куда копать. Может кто подскажет?
(46) KokaDu, два варианта: либо качать старую версию WinSCP, либо смотреть документацию по новой версии и менять вызов метода .Open, видимо здесь «sessionOptions» что-то не соответствует новой версии.
Уже были проблемы с новой версией выше в комментариях. Я с WinSCP уже давно не работаю, проверить к сожалению не могу…
(47) ram3, перерыл документацию, ничего нового по «Open» не нашел.
Проблему обошел тем, что создал bat-ник из самого WinSCP , который запускается из 1С.
В любом случае спасибо.
Спасибо большое!! Очень помогли
(48)
Проблему обошел тем, что создал bat-ник из самого WinSCP , который запускается из 1С.
В любом случае спасибо.
Проблема ошибки OPEN встала очень остро.
Переход на старую версию не помог. ВЫявил следующую закономерность: при простой регистрации компоненты через командную строку и работе на клиенте все ок.
Как только регистрируем компоненту в службе компонентов чтоб работало на серваке- ловим ошибку OPEN. Может быть кто то победил ее?
Сделайте батник по работе с WinSCP, пример во вложении.
(50) столкнулся с такой же проблемой. Вам удалось победить регистрацию WinSCP для работы на сервере?
После регистрация WinSCP как 64 битного приложения проблема с OPEN остаётся.
Предлагаю следующие варианты решения с использованием батника:
Во вложении примеры с получением и отправки файла.
У меня есть еще решение с использованием Putty, если будет интересно, тоже могу поделиться.
коллеги, у меня длл регается как
%WINDIR%Microsoft.NETFramework64v4.0.30319
egasm.exe WinSCPnet.dll /codebase /tlb:WinSCPnet.tlb
сама длл тут
далее
Показать
далее послать принять как обычно
ПС вин2008р2 64. 1с8*64
(54) Спасибо. Заработало. Только я последовательно выполнил
%WINDIR%Microsoft.NETFrameworkv4.0.30319RegAsm.exe WinSCPnet.dll /codebase /tlb:WinSCPnet32.tlb
%WINDIR%Microsoft.NETFramework64v4.0.30319RegAsm.exe WinSCPnet.dll /codebase /tlb:WinSCPnet64.tlb
на всякий случай чтоб в двух вариантах работало.
И всё заработало.
Хотел бы добавить, что лично у меня алгоритм шифрования был иной, тогда нужно применить несколько иной метод соединения.
Показать
Хотел добавить, если вы устанавливаете FTPES соединение
УРЛ = «ftpes://» + Логин + «:» + Пароль + «@» + АдресСервера;
sessionOptions.ParseUrl(УРЛ);
необходима версия WINSCP 5.9.2 и выше
Очень интересно решение с использованием Putty, если можно — поделитесь, пожалуйста.
Как выяснилось WinSCP любит .NET framework 2.0 больше чем 4.5
Если у вас появляется ошибка 0x80131700 то стоит установить 2.0.
Возможно кому то помог.
Добавлю к «как выяснилось» к посту выше
скачав с их офф сайта winSCPnet.dll — регистрируете через RegAsm но согласно разрядности вашей ОС.
т.е. для win64 это путь — C:WindowsMicrosoft.NETFramework64v4.0.30319
или
для win32 это — C:WindowsMicrosoft.NETFrameworkv4.0.30319
да и если работаете в клиент серверном варианте, то, версия утилиты на сервере должна совпасть с вашей локальной установкой.
(55) походу из за того что сервер 1С 64 битный и оська 64 битная, спасибо, помогло
Чтобы не париться с SshHostKeyFingerprint
можно так сделать:
fingerprint = session.ScanFingerprint(sessionOptions,»SHA-256″);
sessionOptions.SshHostKeyFingerprint = fingerprint;
Немного не в тему, но с FTPS тоже долго искал инфу, пришлось справку читать 🙂
Сервер = Новый FTPСоединение(ИПFTP, 21,ЛогинFTP,ПарольFTP,,Истина,300,,УровеньИспользованияЗащищенногоСоединенияFTP.ИспользоватьЕслиВозможно);
на удивление заработало. 8.3.11, в режиме совместимости 8.2.16
(64) SFTP и FTPS — это разные вещи
Мои 5 копеек:
// Подключаемся
session = Новый COMОбъект(«WinSCP.Session»); //Создаем объект Session
session.open(sessionOptions);
версия WinSCP 5.11.3
(66) А в чем тут отличие?
(67) в моих глазах ))), в исходном примере потерял )))
(12) на хабре написали в 2015, что исходники были потеряны
(69) ты на дату моего поста посмотри
Подскажите пожалуйста, я могу получить файлы (например *.txt) с sFTP, не выгружая в каталог на диске, а сразу в 1С?