TIdSMTP控件不能访问eyou的email系统!怎么回事呀 ( 积分: 100 )

  • 主题发起人 主题发起人 dongfz
  • 开始时间 开始时间
D

dongfz

Unregistered / Unconfirmed
GUEST, unregistred user!
163的可以,我们学校采用的是eyou的email系统,就是不行,怎么回事?
 
163的可以,我们学校采用的是eyou的email系统,就是不行,怎么回事?
 
看看是不是设置stmp验证,也就是smtp服务器需要身份验证,把设置代码贴出来看看
 
就是非常简单的,我设置登陆方式为atlogin.用户名和密码都添加了,就是不行。使用163,263的邮箱都可以。简单代码如下:
procedure TForm1.Button2Click(Sender: TObject);
begin
smtpcom.Disconnect ;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
smtpcom.Disconnect ;
smtpcom.AuthenticationType:=atLogin;
smtpcom.Host :=smtpserver.Text ;
smtpcom.Username :=smtpusername.Text ;
smtpcom.Password :=smtppassword.Text ;
smtpcom.HeloName :=smtpheloname.Text ;
smtpcom.MailAgent :=smtpmailagent.Text ;
smtpcom.Port:=25;
smtpcom.Connect(-1);

//设置邮件服务器参数
with Msg do
begin
Body.Assign(smtpbody.Lines);
//填写信件正文
From.Text:=smtpfrom.text;
//填写发信人地址
Recipients.EMailAddresses :=smtpto.Text ;
//填写收信人地址
Subject:=smtpSubject.text;
//填写邮件标题
Msg.Priority :=mpNormal;
//设置发送邮件的优先级
end;
//设置发送邮件的内容
Try
smtpcom.Send(Msg);
finally
smtpcom.Disconnect ;
end;
//发送邮件
end;
 
晕,我用foxmail都发不了
 
我的问题自己已经解决.现在支持eyou系统.呵呵,说起来比较弱智,我是利用了DELPHI6的控件TNMSMTP,然后在delphi6之中把我要用的功能封装成为一个dll文件,在delphi7中直接调用这个库就可以了。
还有一个办法,那就是把delphi6中的TNMSMTP封装成为ActiveX控件,再在7下面调用。我试过了,完全可以突破eyou系统。呵呵,大家不妨也尝试一下:)
 
奇怪,看来只有看看两个控件发送的报文的区别了,楼主送分不[:)]
 
呵呵,给分。
但是我在这里发的帖子基本上都是我自己回答解决的。不过还是感谢你的关注,我就慷慨一把,给你100
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部