我有一个使用TidSMTP发送电子邮件的Delphi应用程序,应该是。在我们的本地邮件服务器上测试它工作正常,但是一旦我将其设置为使用外部邮件服务器,我就会收到套接字错误10054 - Peer在尝试执行l_idSMTP.connect代码行时重置连接
我已经设置了我希望用于在同一台机器上的Outlook中发送电子邮件的帐户,并且它能够成功发送电子邮件,所以我不确定为什么同一台机器上的Delphi应用程序不是?
以下是我的代码
try
l_pConfigurator := TConfigurator.Create;
l_idSMTP.Username := l_pConfigurator.SMTPUser;
l_idSMTP.Password := l_pConfigurator.SMTPPass;
l_idSMTP.Host := l_pConfigurator.SMTPHost;
l_idSMTP.Port := strtoint(l_pConfigurator.SMTPPort);
if l_pConfigurator.SMTPAuth = 'LOGIN' then
begin
l_idSMTP.AuthenticationType := atLogin;
end;
finally
FreeAndNil(l_pConfigurator);
end;
l_idSMTP.Connect(30000);
if l_idSMTP.Connected then
l_idSMTP.Send(l_idMsg);
非常感谢任何帮助