[求助]正文发送图片 HTMLBody如何写

闻启学 · 发表于 2014-5-27 18:25

liucqa 发表于 2014-5-27 15:47
发送嵌入图片或者文件邮件的原理就是，把图片资源提交（和附件类似方式，但是不同），然后通过修改HTML的IM ...

测试过几次只有一次成功的

闻启学 · 发表于 2014-5-27 18:31

Sub InsertPicture()
Dim myOlApp As New Outlook.Application
Dim mynamespace As Outlook.NameSpace
Dim myfolder As Outlook.Folder
Set objOL = CreateObject("Outlook.Application")
Set objMail = objOL.CreateItem(olMailItem)
objMail.Attachments.Add "C:\pictest.jpg"
objMail.HTMLBody = "<html><p>插入图片</p>" & _
"<img src='cid:pictest.jpg' height=480 width=360>"
[color=Blue]objMail.Display[/color]
Set myfolder = Nothing
Set mynamespace = Nothing
End Sub

复制代码

objMail.Display 这句改成 objMail.send 那就不成功了

一定要经过发送窗体才行

Allen2018 · 发表于 2017-2-18 11:16

liucqa 发表于 2014-5-27 15:47
发送嵌入图片或者文件邮件的原理就是，把图片资源提交（和附件类似方式，但是不同），然后通过修改HTML的IM ...

该咋写才能显示出来？
<img src=\"cid:C:\Users\Allonzhang\Desktop\2017-02-18_100743.jpg\">
<img src=\"cid:C:\Users\Allonzhang\Desktop\2017-02-18_100743.jpg\"modifysize="75%" diffpixels="16px" style="width: 750px; height: 1062px;">

Allen2018 · 发表于 2017-2-18 18:25

dzmaster 发表于 2011-3-23 14:25
呵呵。我也遇到这个问题，不过我解决了。

html 里直接写图片的文件名。不要带路径。

能不能具体点阿，遇到同样问题了

sunya_0529 · 发表于 2019-4-19 00:07

Allen2018 发表于 2017-2-18 11:16
该咋写才能显示出来？

试一下——

<img src=cid:2017-02-18_100743.jpg>

复制代码

cwjcw · 发表于 2020-2-26 18:07

我来做个总结，感谢“闻启学”同学，其实就是如果调用outlook发送正文中有图片的邮件，一定不能在后台，而是要在窗体中发送，窗体发送就是在.send前面加上一个MailItem.Display()，这样就能正常显示图片了,我是在python里面写的代码
代码如下：

import win32com.client as win32
outlook = win32.Dispatch('Outlook.Application')
Mail_Item = outlook.CreateItem(0)
Mail_Item.Recipients.Add('XXX@gmail.com')
Mail_Item.Subject ='test-看看outlook和网页版里是否分别都能显示图片'
Mail_Item.BodyFormat = 2
Mail_Item.Attachments.Add(r'C:\Users\asus\PycharmProjects\xlwings\test.jpg')
Mail_Item.Attachments.Add(r'd:\1\bj.xlsx')
Mail_Item.HtmlBody = "<div><img src='test.jpg' /></div>"
Mail_Item.Display()
Mail_Item.Send()

复制代码

cwjcw · 发表于 2020-2-26 18:09

Allen2018 发表于 2017-2-18 11:16
该咋写才能显示出来？

你要先把图片作为附件进行添加，然后添加后，直接调用文件名，如cid:xxx.jpg，
然后，使用显示窗体发送，在send之前，加一个mailitem.Display()，你会看到一个outlook的窗口一闪而过。

		自动登录	找回密码
密码			免费注册