发送邮件(100分)

怎样用Delphi通过163服务器发送邮件,跪求！！！

SMTP.www.delphibox.com上有

网上搜一下一大堆

先查163的邮件发送服务器

我用idSMTP和IDMessage控件发送邮件，老是报10053的错误，是不是服务器那头有限制了啊？以下是我用D7写的
IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Username := 'abc'; //服务器上的用户名
IdSMTP1.Password := 'abc'; //服务器上的密码
IdSMTP1.Host := 'smtp.eyou.com'; //服务器SMTP地址
IdSMTP1.Port := 25; //服务器端口
IdSMTP1.Connect; //建立连接

IdMessage1.Body.Add( ' 邮件正文 ' ); //邮件正文件内容
IdMessage1.From.address :='abc@eyou.com'; //发件人地址
IdMessage1.Recipients.EMailAddresses := 'abc@163.com'; //收件人地址，这里改为你的EMAIL地址
IdMessage1.Subject:='标题' ; //邮件标题
IdMessage1.Priority := mphigh; //优先级，mphigh为最高级。
IdSMTP1.Send(IdMessage1); //发送邮件

到IdSMTP1.Connect;这句就报错，奶奶地

要判断是否验证

是的，不少邮件服务器都有这方面的限制，试着使用与收件人同样的邮件服务器发送，比如发送方也用163的邮箱

多人接受答案了。