FTP через HTTP proxy

@Dmitry Andreev · Регистрация: 12.11.2011

Author24 — интернет-сервис помощи студентам

Здравствуйте, уважаемые форумчане. Пишу FTP клиент подключающийся к FTP серверу через HTTP Proxy (UserGate5). Проблемма в следующем:

Delphi

var fSession, hConnect: Pointer;
..
fSession := InternetOpen('',INTERNET_OPEN_TYPE_PROXY, 
PChar( 'http=http://169.254.126.20:8080 https=http://169.254.126.20:8080 
ftp=http://169.254.126.20:8080'), nil, 0);
if Assigned(fSession) then 
  begin
  hConnect := InternetConnect(fSession,PChar('91.149.157.143'),21,PChar('ncpi'),
PChar  ('etalon'),INTERNET_SERVICE_FTP,0,0);
  if not Assigned(hConnect) then begin
    ShowMessage('InternetConnect error');
  end;
end else
ShowMessage('InternetOpen error');

InternetOpen проходит нормально, а вот на InternetConnect подключение к серверу не происходит. Без прокси все работает. Заранее спасибо!

@mss · 27.08.2012, 12:11

http://msdn.microsoft.com/en-u... 85%29.aspx

Читать внимательно про параметр lpszProxyName [in] !

@Dmitry Andreev · 27.08.2012, 12:16 **[ТС]**

Я так понял все дело тут "FTP requests can be made through a CERN type proxy either by changing them to an HTTP request or by using InternetOpenUrl." Действительно с OpenUrl все работает отлично. Если можно подскажите, пожалуйста, как поменять FTP request на HTTP?

@mss · 27.08.2012, 12:31

Ну написано же там черным по белому:

FTP requests can be made through a CERN type proxy either by changing them to an HTTP request or by using InternetOpenUrl

@Dmitry Andreev · 27.08.2012, 12:54 **[ТС]**

Спасибо, mss. Сделал так:

Delphi

1 2	hConnect := InternetConnect(fSession,PChar('91.149.157.143'),21,PChar('ncpi'), PChar ('etalon'),INTERNET_SERVICE_HTTP,0,0);

Теперь нужно установить директорию и скачать файл:

Delphi

1	FtpSetCurrentDirectory(hConnect, PChar(ftpDir));

Не получается. Или как можно еще скачать файл с FTP?

@mss · 27.08.2012, 13:20

что значит "Не получается" ?
что говорит Win32Check(FtpSetCurrentDirectory(...)) ?
ftpDir - это ANSI- или Unicode-строка ?

@Dmitry Andreev · 27.08.2012, 13:56 **[ТС]**

SystemError. Code 12018. В описании ошибок WinInet говорится: ERROR_INTERNET_INCORRECT_HANDLE_TYPE Неверный тип обработчика для данного действия.

@mss · 27.08.2012, 14:35

Для CERN-прокси поднабор Ftp-функций в составе WinInet использован быть не может.

@Dmitry Andreev · 27.08.2012, 14:40 **[ТС]**

Как-же тогда можно получить список файлов и скачать нужный? Подскажите пожалуйста.

@mss · 27.08.2012, 14:47

Через SOCKS-прокси

@Dmitry Andreev · 27.08.2012, 15:40 **[ТС]**

Нет ли пример кода?

@mss · 27.08.2012, 16:01

А ты уже убедился что UserGate предоставляет функциональность SOCKS-прокси ?

@Dmitry Andreev · 27.08.2012, 19:29 **[ТС]**

Должен поддерживать.

@mss · 27.08.2012, 20:40

fSession := InternetOpen('',INTERNET_OPEN_TYPE_PROXY,
'socks=socks://xx.xx.xx.xx:xx .......

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 14:47	10
	Через SOCKS-прокси 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 12:11	2
	http://msdn.microsoft.com/en-u... 85%29.aspx Читать внимательно про параметр lpszProxyName [in] ! 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 12:16 [ТС]	3
	Я так понял все дело тут "FTP requests can be made through a CERN type proxy either by changing them to an HTTP request or by using InternetOpenUrl." Действительно с OpenUrl все работает отлично. Если можно подскажите, пожалуйста, как поменять FTP request на HTTP? 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 12:31	4
	Ну написано же там черным по белому: FTP requests can be made through a CERN type proxy either by changing them to an HTTP request or by using InternetOpenUrl 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 13:20	6
	что значит "Не получается" ? что говорит Win32Check(FtpSetCurrentDirectory(...)) ? ftpDir - это ANSI- или Unicode-строка ? 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 13:56 [ТС]	7
	SystemError. Code 12018. В описании ошибок WinInet говорится: ERROR_INTERNET_INCORRECT_HANDLE_TYPE Неверный тип обработчика для данного действия. 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 14:35	8
	Для CERN-прокси поднабор Ftp-функций в составе WinInet использован быть не может. 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 14:40 [ТС]	9
	Как-же тогда можно получить список файлов и скачать нужный? Подскажите пожалуйста. 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 15:40 [ТС]	11
	Нет ли пример кода? 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.08.2012, 16:01	12
	А ты уже убедился что UserGate предоставляет функциональность SOCKS-прокси ? 0

@Dmitry Andreev 5 / 5 / 2 Регистрация: 12.11.2011 Сообщений: 70
	27.08.2012, 19:29 [ТС]	13
	Должен поддерживать. 0

	27.08.2012, 20:40