关于delphi使用indy需要帮助

                            
我目前要用delphi7中的indy进行邮件方面的尝试。   
  1. 我已经下载了indy网站的对应demo,对I9D6_Demos_24Nov02\IndyDemos\MailClient进行试验了(我相信真正做过试验的人,一定知道这个例子),我目前在发送邮件方面遇到了一些问题,我使用了一个TIdSMTP和TIdMessage来进行发送邮件  
  IdMsgSend:   TIdMessage;  
  SMTP:   TIdSMTP;  
  具体配置如下:  
  SMTP.Host   :=smtp.126.com  
  SMTP.AuthenticationType   :=   atLogin;  
  SMTP.Username   :=(我自己的126邮箱用户名)  
  SMTP.Password   :=   (我自己的126邮箱密码)  
  IdMsgSend.Recipients.EMailAddresses   :=   (我自己的新浪邮箱)  
   
  在TIdTCPConnection.pas中抛出异常:  
  procedure   TIdTCPConnection.RaiseExceptionForLastCmdResult;  
  begin  
      raise   EIdProtocolReplyError.CreateError(LastCmdResult.NumericCode,   LastCmdResult.Text.Text);  
  end;  
  探出错误提示窗口:  
  You   are   not   authorized   to   send   mail   as   <>  
   
  好些年不用delphi了,有些不太熟练了,在发这个帖子之前,我也查了很多帖子,发现有些人也遇到了上述情况,希望解决的人能够进行指点一下,同时也希望有些人在回答帖子之前(尤其是引用一些别人的文章,源码的时候,请先验证一下,不要在别的帖子上考过来就粘上,这样是耽误别人的时间,我在这方面说得比较直接,希望大家互相体谅)。  
 

查看回复