主题：outlook的共享邮箱发送邮件

foxtable如何通过outlook的共享邮箱发邮件？

麻烦是否可以详细描述下？

此主题相关图片如下：捕获.jpg

报错了。试了几遍。

 

 

 

如果按照四楼的方法，发送成功后也会是本机的邮箱的账户吧？就是from还是本机的吧？

那个客户端的邮箱都不一样，那么从我的软件上出去的发件人就是配置好的人了，本来想的就是能够显示为统一的发件人

再追问个问题，发邮件今天都解决了。但是还有2个小问题。

1.下面这个代码，引用dll的这段代码，在outlook关闭的时候报错。

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 = "采购单"  '郵件主旨
msg.Body = "abc"  '郵件內容
'msg.Attachments.Add("d:\test.txt")  '添加採購訂單pdf件為附件
msg.Send()

 

2.我试了另外一个代码。这个时候邮件被保存在outlook的发件箱。不打开outlook不发送。

Dim ol = CreateObject("Outlook.Application")
Dim t = ol.CreateItem(0)
With t
    .To = "xxx@xxx.com"  
    .CC = "xxx@xxx.com"
    .Subject = "预警"
    .Body = "yujingla "
    .Display
    .Send
End With

 

请问有什么好办法，只要是配置好outlook的客户端，无论客户端的outlook是怎样的状态都可以发送出去。

 

就是当outlook的客户端没有打开的时候，会报错。除非outlook的客户端在开启状态。

此主题相关图片如下：捕获.png

而下面这个代码，在outlook关闭的时候会放到发件箱，不会报错。但是邮件不会发出去。只有当outlook客户端打开的时候才会发送。