Foro - Perl en Español

#include <stdio.h>

#include <windows.h>

#include <wininet.h>


HINTERNET hInternet = InternetOpen("Firefox", INTERNET_OPEN_TYPE_PRECONFIG,
    NULL, NULL, 0);

HINTERNET openAddress = InternetOpenUrl(hInternet, "http://www.google.com", NULL, 0,
    INTERNET_FLAG_PRAGMA_NOCACHE|INTERNET_FLAG_KEEP_CONNECTION, 0);


char dataReceived[4096];

DWORD numberOfBytesRead = 0;

while(InternetReadFile(openAddress, dataReceived, 4096, &numberOfBytesRead) && numberOfBytesRead)

{

    printf("%s", dataReceived);

}



    InternetCloseHandle(openAddress);

    InternetCloseHandle(hInternet);