vex*_*xen -2 html delphi email
我试图通过电子邮件直接发送HTML模板而没有页面的复制粘贴,我的意思是只是把HTML代码发送为HTML页面而不是原始文本,主要原因是通过Delphi发送这个HTML模板.
问题是我们只得到HTML中的文本,我的意思是只有这一部分:
<p>Hola chicos!</p>
<p>Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt mollit anim id est laborum.</p>
我不能让它显示的是这些线:
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0" background="http://www.feelmalagahostel.com/emails/content.jpg">
<table width="800" border="0" cellspacing="0" cellpadding="0" background="http://www.feelmalagahostel.com/emails/header_feel_summer.jpg" style="background-position:top; background-repeat:no-repeat;">
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0" background="http://www.feelmalagahostel.com/emails/footer.jpg" style="background-position:bottom; background-repeat:no-repeat;">
它只是省略它们,显示标签图像而不是背景图像.
这就是我如何在电子邮件中显示的问题？并需要背景图片.
HTML代码:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<body marginheight="0" marginwidth="0">
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0" background="http://www.feelmalagahostel.com/emails/content.jpg">
<tr>
<td valign="top">
<table width="800" border="0" cellspacing="0" cellpadding="0" background="http://www.feelmalagahostel.com/emails/header_feel_summer.jpg" style="background-position:top; background-repeat:no-repeat;">
<tr>
<td align="center" valign="top">
<!--header-->
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="230"> </td>
</tr>
<tr>
<td height="100" align="right" valign="top">
<table border="0" cellspacing="0" cellpadding="0">
<tr></tr>
</table>
</td>
</tr>
<tr>
<td height="10"> </td>
</tr>
<tr>
<td height="61" align="right">
<img src="https://www.auto21.ca/userImages/images/test%20drive%20logo%20FINAL.jpg" width="347" height="61" />
</td>
</tr>
</table>
<!--end header-->
<br/>
<br/>
<!--content-->
<table width="600" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td valign="top"> <font face="Arial, Helvetica, sans-serif" size="2">
<p>Hola chicos!</p>
<p>Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non proident, sunt in culpa qui officia deserunt mollit anim id est laborum.</p>
<p>Sed ut perspiciatis unde omnis iste natus error sit voluptatem accusantium doloremque laudantium, totam rem aperiam, eaque ipsa quae ab illo inventore veritatis et quasi architecto beatae vitae dicta sunt explicabo. Nemo enim ipsam voluptatem quia voluptas sit aspernatur aut odit aut fugit, sed quia consequuntur magni dolores eos qui ratione voluptatem sequi nesciunt. Neque porro quisquam est, qui dolorem ipsum quia dolor sit amet, consectetur, adipisci </p>
<p>velit, sed quia non numquam eius modi tempora incidunt ut labore et dolore magnam aliquam quaerat voluptatem. Ut enim ad minima veniam, quis nostrum exercitationem ullam corporis suscipit laboriosam, nisi ut aliquid ex ea commodi consequatur? Quis autem vel eum iure reprehenderit qui in ea voluptate velit esse quam nihil molestiae consequatur, vel illum qui dolorem eum fugiat quo voluptas nulla pariatur?</p>
</font>
</td>
</tr>
</table>
<!--end content-->
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="800" border="0" align="center" cellpadding="0" cellspacing="0" background="http://www.feelmalagahostel.com/emails/footer.jpg" style="background-position:bottom; background-repeat:no-repeat;">
<tr>
<td valign="top">
<!--footer-->
<table width="600" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="300" valign="top"></td>
</tr>
<tr height="250">
<td></td>
</tr>
</table>
<!--end footer-->
</td>
</tr>
</table>
</body>
</html>
有很多方法可以使用Delphi发送电子邮件.
我最喜欢的是通过SMTP类,它是INDY项目的TIdSMTP一部分,它是灵活而强大的.
发送带有HTML内容的邮件使用辅助类TIdMessageBuilderHtml,在我看来,这不仅使事情变得更容易,而且留下了更优雅和易于理解的代码.
发送此类电子邮件的相关部分是:
var
Builder: TIdMessageBuilderHtml;
Msg: TIdMessage;
SMTP: TIdSMTP;
begin
Builder := TIdMessageBuilderHtml.Create;
try
Builder.Html.Add('<HTML><HEAD><TITLE>An Image for you</TITLE></HEAD><BODY>');
Builder.Html.Add('<p><strong>An image for you</strong></p>');
Builder.Html.Add('<div>');
Builder.Html.Add(' <img border="0" src="cid:theimage" >');
Builder.Html.Add('</div>');
Builder.PlainText.Add('This mail have an image for you. '
+ 'Use a HTML viewer to see it');
Builder.HtmlFiles.Add(ImageFileName, 'theimage');
Msg := Builder.NewMessage();
try
Msg.Recipients.EMailAddresses := eRecipients.Text;
Msg.From.Name := eFromName.Text;
Msg.From.Address := eFromEmail.Text;
Msg.Subject := 'A image for you';
SMTP := TIdSMTP.Create;
try
SMTP.Host := eSMTPHost.Text;
SMTP.Username := eSMTPUser.Text;
SMTP.Password := eSMTPPass.Text;
SMTP.Connect;
try
SMTP.Send(Msg);
finally
SMTP.Disconnect;
end;
SMTP.Send(Msg);
finally
SMTP.Free;
end;
finally
Msg.Free;
end;
finally
Builder.Free;
end;
end;