![]() |
JSON String per HTTP Post an API senden
Hallo zusammen,
ich würde gerne einen einzelnen langen JSON String per HTTP Post an eine API senden.
Code:
So würde dann der String aussehen wenn ich alles ermittelt hätte. Und diesen möchte ich mit einem HTTP Post an eine PHP Api senden. /index.php/add_customer
{"os":"Windows7", "architecture":"64", "date":"20.06.2013", "version": "3.22", "name":"TestVM-PC"}
Windows, architecture, date, version & name werden dann jeweils von meinen Variablen gefüllt. Da ich auf Komponenten ala Indy & Co verzichten möchte würde ich das Ganze am liebsten mit der Windows API lösen. EDIT: Hab jetzt die synapse Lib genommen.
Delphi-Quellcode:
var sSendString: String;
sSendString := '{"os":"Windows7", "architecture":"64", "date":"20.06.2013", "version": "3.22", "name":"TestVM-PC"}'; Hab jetzt die synapse Lib genommen. Meine Frage ist jetzt wo genau ich in der unteren procedure meinen sSendString einbinden müsste, damit die API ihn annimmt.
Delphi-Quellcode:
SO Link :
procedure HTTPPost;
var URL: string; Params: string; Response: TMemoryStream; begin Response := TMemoryStream.Create; try URL := 'http://posttestserver.com/post.php?dump&html'; Params := 'parameter1=' + EncodeURLElement('data1') + '&' + 'parameter2=' + EncodeURLElement('data2'); if HttpPostURL(URL, Params, Response) then Response.SaveToFile('c:\response.txt'); finally Response.Free; end; end; ![]() |
AW: JSON String per HTTP Post an API senden
Crosspost
![]() (beim nächsten Mal bitte selber angeben) |
AW: JSON String per HTTP Post an API senden
Ich poste Fragen, die ich nicht selber durch die SuFu herrausfinde immer auf Stackoverflow zusätzlich um die Chancen auf eine Antwort zu erhöhen. Sollte doch kein Problem sein oder?
|
AW: JSON String per HTTP Post an API senden
Nö, solange die Postings untereinander verlinkt sind.
|
AW: JSON String per HTTP Post an API senden
Ok, wusste ich jetzt nicht. Werds in Zukunft immer reinschreiben. Ist editiert.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:14 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz