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

← →
Beavercrazy (2007-01-31 17:15) [0]

Необходимо перед закачкой проверить есть ли физически такой файл, поскольку сейчас даже если файла нет все равно удается скачать какой-нибудь предупреждение, что мол файла нет. Если можно пример.

← →
Джо © (2007-01-31 17:16) [1]

По какому протоколу «скачиваем»?

← →
Beavercrazy (2007-01-31 17:17) [2]

Стыдоба и срамота! Не знаю! Не местный!

Код такой:
function arGetWebFile(const URL, LocalFN: string): boolean;
//Сохраняет файл из интернета в локальный каталог
const
BufferSize = 1024;
var
hSession, hURL: hInternet;
Buffer: array[1..BufferSize] of Byte;
BufferLen: DWORD;
f: File;
sAppName: string;
begin
sAppName:=ExtractFileName(Application.ExeName);
hSession:=InternetOpen(PChar(sAppName), INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
try
hURL:=InternetOpenURL(hSession, PChar(URL), nil, 0, 0, 0);
if Assigned(hURL) then
try
AssignFile(f, LocalFN);
Rewrite(f, 1);
repeat
InternetReadFile(hURL, @Buffer, SizeOf(Buffer), BufferLen);
BlockWrite(f, Buffer, BufferLen);
until BufferLen=0;
CloseFile(f);
Result:=true;
finally
InternetCloseHandle(hURL)
end
else
Result:=false
finally
InternetCloseHandle(hSession)
end
end;

← →
Джо © (2007-01-31 17:20) [3]

В данном случае, мы не имеем дела ни с какими «файлами».

← →
Beavercrazy (2007-01-31 17:25) [4]

Все пропало? Не судьба решить мою задачу?

← →
novill © (2007-01-31 17:31) [5]

> [2] Beavercrazy (31.01.07 17:17)
В приведенном вами коде про файлы не сказано ни слова..., и кто или что ответить вам на запрос - ниезвестно... ) да и ответят ли... )

Для того чтобы определить наличие желаемого надо анализировать ответ сервера, а он зависит от протокола, которого вы не знаете...
Мой телепатор говорит, что имеется в виду http, тогда возможно у функции HttpQueryInfo есть шанс вам помочь... Хотя и очень слабый...

← →
Beavercrazy (2007-01-31 17:36) [6]

Ну я так понимаю, что качать можно с помощью указанного мною кода, а проверять наличие файла можно и отдельно любым протоколом. Т.е сначала проверил, а потом закачал. Верно? Может подскажите каким компонентом?

← →
Джо © (2007-01-31 17:38) [7]

> [4] Beavercrazy (31.01.07 17:25)
> Все пропало? Не судьба решить мою задачу?

В протоколе HTTP нет никаких файлов. Даже, если это и выглядит, как файл. Более того, даже веб-страницы вообще на веб-сервере может не быть, пока ее не запросят.
Если же используется протокол FTP, то тогда разумно воспользоваться именно функциями для работы с этим протоколом. Т.е., FtpOpenFile, FtpFindFirstFile и т.д. Однако, в определенном смысле, тут тоже нет никаких «файлов» :)

← →
Zeqfreed © (2007-01-31 18:54) [8]

Есть HEAD-запрос возвращает «200 OK», то есть некоторые основания полагать, что вам отдадут именно то, чего вы ожидаете.

> [8] Zeqfreed © (31.01.07 18:54)
> Есть HEAD-запрос возвращает «200 OK», то есть некоторые
> основания полагать, что вам отдадут именно то, чего вы ожидаете.

Некоторые основания, конечно, есть. :)

Удалено модератором
Примечание: Оффтопик.

Как проверить есть ли в интернете по указанному адресу файл? Найти похожие ветки