Recibir respuesta de un servidor

[NEG1414]

Gracias otra vez



Efectivamente trabajo en c++ builder pero tengo indy9 y los componentes que mencionas deben de estar contenidos en Indy 10.



voy a intentarlo utilizando HINTERNET (gracias por el hipervinculo)



Entiendo que al usar el comando echo en el script php, este enviara el valor obtenido como respuesta (estoy pez en php).





Muchisimas Gracias por tu tiempo

[dec]

Hola a todos,

Empezado por NEG1414

Entiendo que al usar el comando echo en el script php, este enviara el valor obtenido como respuesta (estoy pez en php).

Eso es. Lo que el "script" PHP "muestre" o "escriba" será la respuesta de la petición HTTP a dicho "script". Como se comentó arriba, si observamos el siguiente "script":

Código PHP:

<?php

echo 'Mi respuesta';
exit;

La respuesta será "Mi respuesta", y, acto seguido el "script" termina su ejecución.

[NEG1414]

Buenas..


Sigo dandole vueltas a poder recibir una respuesta desde un php a mi aplicacion cb6...


El codigo PHP funciona correctamnete

Código PHP:

<?php
                        
                        
                        $Nombre = $_GET['Nombre'];

                        
                        //Se Abre archivo Texto Lista Usuarios
                        $Lista = fopen('ListUsuarios.txt','r');
                    
                        //Comprobamos si Nombre ya figura en la Lista
                        $Esta = false;
                        while ($linea = fgets($Lista))
                        {
                          if ($linea===$Nombre )
                            {
                                $Esta = true;
                                //break;
                            }            
                        }
                        
                        fclose($Lista);
                        
                         //Si no esta en la lista lo incorporamos
                        if(!$Esta) 
                        {
                            $Lista = fopen('ListUsuarios.txt','a');    
                            fwrite($Lista,$Nombre. PHP_EOL);
                            fclose($fp);
                        }

                        echo $Esta;    

     ?>

</div>

En principio devolveria como respuesta el booleano Esta.


El codigo en c++ para llamar al scrip y en teoria recibir la respuesta seria..

  AnsiString NomUsers ="xxxx";

  BYTE  Buffer;
  DWORD BytesRead;

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

     AnsiString Url = "http://xxxxxx.es//GPrUsers//Registrado.php?Nombre="+NomUsers;//?Nombre="+NomUsers;
     const ::HINTERNET handle = ::InternetOpenUrl(sesion,Url.c_str(),NULL,0, INTERNET_FLAG_RELOAD, 0);
     if(handle!=NULL)
     {
        InternetReadFile(handle,&Buffer,sizeof(Byte),&BytesRead);
        //Si Existe
        if(Buffer!=0)
        {
          //EXISTE
        }
        else
        {
          //NO EXISTE
        }
     }
    InternetCloseHandle(handle);
  }
  else
  {

  }
   InternetCloseHandle(sesion);

La llamada la hace correctamente, el problema lo tengo en la respuesta.. mi planteamineto es que el booleano Esta (respuesta) ocupa 8 bits (un byte) y si fuera positivo su valor seria 00000001 y si fuera negativo 00000000, valor que se asignaria a Buffer....
Ya que obviamente estoy equivocado alguien me puede orientar...


Gracias

[dec]

Hola a todos,

Ojo con los tipos... si pruebas "echo true;" verás que lo que obtienes es un "1". Y es un "1", es decir, una cadena, no un entero. Por otro lado, si pruebas un "echo false;", verás que no obtienes nada... ni siquiera "0"... Quizás debas tener en cuenta todo esto...

[NEG1414]

Gracias por contestar


Entiendo con tu respuesta que el codigo "Post" y "Get" con hinternet es correcto, donde tengo el problema es a la hora de "valorar" la respuesta obtenida en Buffer ...

[dec]

Hola a todos,

Empezado por NEG1414

Gracias por contestar


Entiendo con tu respuesta que el codigo "Post" y "Get" con hinternet es correcto, donde tengo el problema es a la hora de "valorar" la respuesta obtenida en Buffer ...

No... yo sólo me refería a la respuesta... y es porque "if(Buffer!=0)" no me cuadra... puesto que si "$Esta" es "false" no será "0" como acaso esperas... tal vez sería bien una respuesta como "true" y "false", ojo, no valores "booleanos", sino cadenas "true" y "false", y así tendrás que comprobar en tu programa: comparando cadenas, esperando "true" o "false".

[NEG1414]

Gracias por contestar,..
He modificado el codigo php de la siguiente manera

Código PHP:

<?php
  $Nombre = $_GET['Nombre'];
  //Se Abre archivo Texto Lista Usuarios
  $Lista = fopen('ListUsuarios.txt','r');
  //Comprobamos si Nombre ya figura en la Lista
  $Esta = 'N'; //MODIFICADO
  while ($linea = fgets($Lista))
  {
    if ($linea===$Nombre)
    {
      $Esta ='S'; //MODIFICADO
      //break;
    }            
  }
  fclose($Lista);
  //Si no esta en la lista lo incorporamos
  if($Esta=='N') //MODIFICADO
  {
    $Lista = fopen('ListUsuarios.txt','a');    
    fwrite($Lista,$Nombre.PHP_EOL);
    fclose($fp);
  }
  echo $Esta;    
?>

y la llamada:

  char  Buffer;  //MODIFICADO
  DWORD BytesRead=0;

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

     AnsiString Url = "http://XXXXX.es//GPrUsers//Registro.php?Nombre="+NomUsers;
     const ::HINTERNET handle = ::InternetOpenUrl(sesion,Url.c_str(),NULL,0, INTERNET_FLAG_RELOAD, 0);
     if(handle!=NULL)
     {
        InternetReadFile(handle,&Buffer,sizeof(Byte),&BytesRead);
        //Si  Existe
        if(Buffer=='S')//MODIFICADO
        {
      
        }
        else
        {
        
        }
     }
    InternetCloseHandle(handle);
   }

Y buffer sigue teniendo valor NULL '/n'
,¿Que estoy haciendo mal?

Gracias