Problemas no envio de email para contas Gmail como destinatários

[eflaeschen]

Olá, espero que estejam todos bem.

Vinha utilizando o ACBrMail normalmente e agora parou. Clientes com conta GMAIL não estão mais recebendo as mensagens e recebi o seguinte retorno:

Este é o sistema de e-mail no servidor smtpi-sp221-219.uni5.net . 

Lamento ter de informar-lhe que sua mensagem não pode ser entregue a um ou mais destinatários. A mensagem está anexada abaixo. 

< [email protected] >: host gmail-smtp-in.l.google.com [ 64.233.186.26 ] disse: 550-5.7.1 [ 191.6.221.219 ]     As mensagens sem um cabeçalho de ID de mensagem válido são não 550-5.7.1 aceito. Para     obter mais informações, acesse 550-5.7.1 https://support.google.com/mail/?p=RfcMessageNonCompliant Diretrizes para remetentes de e-mail – Ajuda do administrador do Google Workspace Importante: a partir de fevereiro de 2024, o Gmail exigirá o seguinte para remetentes que enviam 5.000 ou mais mensagens por dia para contas do Gmail: autentique e-mails enviados, evite enviar support.google.com indesejados ou indesejados e revise     as especificações 550 5.7.1 RFC 5322.     x127-20020a6 36385000000 b005dc42946a85si12425315pgb.214 - gsmtp (em resposta ao     final do comando DATA)

Configuração:
UserSession.dmAgendaClientes.ACBrMail1.Clear;
UserSession.dmAgendaClientes.ACBrMail1.Host                := UserSession.vEmailHost;
UserSession.dmAgendaClientes.ACBrMail1.Port                := IntToStr(UserSession.vEmailPorta);
UserSession.dmAgendaClientes.ACBrMail1.Username            := UserSession.vEmailUsuarioAutenticacao;
UserSession.dmAgendaClientes.ACBrMail1.Password            := UserSession.vEmailSenhaAutenticacao;
UserSession.dmAgendaClientes.ACBrMail1.From                := UserSession.vEmailOperador;
UserSession.dmAgendaClientes.ACBrMail1.FromName            := UserSession.vNomeOperador;
UserSession.dmAgendaClientes.ACBrMail1.SetSSL              := false;
UserSession.dmAgendaClientes.ACBrMail1.SetTLS              := true;
UserSession.dmAgendaClientes.ACBrMail1.ReadingConfirmation := true;
UserSession.dmAgendaClientes.ACBrMail1.UseThread           := False;
UserSession.dmAgendaClientes.ACBrMail1.IsHTML              := true;
UserSession.dmAgendaClientes.ACBrMail1.Priority            := MP_high;
UserSession.dmAgendaClientes.ACBrMail1.Subject             := 'Notificação de agendamento de reunião';

O corpo do email é um html bem simples, apenas algumas linhas
mmMensagem.Lines.Clear;
mmMensagem.Lines.add('<br>Prezado(s)');
mmMensagem.Lines.add('<br>');
mmMensagem.Lines.add('<br>Informamos que o cliente '+UserSession.vNomeOperador+' agendou reunião para as '+cbxHorario.text +' do dia '+cbxData.text);
mmMensagem.Lines.add('<br>');

.....

UserSession.dmAgendaClientes.ACBrMail1.Body.Assign(mmMensagem.Lines);

// Destinatários
UserSession.dmAgendaClientes.ACBrMail1.AddAddress(vEmailExecutor);

try
   UserSession.dmAgendaClientes.ACBrMail1.Send(false);
   WebApplication.CallBackResponse.AddJavaScriptToExecute(swalAlert('Confirmação','Agendamento realizado com sucesso. Verifique sua caixa postal de eMail !'));
   except
   AddToInitProc(swalAlert('Atenção','Problemas no envio do eMail com a confirmação do agendamento !'));
   end;

Olhei a documentação indicada pelo link mas não consegui entender. Nosso provedor é a Kinghost e não usa SSL, mas usa TSL=true. O detalhe é que a mensagem cita volume acima de 5.000 envios mas eu estou mandando apenas 1 mesnagem.

Alguém poderia me ajudar, por favor ?

Obrigado.

 

 

[Juliomar Marchetti]

Creio que não seja o ACBrMail e sim o GMail

tu vai ter que pedir mais informações no suporte deles.

pois o envio foi feito o problema é lá onde recebe