Ver Mensaje Individual
  #9  
Antiguo 05-05-2019
NEG1414 NEG1414 is offline
Miembro
 
Registrado: mar 2007
Posts: 177
Reputación: 18
NEG1414 Va por buen camino
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,$NombrePHP_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..


Código:
  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

Última edición por NEG1414 fecha: 05-05-2019 a las 14:16:43.
Responder Con Cita