Vba 通过Outlook从Access发送电子邮件，允许收件人通过邮件回答调查

我正试图通过Outlook从Access发送一封电子邮件，其中包含两个按钮，将报告回Access数据库

这可能吗？我知道如何发送电子邮件，只是不知道如何在outlook邮件中添加按钮（如果可能的话）

如果这是不可能的，那么我将只发送一个通知，用户将不得不打开一个前端表单，并单击手动接受或拒绝

---

提前感谢。

Outlook宏存储在Outlook模板中，似乎不适合分发

AFAIK不支持在

Outlook.MailItem

中包含宏——这是您正在描述的功能，例如，向邮件添加

FormControls

（命令按钮等），它将执行一个向DB报告的子例程

你可以使用投票按钮。假设您有一个对象变量（如

mItem

）来表示

Outlook，则可以将它们添加到邮件项目中。邮件项目

：

mItem.VotingOptions = "Yes;No;Maybe"

单击后，您将收到一封回复电子邮件

---

您可能可以从Access使用VBA定期查询您的inobx，解析这些收到的电子邮件，并添加到DB。

是的，我正在寻找添加控件。基本上是批准控制和拒绝控制，电子邮件将发送给经理。我希望它能回复Access，但我喜欢在收件箱中检查收到的回复。我必须在Outlook中对VBA做更多的研究，因为我只熟悉Access。您的

mItem.VotingOptions

是您在Access中的

.MailItem

中放置的东西吗？谢谢

.VotingOptions

是

邮件项的属性之一。如上所述，如果您有一个对象变量
mItem
。。。因此
mItem
只是一个表示
Outlook.MailItem
的对象变量。无法使用事件处理程序添加控件。这是无法做到的，因为那不是可以存储.bas模块的地方。最终，您将从access执行vba，只需添加对Outlook对象库的引用，这将允许您从access子例程中控制Outlook。