Как определить название файла в интернете?

[Raf-9600]

Собсно мне интересно, как менеджеры закачек определяют имя файла в интернете? Погуглив, единственный ответ что нашёл, это опрос сервера на наличие content-disposition и получение имени файла из него. Но соль в том, что не все серверы отдают content-disposition, тем не менее менеджеры закачки как-то узнают имя файла. Как?

Сервер на котором я тестировал, отдаёт только такую инфу:

Connection = keep-alive
Accept-Ranges = bytes
Content-Length = 38425
Content-Type = application/x-rar-compressed
Date = Sat, 06 Apr 2013 10:29:51 GMT
Last-Modified = Wed, 16 Jan 2013 19:28:07 GMT
Server = exhttpd/0.55X

[Пепел Феникса]

наверняка из ссылки.

[Raf-9600]

Сообщение от Пепел Феникса

наверняка из ссылки.

Ссылка имеет такой вид "http://www.ex.ua/get/43880931" (сервер доступен только Украинцам)
Проверял с помощью Free Download Manager - определяет имя файла файла без проблем. Значит способ должен быть.

[IvaniuS]

просмотри сниферром как твой ДЛМ определяет имя файла.

Вот псе гениальное - просто, обычный редирект идет как ты видишь....

[Raf-9600]

Ясно, значит нужно отловить на что ссылается редирект и у него про content-disposition спрашивать.
IvaniuS, благодарю за помощь.

P.S.
Вот даже частичный пример сразу нагуглил: http://forum.antichat.ru/showpost.ph...6&postcount=14

[Aliens_wolfs]

Вот код который покажет ваш файл

var
  HTTP: TIdHTTP;
begin
  HTTP := TIdHTTP.Create(nil);
  try
   HTTP.HandleRedirects := true;
   HTTP.Get('http://www.ex.ua/get/43880931');
   Showmessage(HTTP.Request.URL); // примерно в таком виде /get/71225efb4176276126ef0d1e00fb78cc/43880931/1.04c.rar
   finally
    HTTP.Free;
  end;
end;

И с чего вы взяли что этот сервер только для украинцев, он вроде как для всех

[IvaniuS]

ну т.к. ему только имя нужно сразу бы писал рабочий код:

var
  HTTP: TIdHTTP;
begin
  HTTP := TIdHTTP.Create(nil);
  try
   HTTP.HandleRedirects := true;
   HTTP.Get('http://www.ex.ua/get/43880931');
   Showmessage(ExtractFileName(HTTP.Request.URL)); 
   finally
    HTTP.Free;
  end;
end;

[Raf-9600]

Всех благодарю, я уже разобрался

Сообщение от Aliens_wolfs

И с чего вы взяли что этот сервер только для украинцев, он вроде как для всех

Мне так русские сказали
Возможно просто он только мелкие файлы всем отдаёт? Вот к примеру ссылка на файл 1.5 Гб - http://www.ex.ua/get/43817093

[Aliens_wolfs]

С одной функцией ExtractFileName недаст просто имя файла, для начало нужно символы / на \ заменить

var
  HTTP: TIdHTTP;
begin
  HTTP := TIdHTTP.Create(nil);
  try
   HTTP.HandleRedirects := true;
   HTTP.Get('http://www.ex.ua/get/43880931');
   Showmessage(ExtractFileName(StringReplace(HTTP.Request.URL, '/', '\', [rfReplaceAll]))); // вот теперь даст имя файла 1.04c.rar
   finally
    HTTP.Free;
  end;

Возможно просто он только мелкие файлы всем отдаёт? Вот к примеру ссылка на файл 1.5 Гб - http://www.ex.ua/get/43817093

Там возраст запрашивает, скорее всего, это видео эро содержания.
Хотя еще можно через украинский прокси попробовать.

[Raf-9600]

Сообщение от Aliens_wolfs

Там возраст запрашивает, скорее всего, это видео эро содержания.

Это ссылка на Diablo 2