如何在没有 Outlook 的情况下生成电子邮件草稿答案

【问题标题】：How to generate email drafts without Outlook如何在没有 Outlook 的情况下生成电子邮件草稿
【发布时间】：2013-08-30 19:51:13
【问题描述】：

我正在构建一个 Access 表单，它将部署在没有 Office 的 Windows 计算机上。要运行 Access db，将安装 Office 2010 Runtime 例程。由于这个方便的免费下载，用户无需安装 Access 即可打开表单并运行自定义代码。

这是完美的，只有一个例外。输入他们的数据后，我需要一些自定义代码来打开并在 MS Exchange 帐户中保存草稿电子邮件。通常，这对我使用 Outlook 来说非常容易。但是，我之前提到的 Office 运行时不包含该库。

我如何合法在未安装 Outlook 的计算机上使用 MS Outlook 14.0 对象库 (MSOUTL.OLB)？到目前为止的想法：

桌面版的 Outlook Express 是否安装此库？我只能在 3rd 方sites 上找到它，所以它不是我的首选。
我探索了将库复制到共享驱动器的想法，但这似乎不是一个好的idea。
这就是我所拥有的。如果根本不可能，我需要为其他人创建一个新的界面和管理系统来生成电子邮件。

请给点建议？

（另外，对于那些喜欢看代码的人，这是我通常会做的。除了我会修改它以登录到特定帐户：）

Function MakeEmail()
    Dim OlApp As Outlook.Application
    Dim ObjMail As Outlook.MailItem
    Set OlApp = CreateObject("Outlook.Application")
    Set ObjMail = OlApp.CreateItem(olMailItem)
    'Add To,CC,Subject,Body,etc here
    ObjMail.Save
End Function

【问题讨论】：

如果没记错的话，Outlook 和 Outlook Express 在代码方面是不相关的。
如果您想从客户端机器发送任何电子邮件，您需要一些电子邮件客户端应用程序。无论是 Windows Mail、Outlook Express、Windows Live Mail、Eudora、Thunderbird 等。或者将精心制作的文本文件写入网络共享，并在一台机器上使用 Outlook 宏来监控此共享。或者从网络共享启动便携式电子邮件客户端应用程序。
很公平。你推荐什么电子邮件客户端？我正在尝试通过 VBA 访问 MS Exchange 帐户，我只想将电子邮件保存为草稿，而不是实际发送（实际发送将由第二个人完成，他将检查其准确性）。跨度>

标签： vba ms-access ms-access-2010

【解决方案1】：

下载SendEmail 命令行实用程序。然后修改您的 VBA 以执行它。

Sub SendEmail(fromAddress As String, _
                   toAddress As String, _
                   subject As String, _
                   message As String, _
                   server As String, _
                   userID As String, _
                   userPass As String _
                   )
    Shell "sendemail.exe -f " & fromAddress & _
        " -t " & toAddress & _
        " -u " & subject & _
        " -m " & message & _
        " -s " & server & _
        " -xu " & userID & _
        " -xp " & userPass & _
        , vbNormalFocus
End Sub

【讨论】：

谢谢，但我可以使用此工具将电子邮件保存为 MS Exchange 服务器上的草稿，而不是发送它？人类需要先对其进行审查。我正在查看链接，但我认为我没有看到该选项。

【解决方案2】：

根据正在使用的 Exchange Server 版本，您可以尝试使用 CDO。我相信它应该能够创建一个 Exchange 会话，创建一个消息对象，然后将其放置在特定文件夹（即草稿）中。

有关详细信息，请查看有关 CDO here 的 MSDN 文章，并查找您可能需要的任何下载 here。

【讨论】：