Ver Mensaje Individual
  #3  
Antiguo 06-08-2007
sandiamo sandiamo is offline
Miembro
 
Registrado: mar 2007
Posts: 22
Reputación: 0
sandiamo Va por buen camino
Este es el codigo:


Código Delphi [-]
begin
http := TIdHTTP.Create(Self);
params := TStringList.Create;
params.Add('usuario=usr');
params.Add('password=pwd');
showmessage(params.Strings[0]);
try
respuesta:=http.Post('http://www.paginavalidacion.php',params);
ShowMessage('Respuesta: ' + respuesta);
finally
http.Free;
params.Free;
end;
if http.Response=('http://www.paginazonaclientes.php') then showmessage('Correcto');
end;





De esta manera (sin el ultimo if) obtengo el codigo fuente de la paginazonaclientes si el usuario y el password son correctos, cosa que esta bien, pero yo lo que quiero es la direccion URL de la paginazonaclientes para asi validar que el cliente se ha autenticado correctamente mediante el ultimo if.
Responder Con Cita