1C 7.7 & FTP

Новая тема
Задачку мне дали маленькую.
Нужно, чтобы торговля и склад 7.7 раз в час высылала на ftp сервер dbf с прайсом.
Заковыка в "высылала на ftp". В 7.7 нет что ли стандартного объекта для работы с ftp протоколом? Можно, конечно через ncftpput отправлять, но не хочется таким образом, так как постоянно выпрыгивающая консоль и отсутствие ответа от программки о результате отправки не есть хорошо. Странно как то, вроде ж УРИБ через ftp работать может в режиме автообмена, а навскид никаких методов для использования во встроенном языке этого функционала я не нахожу.
Их (методов) нет даже в v7plus.dll. Можно "пошариться" по сторонним внеш.компонентам, а лучше вообще отдельную прогу использовать (или "батник" какой).
Мне тут zak555 в icq подсказал, что в типовой конфигурации для бюджетников есть внешняя компонента для этих задач, заватра буду пробовать.
"всем, кто всё ещё ищет посвящается DialMail
http://1c.proclub.ru/modules/mydownloads/personal.php?cid=81&lid=3109

чтобы
поставить внешнюю компоненту, понятно дело - нужно её либо в папку обработки забросить, либо в папку BIN где стоит платформа...
а вот пример использования этой компоненты как FTP-аддона:

ЗагрузитьВнешнююКомпоненту("DialMail.dll");
SystComm = СоздатьОбъект("AddIn.SystComm");
Сообщить(SystComm.Версия);
FTP = СоздатьОбъект("AddIn.FTP");
FTP.ИмяЛогФайла = """";
FTP.ВестиЛогФайл = 0;
FTP.ИспользоватьSSL = 0;
FTPСервер = "ftp.shreya.ru";
FTPПользователь = "user";
FTPПароль = "pswrd";
FTPПорт = "ftp";
FTPПассивныйРежим = 0;
Если FTP.Подключиться(FTPСервер, FTPПорт, FTPПользователь, FTPПароль, FTPПассивныйРежим) = 0 тогда
Сообщить("соединение c " + FTPСервер + " не установлено...", "!");
Иначе
Сообщить("соединение c " + FTPСервер + " прошло успешно!");
Если FTP.ОтправитьФайл(КаталогИБ()+ "price.txt", ИмяФайла, 0) = 1 Тогда
                       тЧас = 0;
                       тМинута = 0;
                       тСекунда = 0;
                       ТекущееВремя(тЧас, тМинута, тСекунда);
Сообщить("Произведена отправка прайса для " + FTPСервер + " время отправки:" + тЧас + ":" + тМинута + ":" + тСекунда);
Иначе
Сообщить("Ошибка отправки прайса...");
КонецЕсли;
FTP.Отключиться();
КонецЕсли; "
Читают тему
(гостей: 1)

Быстрый переход