用TNMSMTP发送带附件的邮件遇到的问题 ( 积分: 50 )

  • 主题发起人 主题发起人 jxa
  • 开始时间 开始时间
J

jxa

Unregistered / Unconfirmed
GUEST, unregistred user!
NMSMTP1.Host:=Qry_Email.FieldByName('Smtp').AsString;
NMSMTP1.Port:=25;
if NMSMTP1.Connected then
NMSMTP1.Disconnect;
NMSMTP1.Connect;//已经连接成功
NMSMTP1.SubType:=mtHTML;
NMSMTP1.PostMessage.FromAddress := 'ccc-cc@163.com';
NMSMTP1.PostMessage.FromName := 'Jxa';
NMSMTP1.PostMessage.ToAddress.Text := 'Jxiaoan@126.com';
NMSMTP1.PostMessage.Body.Text := MyStr;//MyStr是一个含有html文本格式的长字符串
NMSMTP1.PostMessage.Subject := '试验';
NMSMTP1.PostMessage.Attachments.Text:='F:/Test.bmp';
NMSMTP1.SendMail;
我加入附件之后为什么发送成功后的格式是文本呢。
 而不加入附件却是Html格式的
 请大侠指教。。
 
NMSMTP1.Host:=Qry_Email.FieldByName('Smtp').AsString;
NMSMTP1.Port:=25;
if NMSMTP1.Connected then
NMSMTP1.Disconnect;
NMSMTP1.Connect;//已经连接成功
NMSMTP1.SubType:=mtHTML;
NMSMTP1.PostMessage.FromAddress := 'ccc-cc@163.com';
NMSMTP1.PostMessage.FromName := 'Jxa';
NMSMTP1.PostMessage.ToAddress.Text := 'Jxiaoan@126.com';
NMSMTP1.PostMessage.Body.Text := MyStr;//MyStr是一个含有html文本格式的长字符串
NMSMTP1.PostMessage.Subject := '试验';
NMSMTP1.PostMessage.Attachments.Text:='F:/Test.bmp';
NMSMTP1.SendMail;
我加入附件之后为什么发送成功后的格式是文本呢。
 而不加入附件却是Html格式的
 请大侠指教。。
 
居然还在用TNMSMTP?为何不用Indy的TIdSMTP?
 
后退
顶部