Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #11  
Antiguo 25-11-2021
tejano tejano is offline
Miembro
 
Registrado: dic 2020
Posts: 129
Poder: 4
tejano Va por buen camino
La WSDL es https://sarrerak.bizkaia.eus/N3B4000M/aurkezpena, ya no es https://pruesarrerak.bizkaia.eus/N3B4000M/aurkezpena

Cita:
Empezado por sEngine Ver Mensaje
Como haceis para coger la respuesta de Bizkaia desde delphi?

La respuesta me da esto

Código Delphi [-]
#$1F'�'#8#8#0#0#0#0#0'�5251550_peticion_Resp.xml'#0'�T]��0'#$14'}�W0�k��+:Ȏâ�;�k�j��'#4'��.'#$10'�����'#5'E���)�p�9����'#6'�a'#$1F'��_�'#5'e�@�[����g'#1'�7'#3'u�'#$18'5'#$D'U'#$11#$12'�'#1#$E'YL'#6'�;'#$11'��0c��'#$7F'��:ӗvG'#$1B'a_�'#$1C#$B'''  ��'#6'X�,�����3"��@�'#2'2��C�@�J��>B�ݮ�a�~�H*К�=�dC�'#$1B'ʳ(k�����'#8'�#2'��'#$17'�j5'#$14'xL'#$1B'{�'''#$1C#$1F'�<��'#5'$d'#$16'46��'#4'm�P�BJ7�黄��'#$18'-�T'#$13'%�5'#1'I'#$1F',��'#$1A'��aIY'#$1D'�'#0'�'#0'�'#8'J��M�O��jkm�)㊊'#$17'�'#$D#$E#$0602'S/��W��0y'#$1E'Y�^��4�wo�,�'#$13'�'#9#9'C'#$1A'01a���'#$C#$7F'��̧8��_����r�]'#$1A'��'#$1F#$11'��N��x''�;'#$7F'm���r���'#$12'3s�'#7'c>b�Ĕ'#$13'AbynՈ�[\�ڝ��73g'#$14'��w��;��֨:Q '#1'�ּk|�'#$05F5'�SnJ'#$15'9���r�'#$19#$C'����J�"w��s'#0'�tM��o'#$1D#$7F'<��%v'#$18'5�))(��'#$14'�r�  �&iT'#$10'�'#$1E'�V%�^����'#$13#$12'd�'#$15#$17'��⣳���=�'#$1B'�'#2'�'#$1B'�'#$1C'�On�u''s�#��9'#$11'  l�9�%��Q'#7'�d?im�z���pM�?<��'#$F'�)|'#$10'['#5#0#0
y no se como guardarlo en un archivo, ya que siempre me esta diciendo que es un archivo erroneo.
He probado con estas opciones


Código Delphi [-]
   Respuesta := idhttp_fac.Post('https://pruesarrerak.bizkaia.eus/N3B4000M/aurkezpena',RequestBody);
    AResponse := TStringStream.Create(Respuesta);
    Comprimido := TFileStream.Create(ExtractFilePath(Application.ExeName)+'\LROE_respuesta.gz', fmCreate);
    Comprimido.CopyFrom(AResponse, AResponse.Size);


Código Delphi [-]
    MyText := TStringList.Create;
    MyText.Add(Respuesta);
    MyText.SaveToFile(ExtractFilePath(Application.ExeName)+'\LROE_respuesta2.gz',TEncoding.UTF8);
    MyText.Free;
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
SII -Nuevo sistema de la Agencia Tributaria española de envío de datos vía Webservice newtron Internet 3557 Hace 2 Semanas 17:42:47
Como utilizar la ayuda del nuevo Sistema Operativo gluglu Humor 3 24-09-2007 09:39:05
Aplicacion Agencia De Viajes ArdiIIa Varios 9 20-01-2007 16:49:53
El Vasco Aguirre Al González La Taberna 5 26-05-2006 09:22:28
Microsoft ha lanzado su nuevo sistema operativo DarkByte Humor 0 25-01-2004 09:21:14


La franja horaria es GMT +2. Ahora son las 11:14:29.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi