Delphi + TidSMTP.Connect +套接字错误10054 - Peer连接重置

时间:2013-09-06 11:53:36

标签: delphi connection reset peer

我有一个使用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);

非常感谢任何帮助

0 个答案:

没有答案