leer caracter de una web con InternetReadFile

[NEG1414]

Buenas..

tengo una pagina web MIWEB con el codigo

<?php

$Caracter = 'S';
echo $Caracter;
?>

Quiero leer desde mi aplicacion el valor de $Caracter y codifico

char  Buffer;
 DWORD BytesRead=0;

  const ::HINTERNET sesion = InternetOpen("agent",INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL,0);
  if(sesion!=NULL)
  {

     AnsiString Url = "http://www.MIWEB.ES";
     const ::HINTERNET handle = ::InternetOpenUrl(sesion,Url.c_str(),NULL,0, INTERNET_FLAG_RELOAD, 0);
     if(handle!=NULL)
     {
        while(InternetReadFile(handle,&Buffer,sizeof(Byte),&BytesRead))
        {
          if(BytesRead==0){break;}
        }
    }
    InternetCloseHandle(handle);
  }
  else
  {

  }
  InternetCloseHandle(sesion);

Pero Buffer ='/n'


Que Hago MAL Gracias.

[[escafandra]]

Este código lee todo el código fuente de tu Web y lo devuelve en un String:

Código PHP:

String InternetReadWeb(char* URL)
{
  HINTERNET hNet;
  HINTERNET hUrl;
  char  Buffer[513];
  DWORD BytesRead = 0;
  String Text = "";
  hNet = InternetOpen("agent", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
  if(hNet){
    hUrl = InternetOpenUrl(hNet, URL, NULL, 0, INTERNET_FLAG_RELOAD, 0);
    if(hUrl){
      // Lee la pagina web...
      while(InternetReadFile(hUrl, Buffer, sizeof(Buffer)-1, &BytesRead)){
        if(!BytesRead) break;
        Buffer[BytesRead] = 0;
        Text = Text + Buffer;
      }
      InternetCloseHandle(hUrl);
    }
    InternetCloseHandle(hNet);
  }
  return Text;
} 


Saludos.

[NEG1414]

Muchas gracias por contestar