Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > FTP клиент через Proxy

Автор: Jump 21.3.2007, 08:53

Вчера весь день занимался поиском, много чего нашел, но столкнулся с проблемой, нигде не описанной.

Открыл готовый пример: \ICS\Delphi\Internet\FtpTst.dpr

В свойствах компонента выбрал ConnectionType:= ftpProxy;
Дописал параметры прокси:

Код


procedure TFtpReceiveForm.FormCreate(Sender: TObject);
begin
...
    FtpClient1.ProxyServer:='10.40.2.27';
    FtpClient1.ProxyPort:='8080';
...
end;

Нифига не работает. Закоментировал порт. Коннект пошел, интересно каким образом smile

Открытие выполняется, команда User тоже, а при передаче пороля происходит:

Код


Executing Requested Command
> PASS ********
< 530 Authentication failed, sorry
Request 3 Done.
StatusCode = 530
LastResponse was : '530 Authentication failed, sorry'
Error = 530 (530 Authentication failed, sorry)

Total Commander соединяется, а этот компонент нет, IdFTP тоже отказался работать через проксю... Без прокси коннект невозможен. Прокся: squid/2.6.STABLE9

Автор: Jump 22.3.2007, 08:48

Кароче я в шоке... Этот фтп пример через проксю вообще непонятно куда коннектится... пишу ему адресс: "asasasa", порт: 2484
а он выдает:

Код


Executing Requested Command
< 220---------- Welcome to Pure-FTPd [TLS] ----------
< 220-You are user number 1 of 50 allowed.
< 220-Local time is now 08:45. Server port: 21.
< 220-IPv6 connections are also welcome on this server.
< 220 You will be disconnected after 15 minutes of inactivity.
Session Connected, error = 0
> USER anonymous@asasasa:2484
< 331 User anonymous@asasasa:2484 OK. Password required
> PASS lll@lll.lll
< 530 Authentication failed, sorry
Request 5 Done.
StatusCode = 530
LastResponse was : '530 Authentication failed, sorry'
Error = 530 (530 Authentication failed, sorry)

Автор: Jump 22.3.2007, 09:19

из документации:
You want to connect to ftp.borland.com, using anonymous connection,
company firewall/proxy is running on host named proxyserver.
FtpCli1.HostName := 'proxyserver';
FtpCli1.UserName := 'anonymous@ftp.borland.com';
FtpCli1.Password := 'your.email@company';
FtpCli1.Passive := TRUE;

и ничего не сказано о порте... а на проксе сервере подня фтп сервер на 21 порту... это объясняет куда эта фигня до этого коннектилась... smile