Foxtable(狐表)用户栏目专家坐堂 → 请问如何在outlook调用发送邮件增加签名图片


  共有3090人关注过本帖树形打印复制链接

主题:请问如何在outlook调用发送邮件增加签名图片

帅哥哟,离线,有人找我吗?
z769036165
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:760 积分:5430 威望:0 精华:0 注册:2012/10/5 21:53:00
请问如何在outlook调用发送邮件增加签名图片  发帖心情 Post By:2021/4/20 9:17:00 [显示全部帖子]

如题?
Dim o As New Microsoft.Office.Interop.Outlook.Application
Dim msg As Microsoft.Office.Interop.Outlook.MailItem
msg = o.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olMailItem)
msg.Recipients.Add("spring.me@qq.com")  '收件人郵件地址
msg.Subject = "采购单"  '郵件主旨
Dim body As String = "<html><body>内容</body></html>"
Dim content As String =<img style = "height:50px" src=****"images\1.jpg" & ">   
msg.HTMLBody = body.Replace("内容", "这儿可点击进入: "& content)
msg.Attachments.Add("d:\test.txt")  '添加採購訂單pdf件為附件
msg.Send()

想在发送的htmlbody内容增加一个本地LOGO图片作为邮件正文里面的签名图片,不知道这个怎么加?

 回到顶部
帅哥哟,离线,有人找我吗?
z769036165
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:760 积分:5430 威望:0 精华:0 注册:2012/10/5 21:53:00
  发帖心情 Post By:2021/4/20 10:11:00 [显示全部帖子]

测试没问题,谢谢!

 回到顶部