Question

我正在尝试发送带有内嵌图片的HTML电子邮件。下面的文字是删节，但工作正常。

theString=paste0(
   '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0
   Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
   <html xmlns="http://www.w3.org/1999/xhtml">
   <head>
   <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
   <meta name="viewport" content="width=device-width, initial-scale=1.0"/>
   <title>HTML demo</title>
   <style type="text/css">
   </style>
   </head>
   <body>
   <h1>Notes</h1>
   '</body>
   </html>'

msg = mime_part(theString)

## Override content type.
msg[["headers"]][["Content-Type"]] = "text/html"

sendmail(from = "mschindel@sunrun.com",
         to = c("mschindel@sunrun.com"),
         bcc=bccList,
         subject = theSubject,
         msg = msg,
         html = TRUE,
         smtp = list(
            host.name = "aspmx.l.google.com", 
            port = 25, 
            user.name = "***", 
            passwd = "***", 
            ssl = TRUE
         ),
         authenticate = TRUE,
         send = TRUE
         )

我希望能够内联发送* .png图像（因此，可能在HTML中的“Notes”标题之后）。

我的主目录中有一组* png文件，但无法弄清楚如何附加图像或内联。

谢谢！

Answer 1

这对我有用，只要您还使用mime_part将源.png文件添加为附件即可。

使用R / sendmailR在电子邮件中添加（png）图像

1 个答案: