MyFTP.Passive := True; // пробвал и
MyFTP.Passive := False;
MyFTP.Password := Pwd;
MyFTP.Username := User;
MyFTP.Host := FtpUrl;
if p.UseProxy then
with MyFTP.ProxySettings do
begin
ProxyType := fpcmUserSite; // пробовал разные параметры
Password := p.PswdProxy;
Username := p.UserProxy;
Port := p.PortProxy;
Host := p.IPProxy;
end;
else
with MyFTP.ProxySettings do
begin
Password := '';
Username := '';
Port := 0;
Host := '';
end;
MyFTP.Connect; // и здесь он долго думает... ну если подключение через прокси
//идёт
IdFTP + proxy...
Здравствуйте, при подключении через прокси сервер, происходит ошибка 10060, мол время подключения вышло, ввожу вроде всё правильно, ошибиться не где...
Я так понимаю, что прокси стоит типа Squid. Так вот - это HTTP прокси, который не понимает FTP-команд (кроме GET, хотя PUT тоже иногда работает, но криво). Просто у меня самого недавно была такая проблема, а обошел я ее через использование wininet'овского InternetOpenUrl, но опять же - можно только скачать файл, мало того, даже просмотр директории осуществляется загрузкой сгенерированной сквидом страницы и парсингом ее. В MSDN ищи по словам CERN Proxy.