Ver Mensaje Individual
  #7  
Antiguo 06-01-2022
Muriel Muriel is offline
Miembro
 
Registrado: ago 2008
Posts: 19
Reputación: 0
Muriel Va por buen camino
Hola buenas Señores del foro
les comento que sigo luchando con este teme de querer poner el token como encabezado en http pero por mas que me ponga a leer en muchos foros ejemplos similares no logro comprender nada, en todo esto lo único que pude hacer es esto, pero el servidor me sigue generando el error.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var Peticion: verificarComunicacion;
    Respuesta: verificarComunicacionResponse;
    Token: String;
begin
     Token:='ePyJ0eXwiOiJKV1QiLwthbGciOiJIUzUx...........elTokenEsUnaCadenaLarga';
     
     Peticion:= Nil;
     HTTPRIO1:= THTTPRIO.Create(self);
     HTTPRIO1.HTTPWebNode.Password:=Token;
     Try
         Respuesta:= GetServicioFacturacionCodigos(False,'',HTTPRIO1).verificarComunicacion(Peticion);
         ShowMessage(IntToStr(Respuesta.return));
     Except
          on E : Exception do
               ShowMessage('Error generado : '+E.Message);
     end;
 
end;


Si alguien me ayuda si estoy en la direccion correcta por favor.
Responder Con Cita