George Bairaktaris

Is there anyone that has uploaded media to wordpress? I am trying to do it with TSslHttpRest but haven't succeeded. Here is the code i use procedure TForm1.UploadImageToWordPress(const URL, Username, Password, FilePath: string); var HttpRest: TSslHttpRest; ResponseCode: Integer; ResponseText: string; aFileStream:TFileStream; begin HttpRest := TSslHttpRest.Create(nil); try HttpRest.OnHttpRestProg := onSslHttpRestProg ; HttpRest.ServerAuth := httpAuthBasic; HttpRest.Username := Username; HttpRest.Password := Password; HttpRest.SslCliSecurity := sslCliSecTls13Only; HttpRest.ExtraHeaders.Add('Content-Disposition: "attachment; filename=example.jpg"'); HttpRest.ExtraHeaders.Add('Content-Type: "image/jpeg"'); HttpRest.ExtraHeaders.Add('Accept: "*/*"'); HttpRest.ExtraHeaders.Add('Accept-Encoding: "gzip, deflate, br"'); HttpRest.ExtraHeaders.Add('Connection: "keep-alive"'); HttpRest.RestParams.AddItemFile('example.jpg', FilePath, 0); HttpRest.HttpUploadStrat := HttpUploadNone; ResponseCode := HttpRest.RestRequest(httpPOST, URL, False, ''); ResponseText := HttpRest.ResponseRaw; ShowMessage('Response Code: ' + IntToStr(ResponseCode)); ShowMessage('Response Text: ' + ResponseText); finally HttpRest.Free; end; end; No matter what i do i get a 500 error. I have successfully uploaded with postman or curl. Thank you all

Final Code that works with TSslHttpRest procedure TForm1.UploadImageToWordPress(const URL, Username, Password, FilePath: string); var HttpRest: TSslHttpRest; ResponseCode: Integer; ResponseText: string; begin HttpRest := TSslHttpRest.Create(nil); try HttpRest.OnHttpRestProg := onSslHttpRestProg ; HttpRest.ServerAuth := httpAuthBasic; HttpRest.Username := Username; HttpRest.Password := Password; HttpRest.RestParams.PContent:=PContFormData; HttpRest.ExtraHeaders.Add('form-data; filename="anyname.jpg"'); HttpRest.ExtraHeaders.Add('application/json; charset= UTF-8'); HttpRest.RestParams.AddItemFile('file', FilePath, 0); HttpRest.HttpUploadStrat := HttpUploadNone; ResponseCode := HttpRest.RestRequest(httpPOST, URL, False, ''); ResponseText := HttpRest.ResponseRaw; LogWin.Lines.Add('Response Code: ' + IntToStr(ResponseCode)); LogWin.Lines.Add('Response Text: ' + ResponseText); finally HttpRest.Free; end; end; The tricky part was in HttpRest.RestParams.AddItemFile('file', FilePath, 0); First parameter needs to say "file". Thank you all for your time.

I am open to any suggestions to communicate to wordpress media with TSslHttpRest. ❤️

i am sending you the code worked with Indy procedure TForm1.UploadImageToWordPress(const URL, Username, Password, FilePath: string); var Params: TIdMultipartFormDataStream; aResp:String; begin Params := TIdMultipartFormDataStream.Create; Params.AddFormField('content-type','image/jpeg'); Params.AddFile('file', FilePath, ''); idhttp2.Request.Accept := 'application/json; charset= UTF-8'; idhttp2.Request.Authentication := TIdBasicAuthentication.Create; idhttp2.Request.Authentication.Username:= Username; idhttp2.Request.Authentication.Password := Password; idhttp2.Request.BasicAuthentication := true; idhttp2.Request.ContentDisposition := 'form-data; filename="anyname.jpg"';// idhttp2.Request.ContentType := 'application/json; charset= UTF-8'; try aResp:=idhttp2.Post(URL, Params); LogWin.Lines.Add(aResp); LogWin.Lines.Add(IntToStr(idhttp2.ResponseCode)); LogWin.Lines.Add(idhttp2.ResponseText); except LogWin.Lines.Add(idhttp2.ResponseText); end; end;

That is correct. I missed theese information. Even i don't have all the answers. I am using delphi xe2. Unfortunately this is the version my associate uses. If it was my choice i would use restclient with newer version of delphi. I have tried many different approaches. I tried ics demos with all the different parameters with no luck. Media – REST API Handbook | Developer.WordPress.org This is the documentation they have. All the tests are made based on curl execution. curl --request POST \ --url https://b2b.star-toys.com/wp-json/wp/v2/media \ --header "Authorization: Basic ZXJ...ZFFO" \ --header "Content-Disposition: attachment; filename=test.jpg" \ --header "Content-Type: image/jpeg" \ --data-binary "@C:\w\test.jpg" The same logic works with postman. Also postman provides the solution in different languages. I can understand that they send the image as binaries. Maybe i am wrong. I don't know. These are the logs and the answer POST/PUT Parameter Size 77 POST https://b2b.star-toys.com/wp-json/wp/v2/media example.jpg=C%3A%5Cw%5C3Syn%5Cdocumentation%5Cassets%5Cimages%5C590x300%2Ejpg https://b2b.star-toys.com/wp-json/wp/v2/media, Getting headers Connected OK to: b2b.star-toys.com (195.201.214.237) b2b.star-toys.com SSL Connected OK with TLSv1.3, cipher TLS_AES_256_GCM_SHA384, encryption AESGCM(256), message auth AEAD, group x25519 Request completed: 500 Internal Server Error Response Code: 500 Response Text: {"code":"rest_upload_sideload_error","message":"\u0394\u03c5\u03c3\u03c4\u03c5\u03c7\u03ce\u03c2, \u03b4\u03b5\u03bd \u03b5\u03c0\u03b9\u03c4\u03c1\u03ad\u03c0\u03b5\u03c4\u03b1\u03b9 \u03bd\u03b1 \u03b1\u03bd\u03b5\u03b2\u03ac\u03c3\u03b5\u03c4\u03b5 \u03b1\u03c5\u03c4\u03cc\u03bd \u03c4\u03bf\u03bd \u03c4\u03cd\u03c0\u03bf \u03b1\u03c1\u03c7\u03b5\u03af\u03bf\u03c5.","data":{"status":500}} The message is in Greek says that i can not upload this file format. As can you understand this is not true because the same upload without any problem using postman or curl. So i am out of ideas.

Thank you for the answer but i need to use ics since i don't have rest client. I am using delphi xe2