Запись файлов на Ftp

[has]

Вобщем вопрос в том, как записать файл то? Гуглил эту тему, но то ли я туплю, то ли пишут не понятно люди. Собственно код, соединяемся

ПроксиСервер = Новый ИнтернетПрокси;				
ПроксиСервер.Пользователь = ПользовательПрокси;
ПроксиСервер.Пароль = ПарольПрокси;
ПроксиСервер.Установить("http",СерверПрокси, ПортПрокси);

Попытка
Сервер = Новый FTPСоединение(СокрЛП(СерверФТП),,
СокрЛП(ПользовательФТП),
СокрЛП(ПарольФТП),ПроксиСервер,Истина);
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;

тут все хорошо, а как скинуть файл то?

ИмяФайлаЛокального = "E:\Centr.dbf";
ИмяФайлаФТП = "Centr.dbf";
Попытка
Сервер.Записать(ИмяФайлаЛокального,ИмяФайлаФТП);
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;

Ошибок нет, но и файла тоже.

 

[TimeDontWait]

ПроксиСервер.Установить("http",СерверПрокси, ПортПрокси);

1с не понимает ftp через http

ПроксиСервер.Установить("FTP",СерверПрокси, ПортПрокси);

 

[has]

Менял, толку нет

 

[TimeDontWait]

Если без переменных? напрямую пропиши, заместь СерверФТП - 192.168.0.3, и остальное тоже.

Прокси = Новый ИнтернетПрокси(Ложь);
Соединение = Новый FTPСоединение(СерверФТП, ПортПрокси, user, pass, ПроксиСервер);
Соединение.Записать(имя_файла_локального, имя_ф_фтп);

 

[has]

Если без переменных? напрямую пропиши, заместь СерверФТП - 192.168.0.3, и остальное тоже.

Прокси = Новый ИнтернетПрокси(Ложь);
Соединение = Новый FTPСоединение(СерверФТП, ПортПрокси, user, pass, ПроксиСервер);
Соединение.Записать(имя_файла_локального, имя_ф_фтп);

Вместо ФТП сервера указать прокси? Пробовал, тоже толку нет. Есть подозрение на то, что проблемы из-за того, что в логине имеется собака. Мож 1С както преобразует в логин@сервер, в итоге получается 2 собачки.

 

[TimeDontWait]

Мож 1С както преобразует в логин@сервер, в итоге получается 2 собачки

нет.

Прокси = Новый ИнтернетПрокси(Ложь);
Соединение = Новый FTPСоединение("192.168.0.1", "21", "user@192.168.0.1", "pass", "твой_прокси");
Соединение.Записать("имя_файла_локального", "имя_файла_фтп");

\

Ну и проверьте на всяк случай, может пользователю ограничены права на запись файлов

 

[has]

чет ниче не пойму, так чтоли?

Сервер = Новый FTPСоединение("192.168.0.1",21,
СокрЛП(Логин) + "@" + СокрЛП(СерверФТП),
СокрЛП(Пароль),ПроксиСервер,Истина);

 

[TimeDontWait]

Сделай как выше. Только поменяй user и pass. Укажи прямо в параметрах фтп_соединения прокси, имена файлов.
Просто подставь данные, без передачи переменных в параметры, что из этого выйдет.

 

[has]

Не пускает...
"Ошибка при вызове конструктора (FTPСоединение): Ошибка аутентификации при доступе к ресурсу: link removed login denied".
Если взять первоначальный мой вариант, то соединение проходит и никаких ошибок не появляется

 

[TimeDontWait]

login denied

и

Ну и проверьте на всяк случай, может пользователю ограничены права на запись файлов

 

[has]

Тотал командер же дает файлы скидывать. Сейчас взял другой фтп сервер, там логин без собаки. Коннект проходит нормально, сделал

МассивФайлов = Сервер.НайтиФайлы("/","*");

нашел один файл с именем - "/anonymous access</h3></body></html>"

 

[TimeDontWait]

МассивФайлов = Сервер.НайтиФайлы("/","*.*");

И как рабочий пример:

Процедура Просмотреть(Кнопка) 
Сервер = Новый FTPСоединение(FTPServer); 
МассивФайлов = Сервер.НайтиФайлы("/","*.*"); 

Для Каждого Файл Из МассивФайлов Цикл 
Если Файл.ЭтоФайл() Тогда 
ПолеСписка.Добавить(Файл, Файл.Имя) 
КонецЕсли; 
КонецЦикла; 
КонецПроцедуры

Если не сработает проблема с настройками фтп-сервера

 

[has]

Не, все таки я грешу на прокси. Надо будет попробовать в другом месте, без прокси. Спасибо