mail2000请高手指点(40分)

  • 主题发起人 主题发起人 sun_delphi
  • 开始时间 开始时间
S

sun_delphi

Unregistered / Unconfirmed
GUEST, unregistred user!
try
SMTP.Connect;
Msg.Reset;
Msg.ToList.Clear;
Msg.CcList.Clear;
Msg.SetFrom(frm_main.design.fieldbyname('用户').asstring, frm_main.design.fieldbyname('用户').asstring);
Msg.SetReplyTo(wwIncrementalSearch2.Text,wwIncrementalSearch2.Text);
Msg.Subject:=Edit1.Text;
Msg.TextPlain.Add(Memo2.Lines.Text);
Msg.Date:=now;
Msg.Priority:=TMailPriority(2);
Msg.SetReceipt(wwIncrementalSearch2.Text,wwIncrementalSearch2.Text);
//if mToNames.Items.Count > 0 then
Msg.ToList.SetAll(wwIncrementalSearch2.Text, wwIncrementalSearch2.Text);
//if mCcNames.Items.Count > 0 then
Msg.CcList.SetAll(wwIncrementalSearch2.Text,wwIncrementalSearch2.Text);
for i:=0 to bsSkinFileListView1.Items.Count-1 do
begin
Msg.AttachFile(bsSkinFileListView1.SelectedFilenames,'',false);
end;
Msg.RebuildBody;
SMTP.SendMessage();
SMTP.Quit;
showmessage('ok');
except
showmessage('fail');
end;

为什么接收不到发出的邮件,有用过mail2000的朋友吗?
 
不会呀,你用什么邮箱呀,如果是163什么的,它可以不会即发就可以收到的哟,你最好用企业邮箱试。
 
我使用的是163.com的免费邮箱,难道不行!!晕
 
好像不是延迟的问题,一直收不到[:(!]
 
为什么我把outlook中的另存储来,用maill2000发送可以,但自己产生的mail不能发送,他自己产生的mail在outlook中可以打开!
请指点[:(]
 
接受答案了.
 
后退
顶部