Как работать с sftp сервером из 7.7?
 

Ребят, подскажите, был у кого опыт? Как можно проще реализовать закачку файлов на sftp, какую-то компоненту м/б, где будут четкие процедуры, такая то процедура задает параметры подключения, такая то заливает файл с указанным именем ну и т.п. А то, что нахожу в инете, как-то сложновато в понимании, на инфостарте пример нашел, но он под "восьмерку" [url]http://infostart.ru/public/145717/[/url], в семерку что-то не переделывается..Спасибо

будь мужиком, откажись от ВК!

ТекстВыгрузки.Записать(КаталогПользователя()+(ИмяПрайса+".csv"));
ТекстВыгрузки = "";

//****************************************************************************************************************************
//БЛОК ВЫГРУЗКИ НА ФТП *******************************************************************************************************
//****************************************************************************************************************************
ТекстВыгрузки = СоздатьОбъект("Текст");
ТекстВыгрузки.ДобавитьСтроку("open " + "90.156.149.200");
ТекстВыгрузки.ДобавитьСтроку("тутлогин");
ТекстВыгрузки.ДобавитьСтроку("тутпароль");
ТекстВыгрузки.ДобавитьСтроку("cd office");
ТекстВыгрузки.ДобавитьСтроку("put " + КаталогПользователя() + (ИмяПрайса+".csv"));
ТекстВыгрузки.ДобавитьСтроку("bye");
ТекстВыгрузки.Записать(КаталогПользователя() + "ftp.txt");
ТекстВыгрузки = "";

КомандаСистемы("ftp -s:" + КаталогПользователя() + "Ftp.txt>> " + (КаталогПользователя() + "report.txt"));
ФС.УдалитьФайл(КаталогПользователя() + "ftp.txt");

ТекстВыгрузки = СоздатьОбъект("Текст");
ТекстВыгрузки.Открыть(КаталогПользователя() + "report.txt");
КС = ТекстВыгрузки.КоличествоСтрок()-4; //если все нормально - то в этой строке файла должно быть соотв.сообщение
//проверим его
Попытка
строкаКомплете = ТекстВыгрузки.ПолучитьСтроку(КС);
Если Найти(Нрег(строкаКомплете),"226 transfer complete") = 0
Тогда а=1; а=а/0;
КонецЕсли;
тПротокол = ТекущееВремя()+" файл данных успешно отправлен на сервер интернет-магазина"+РазделительСтрок+тПротокол;
Форма.Обновить();
ТекстВыгрузки = "";
ФС.УдалитьФайл(КаталогПользователя() + (ИмяПрайса+".csv"));
ФС.УдалитьФайл(КаталогПользователя() + "report.txt");
Исключение
тПротокол = ТекущееВремя()+" ПРОИЗОШЛА ОШИБКА ВО ВРЕМЯ ЗАГРУЗКИ СФОРМИРОВАННОГО ФАЙЛА НА СЕРВЕР ИНЕТРНЕТ-МАГАЗИНА"+РазделительСтрок+тПротокол;
тПротокол = ТекущееВремя()+ИмяПрайса+РазделительСтрок+тПротокол;
Форма.Обновить();
ТекстВыгрузки.Показать();
ТекстВыгрузки = "";
КонецПопытки;
//****************************************************************************************************************************
//БЛОК ВЫГРУЗКИ НА ФТП *******************************************************************************************************
//****************************************************************************************************************************

Я извиняюсь, это именно для Sftp?

(3) Нет, это для мужиков!

(2) это не работает на SFTP

(5)спасибо ,(2) тоже спасибо,а вот мысль - если в команду системы написать, не ftp , а приложение, которое работает с sftp.

Ребят, никто вообщем не работал с этим?