Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.05;
Скачать: CL | DM;

Вниз

Можно ли во время закачки файла по HTTP отслеживать "ход процесса   Найти похожие ветки 

 
antoxa2005   (2006-02-19 13:30) [0]

Можно ли во время закачки файла по HTTP отслеживать "ход процесса" т.е. сколько закачено, а сколько осталось?


 
Anatoly Podgoretsky ©   (2006-02-19 13:32) [1]

Если есть информация - сколько осталось, то можно.


 
antoxa2005   (2006-02-19 13:46) [2]

Можно определить размер файла до скачивания, но как узнать сколько уже закачалось?


 
Anatoly Podgoretsky ©   (2006-02-19 13:58) [3]

Вот первое как раз и проблематично, хотя бы по тому, что HTTP не работает с файлами, а только со страницами.


 
antoxa2005   (2006-02-19 14:15) [4]

Вот нашел примерчик, правда не проверял.

GetUrlInfo(HTTP_QUERY_CONTENT_LENGTH, "http://some.com/some.zip");

function GetUrlInfo(const dwInfoLevel: DWORD; const FileURL: string):
string;
var
 hSession, hFile: hInternet;
 dwBuffer: Pointer;
 dwBufferLen, dwIndex: DWORD;
begin
 Result := "";
 hSession := InternetOpen("STEROID Download",
                          INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
 if Assigned(hSession) then begin
   hFile := InternetOpenURL(hSession, PChar(FileURL), nil, 0,
                            INTERNET_FLAG_RELOAD, 0);
   dwIndex  := 0;
   dwBufferLen := 20;
   if HttpQueryInfo(hFile, dwInfoLevel, @dwBuffer, dwBufferLen, dwIndex)
     then Result := PChar(@dwBuffer);
   if Assigned(hFile) then InternetCloseHandle(hFile);
   InternetCloseHandle(hsession);
 end;
end;


 
antoxa2005   (2006-02-19 14:15) [5]

Ну, а по FTP, как
> Можно ли во время закачки файла по HTTP отслеживать "ход
> процесса" т.е. сколько закачено, а сколько осталось?

?


 
Anatoly Podgoretsky ©   (2006-02-19 14:21) [6]

antoxa2005   (19.02.06 14:15) [5]
По ФТП работа всегда ведется с файлами и их размер известен.


 
antoxa2005   (2006-02-19 14:32) [7]

Удалено модератором
Примечание: СПАМ



Страницы: 1 вся ветка

Текущий архив: 2006.03.05;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.029 c
2-1140168238
maep
2006-02-17 12:23
2006.03.05
IP, Hostname


15-1139641505
Интересующийся
2006-02-11 10:05
2006.03.05
Архив форума за 2004


2-1140325625
delphi-oracle
2006-02-19 08:07
2006.03.05
Как изменить файл Read-Only?


3-1134547301
Alex_1234
2005-12-14 11:01
2006.03.05
TADOQuery, тип поля DATE, параметр ????


3-1137025928
Kromwerk
2006-01-12 03:32
2006.03.05
Преобразование времени