Показать сообщение отдельно
  #1  
Старый 04.12.2013, 18:31
kasper_chib kasper_chib вне форума
Прохожий
 
Регистрация: 26.09.2013
Сообщения: 5
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию TidHTTP не выходит скачать файл

Доброго времени суток!
При обращении на адрес http://emiasnsi.lpureg.ru через браузер выскакивает окно авторизации. Авторизацию прошел и дальше можно качать разные файлы.
Мне нужно,чтобы программа умела от туда скачивать файлы.
делаю вот так:
Код:
var
  HTTP : TidHTTP;
  Strm : TMemoryStream;
 begin
  Http := TIdHTTP.Create(nil);
  strm := TMemoryStream.Create;
  HTTP.ProxyParams.BasicAuthentication := True;
  HTTP.ProxyParams.ProxyUsername := 'login';
  HTTP.ProxyParams.ProxyPassword := 'password';
  HTTP.ProxyParams.ProxyServer := 'proxy';
  HTTP.ProxyParams.ProxyPort := 3128;
  HTTP.Get('http://login:password@emiasnsi.lpureg.ru/to_emias/ems_cgr.zip', strm);
  strm.SaveToFile('c:\12345.zip');
  strm.free;
  http.free;
end;

Выскакивает ошибка: "HTTP/1.0.401 Unauthorized" т.е. не может не может пройти авторизацию. если этот же адрес: http://login:password@emiasnsi.lpure...as/ems_cgr.zip
поместить в браузер, то файл скачивается.
Подскажите пожалуйста, что я не так делаю? Очень нужно!
Ответить с цитированием