VPF::Размер загружающегося файла - Форум программистов

W_A_S_J_A

Дата 15.4.2008, 23:59 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 57
Регистрация: 5.3.2007

Репутация: нет
Всего: нет

Код


const char *access="text/*,image/*";              
int FHandle;
BOOL bSend;
down=0;
HINTERNET hInternet;
HINTERNET hConnect;
HINTERNET hFile;
DWORD dwSize=0;
DWORD cb=sizeof(DWORD);
DWORD index=0;
               
hInternet=InternetOpen(Program_Name, INTERNET_OPEN_TYPE_PROXY, 
        proxy_i_port, NULL,0);

hConnect=InternetConnect(hInternet, server, INTERNET_DEFAULT_HTTP_PORT, 
        LOGIN, PASSWORD, INTERNET_SERVICE_HTTP, 0, 0);    

hFile=HttpOpenRequest(hConnect, "GET", uri,NULL, NULL, &access,  
        INTERNET_FLAG_KEEP_CONNECTION, 0);

if(HttpQueryInfo(hFile, HTTP_QUERY_CONTENT_LENGTH | HTTP_QUERY_FLAG_NUMBER, &dwSize, &cb, &index)==true)
    {
        Form1->Label12->Caption=dwSize;
        }

bSend=HttpSendRequest( hFile, NULL, 0, NULL, 0);    

char szData[512000];
DWORD dwBytesRead=1;
FHandle=FileCreate(Save_Files);
               
while(dwBytesRead)
    {
        InternetReadFile(hFile, szData, sizeof(szData)-1, &dwBytesRead);      
        down=down+dwBytesRead;
        FileClose(FHandle);
        InternetCloseHandle(hFile);
    }
InternetCloseHandle(hInternet);

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C/C++: Сети \| Следующая тема »