0

我在 MS Access 应用程序中有一个作为表格链接的 Exchange 邮箱。这主要用于阅读，但我也希望能够将消息“移动”到另一个文件夹。

不幸的是，这并不像在第二个链接邮箱中写入那么简单，因为显然我无法编辑某些字段。一些关键字段，如 To: 字段不可用，因为我收到以下错误

“字段 'To' 基于表达式，无法编辑”。

在这里使用CreateObject("Outlook.Application")不是一个选项，因为据我所知，这会在从 Access 调用时提供一个安全对话框。

任何解决方案？*

4

2 回答 2

1

这是两个问题吗？可以使用 Move 方法移动邮件。这是一个片段：

 Set oApp = CreateObject("Outlook.Application")

Set oNS = oApp.GetNamespace("MAPI")

Set oMailItems = oNS.GetDefaultFolder(olFolderInbox)
Set itm = oMailItems.Items(6)
itm.Move oNS.GetDefaultFolder(olFolderDeletedItems)

但是，收件人（收件人）是只读的，我相信，即使是 Outlook Redemtion。

于 2008-09-19T14:44:42.777 回答
0

我不认为 Access 是适合这项工作的工具。您将无法使用 Outlook.Application 对象或 MAPI 包装器（如 CDO）。CDO 将是更优雅、更高效的方式，但它必须通过 Office 安装程序显式安装在客户端上。

如果您想避免脚本安全对话框（以及一些一般的 CDO 功能），您应该尝试使用Outlook Redemption。

Redemption 是 CDO 的直接替代品，当您之前进行任何 CDO/Outlook VBA 编码时，您会立即熟悉它。

于 2008-10-07T13:20:17.213 回答