How to post strings via ssl by using Synapse lib?

Question

I'm using the Synapse Library and today i want to know how i can send strings via post request to a webserver which uses ssl.

Here is my existing code:

procedure TForm1.syn;
var
  Position: Integer;
  URL, Params: string;
  Response: TMemoryStream;
  SynHttp: THTTPSend;
  Socket: TTCPBlockSocket;
begin
  Response := TMemoryStream.Create;
  Socket := TTCPBlockSocket.Create;
  SynHttp := THTTPSend.Create;
  URL := 'https://gitlab.com';

  try
       Position := Pos('https', URL);
       if Position <> 0 then begin //
         SynHttp.Sock.CreateWithSSL(TSSLOpenSSL);
         SynHttp.Sock.SSLDoConnect;
         // Here i wanna do a Postrequest to the ssl webserver
       end
       else
       // Here i wanna do a Postrequest to the non-ssl webserver
  finally
    Socket.Free;
    Response.Free;
    SynHttp.Free;
  end;
end;

I wanna connect to a ssl webserver and if i connected successfully i want to perform a POST to the webserver.

What is your **real** question? Connect to a WebServer with SSL or perform a POST? — Sir Rufo, Jul 25 '13 at 08:34
Maybe this question will help you http://stackoverflow.com/questions/6334141/how-to-establish-a-secure-connection-by-using-synapse — RBA, Jul 25 '13 at 08:35
I wanna connect to a ssl webserver and if i connected successfully i want to perform a POST to the webserver. — Hidden, Jul 25 '13 at 08:35
Which one of them? 1) Connect to a WebServer with SSL or 2)perform a POST — RBA, Jul 25 '13 at 08:36
Perform a normal post to a webserver without ssl is no problem for me, but i donÄt know how to handle it with ssl. — Hidden, Jul 25 '13 at 08:37
On the answer I gave you is an example on how to connect to SSL server by using SSLDoConnect; — RBA, Jul 25 '13 at 08:50

score 1 · Accepted Answer · edited May 23 '17 at 11:49

1

you can use the

SendString

routine, as from their example Using Tcp With Ssl On Tcp Client

LE: from the comments OP posts I believe a good start will be this question

How to establish a secure connection by using Synapse?

edited May 23 '17 at 11:49

Community

1
1

answered Jul 25 '13 at 08:49

RBA

12,337
16
79
126

Is it possible to send a string like this? Params := 'parameter1=' + EncodeURLElement('data1') + '&' + 'parameter2=' + EncodeURLElement('data2'); – Hidden Jul 25 '13 at 08:51
That depends on what you need to request from your server. I answered to your question. This is another question – RBA Jul 25 '13 at 08:53

How to post strings via ssl by using Synapse lib?

1 Answers1