IdSMTP发邮件
有两个问题求助高手:
问题1:
代码如下:
IdSMTP1.AuthenticationType:=atLogin;
IdSMTP1.Username:='m';
IdSMTP1.Password:='1';
IdMessage1.From.Text := 'm@163.com';
IdMessage1.Recipients.EMailAddresses := 'f@tom.com';
IdMessage1.Subject := '测试发送';
IdMessage1.Body.Text := '邮件正文';
IdSMTP1.Host:='smtp.163.com';
IdSMTP1.Port:=25;
try
IdSMTP1.Connect(1000);
IdSMTP1.Send(IdMessage1);
except
exit;
end;
运行提示socket error #10053错误,请高手帮忙解决,谢谢
问题2:
如何用delphi7的IdSMTP1直接对lotus notes 发送邮件,为了安全lotus notes的smtp监听已经关闭,谢谢