Einzelnen Beitrag anzeigen

Kostas

Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.095 Beiträge
 
Delphi 10 Seattle Enterprise
 
#4

AW: Per indy mehre Datein als Multipart über https versenden.

  Alt 19. Feb 2018, 14:30
Hi HolgerX,

der Fremdserver benötigt das senden über PUT als Multipart.

So sieht der aktuell Umbau aus. Doch leider bekommen ich damit die Fehlermeldung "HTTP/1.1 400 Bad Request."
Der Anbieter meinte ich sende nicht als Multipart.

Sicherlich hat er recht. Kannst du erkennen was hier schief laufen könnte?



Delphi-Quellcode:
procedure TfrMain.Button2Click(Sender: TObject);
var
  IdHTTP: TIdHTTP;
  PostData: TIdMultipartFormDataStream;
  PostResponse:String;

begin

  IdHTTP := TIdHTTP.Create(nil);
  try

    PostData := TIdMultipartFormDataStream.Create;
    try
      IdHTTP.ProxyParams.ProxyServer := 'api.sandbox.XY.de';
      IdHTTP.ProxyParams.ProxyPort := 8080;

      IdHTTP.Request.Accept := 'application/data.XY.api+json';
      IdHTTP.Request.ContentType := 'multipart/form-data';
      IdHTTP.Request.BasicAuthentication := true;
      IdHTTP.Request.Host := 'services.XY.de';
      IdHTTP.Request.Username := 'User';
      IdHTTP.Request.Password := 'password';

      PostData.AddFile('image2', 'F:\Bilder\A02-6176_2.jpg');

      Memo1.Lines.Add(IdHTTP.put('https://services.XY.de/api/1580/ad/358943/images',PostData));

    finally
      PostData.Free;
    end;
  finally
    IdHTTP.Free;
  end;

end;
Gruß Kostas
  Mit Zitat antworten Zitat