Hoe zorg ik ervoor dat ik met THTTPSEND van Synapse via HTTPS een GET kan sturen naar een website?
Ik heb het idee dat met de code die ik stuur er geen HTTPS verbinding tot stand komt, ik krijg bij diverse sites namelijk bad request. Maar KPN en Ziggo geven wel resultaat.
De website die ik uiteindelijk wil gaan gebruiken is: https://www.controleerbtwnummer.nl en dan de API pagina: https://www.controleerbtwnummer.nl/api.php?
Mijn code:
Code:
BTWHttp := THTTPSend.Create;
BTWHttp.Sock.CreateWithSSL(TSSLOpenSSL);
BTWHttp.MimeType := 'application/x-www-form-urlencoded';
BTWHttp.Sock.SSLDoConnect;
BTWHttp.HTTPMethod('GET', ('https://www.nldelphi.com'));
ShowMessage(IntToStr(BTWHttp.Sock.LastError)+' - ' + BTWHttp.Sock.LastErrorDesc);
MemoResponse.Lines.LoadFromStream(BTWHttp.Document);
ShowMessage(BTWhttp.ResultString);
Wat doe ik verkeerd?
Bookmarks