Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Could not load SSL library
#3
I altered the code:

Code:
try
    try
     // IdSSLOpenSSLHeaders.IdOpenSSLSetLibPath('c:\AVNWEBS\AVN1\');
      Strm := TStringStream.Create;
      IdHTTP1 := TIdHTTP.Create(nil);
      LHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
      LHandler.SSLOptions.certfile := certfile;
      LHandler.SSLOptions.keyfile := keyfile;
      LHandler.SSLOptions.Method := sslvTLSv1_2; // sslvSSLv23;
      LHandler.SSLOptions.Mode := sslmUnassigned;
      LHandler.SSLOptions.VerifyMode := [];
      LHandler.SSLOptions.VerifyDepth := 0;
      IdHTTP1.IOHandler := LHandler;
      // alleen voor debug anders regel hieronder: Strm.LoadFromFile(UserSession.Exportfilenaam);
      UserSession.XMLDoc1.SaveToStream(Strm);
      IdHTTP1.Request.ContentType := 'text/xml';
      Strm.Position := 0;
      IWMemo1.Lines.Add(IdHTTP1.Post(UserSession.nxT_Algpar.FieldByName('IDeal_Site_URL').AsString, Strm));
    finally
      Strm.Free;
      LHandler.Free;
      IdHTTP1.Free;
    end;
  except
    on E: Exception do
    begin
      IWMemo1.Lines.Add(E.ClassName);
      IWMemo1.Lines.Add(E.Message);
      IWMemo1.Lines.Add(IdSSLOpenSSLHeaders.WhichFailedToLoad);
      // Writeln(E.ClassName, ': ', E.Message);
    end;
  end;

When I run I get the errors in the memo:

EIdOSSLCouldNotLoadSSLLibrary
Could not load SSL library.
DES_set_odd_parity,DES_set_key,DES_ecb_encrypt,EVP_des_cfb64

When I uncomment the first row I get an error see Attachment

Thanks you wil help me.
Henk


Attached Files Thumbnail(s)
   
Reply


Messages In This Thread
RE: Could not load SSL library - by rlebeau - 08-23-2018, 10:47 PM
RE: Could not load SSL library - by mail@hvdboogaard.nl - 08-24-2018, 07:55 AM
RE: Could not load SSL library - by rlebeau - 08-24-2018, 09:36 PM
RE: Could not load SSL library - by rlebeau - 08-24-2018, 10:47 PM

Forum Jump:


Users browsing this thread: 1 Guest(s)