![]() |
|
v7: Как скачать архив по sftp есть библиотека? | ☑ | ||
---|---|---|---|---|
0
sysadminlk
08.01.14
✎
15:32
|
Хочу средствами 1с скачивать архивы по sftp
|
|||
1
NS
08.01.14
✎
15:48
|
||||
2
sysadminlk
08.01.14
✎
16:08
|
(1) и как его подключить как объект?
|
|||
3
ДенисЧ
08.01.14
✎
16:14
|
(2) вызывай по КомандаСистемы()
|
|||
4
NS
08.01.14
✎
16:16
|
(2) Зачем? С ним работать как с Ftp.exe
|
|||
5
Дык ё
08.01.14
✎
16:18
|
||||
6
sysadminlk
08.01.14
✎
18:09
|
||||
7
sysadminlk
08.01.14
✎
18:11
|
есть аналог на 1с 8
//СОЕДИНЕНИЕ Попытка //Задаем параметры подключения 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)\WinSCP\winscp.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(); |
|||
8
sysadminlk
08.01.14
✎
18:12
|
Но его я тоже не могу переделать под семерку
|
|||
9
sysadminlk
09.01.14
✎
07:04
|
help!...
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |