小编hi *_*llo的帖子

我正在使用 Delphi 11 开发 Windows 应用程序，并使用 SMTP 发送邮件，从上周开始，我收到错误 - “用户名和密码不被接受”。但是，早些时候相同的代码运行良好。请提供一些解决方案来解决此问题。

with IdSMTP1 Do
begin

  IOHandler := IdSSLIOHandlerSocketOpenSSL1;
  UseTLS    := utUseImplicitTLS;
  Host      := SMTP;
  Username  := FromUser;
  Password  := FromPassword;
  Port      := StrToIntDef(PortNumber, 0);

  IdMessage1.From.Address := IdSMTP1.Username; // sender
  IdMessage1.From.Name := 'Subject';

  try
    Connect;
    try
      Send(IdMessage1);
      Result := True;
    finally
      Disconnect;
    end;
  except
    on E:Exception do
    begin

    end;
  end;
end;