Рубрики
1С: Предприятие 8.х Работа с сетями

Если не работает FTPs – правильные параметры вызовов в 1Сx8 – рабочий код

FTPs поддерживается только для версий платформы 8.3.9 и выше использование сертификатов SSL поддерживается с версии платформы 8.3.1

также нужно учитывать что по-умолчанию 1Сv8 стучится на порт 990. но в режиме УровеньИспользованияЗащищенногоСоединенияFTP.Авто при указании порта 21 будет стучаться по протоколу FTP, а при указании порта 990 и незаполненном параметре будет стучаться также на порт 990 (в этом примере кода).

И заработает только если указать УровеньИспользованияЗащищенногоСоединенияFTP.Требовать

в конструкторе или параметрах СерверFTP = Новый FTPСоединение()

	ПроксиСервер = Новый ИнтернетПрокси();
	
	ПараметрыFTP = Новый Структура;
	ПараметрыFTP.Вставить("Сервер"                                   , АдресFTP;
	ПараметрыFTP.Вставить("Порт"                                     , 21);
	ПараметрыFTP.Вставить("ИмяПользователя"                          , "UserName");
	ПараметрыFTP.Вставить("ПарольПользователя"                       , "UserPAssWord");
	ПараметрыFTP.Вставить("Прокси"                                   , ПроксиСервер);
	ПараметрыFTP.Вставить("ПассивноеСоединение"                      , Ложь);
	ПараметрыFTP.Вставить("Таймаут"                                  , 10);
    
    ЗащищенноеСоединение = Неопределено;   
    Попытка
        Если ВерсияПлатформы() >= 8301 Тогда
            Выполнить("ЗащищенноеСоединение = Новый ЗащищенноеСоединениеOpenSSL();");    
        КонецЕсли;
        
    Исключение
        ЗащищенноеСоединение = Неопределено;
    КонецПопытки;
    
    Если ВерсияПлатформы() >= 8309 Тогда
		Попытка
			Выполнить("СерверFTP = Новый FTPСоединение(
			|ПараметрыFTP.Сервер, 
			|ПараметрыFTP.Порт, 
			|ПараметрыFTP.ИмяПользователя, 
			|ПараметрыFTP.ПарольПользователя,
			|ПараметрыFTP.Прокси,
			|ПараметрыFTP.ПассивноеСоединение,
			|ПараметрыFTP.Таймаут,
			|ПараметрыFTP.ЗащищенноеСоединение,
			|УровеньИспользованияЗащищенногоСоединенияFTP.Требовать);");					
        Исключение
            Ошибка = ОписаниеОшибки();
            
			ТекстЛогаСобытий = "Не удается подключиться к серверу - " + ПараметрыFTP.Сервер + Символы.ПС + Ошибка;
			Сообщить(ТекстЛогаСобытий);
				Возврат;
		КонецПопытки;	
	Иначе
		Попытка
			СерверFTP = Новый FTPСоединение(
			ПараметрыFTP.Сервер, 
			ПараметрыFTP.Порт, 
			ПараметрыFTP.ИмяПользователя, 
			ПараметрыFTP.ПарольПользователя,
			ПараметрыFTP.Прокси,
			ПараметрыFTP.ПассивноеСоединение,
			ПараметрыFTP.Таймаут);			
		Исключение
			ТекстЛогаСобытий = "Для подключений к серверу FTP требуется версия платформы 1С не ниже версии 8.3.9. Не удается подключиться к серверу - " + ПараметрыFTP.Сервер;
			Сообщить(ТекстЛогаСобытий);
		КонецПопытки;
	КонецЕсли;

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *

Этот сайт использует Akismet для борьбы со спамом. Узнайте как обрабатываются ваши данные комментариев.