Indy 10 - Could not load SSL library

16/04/2021

0

Pessoal, já pesquisei no Forum, na Net e não consigo resolver o Problema
Estou usando o Delphi 2009 comk Indy 10.2.5.
Já baixei várias versões da DLL. a ultima foi openssl-1.0.2e-x64_86-win64_LinkLibs.
Porém toda vez que tento rodar, ocorre o erro de "Could not load SSL library".
Copiei as DLL para a pasta do projeto, para a system32, para a pasta do path de dll do Delphi.
O problema ocorre na linha: IdSMTP1.Connect();
Segue o codigo:
IdSocketSSL1.SSLOptions.Method := sslvTLSv1;
// IdSocketSSL1.SSLOptions.Mode := sslmClient;
IdSocketSSL1.SSLOptions.Mode := sslmUnassigned ;

with IdSMTP1 do
begin
AuthType := satDefault;
Host := 'smtp.gmail.com';
IOHandler := IdSocketSSL1;
Password := 'xxxx';
Port := 587;
Username := 'xxxxxxx@gmail.com';
UseTLS := utUseExplicitTLS;
end;

with IdMessage1 do begin
Body.Add('teste de Envio de Mensagem');
From.Address := 'xxxxxxo@gmail.com';
From.Name := 'meu nome';
Recipients.EMailAddresses := 'o email do cliente';
Subject := 'Aviso de Débito';
end;
try
IdSMTP1.Connect();
IdSMTP1.Authenticate;
IdSMTP1.Send(IdMessage1);
IdSMTP1.Disconnect;
except
ShowMessage('Falha no envio!');
exit;
end;
Joaquim Quintella

Joaquim Quintella

Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar