L
lostlastlove
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure form1.Send;
begin
if not smtp.Connected then
smtp.Connect;
smtp.PostMessage.ToAddress.Add('TOaddr');
smtp.PostMessage.ToCarbonCopy.Add('CCaddr');
smtp.PostMessage.Body.Add('body text');
smtp.SubType:=mtHtml;
smtp.PostMessage.Attachments.Add('c:/a.xls');
smtp.SendMail;
smtp.Disconnect ;
end;
如果我不加附件的话能发送HTML格式的邮件,收到的邮件也能正常显示;
但是加了附件后收到的邮件正文则变成了源码了!
各位有谁碰到这个问题没有,帮我想想!
thank you!
begin
if not smtp.Connected then
smtp.Connect;
smtp.PostMessage.ToAddress.Add('TOaddr');
smtp.PostMessage.ToCarbonCopy.Add('CCaddr');
smtp.PostMessage.Body.Add('body text');
smtp.SubType:=mtHtml;
smtp.PostMessage.Attachments.Add('c:/a.xls');
smtp.SendMail;
smtp.Disconnect ;
end;
如果我不加附件的话能发送HTML格式的邮件,收到的邮件也能正常显示;
但是加了附件后收到的邮件正文则变成了源码了!
各位有谁碰到这个问题没有,帮我想想!
thank you!