Nam*_* VU 22 microsoft-outlook scheduled-tasks sendmail
我需要在一天中的特定时间发送一些电子邮件,并且每天都需要这样做。如何使用 Outlook 执行此操作?
Delay delivery有助于在特定时间发送邮件;但是如何创建明天要发送的新邮件?

kmo*_*ote 28
好的,这是对执行此操作的一种方法的快速说明。它需要在 Outlook VBA 编辑器中设置一个宏。如果您以前从未这样做过,那么您必须先进行一些设置。(请注意,虽然为 Outlook 创建宏并不难,但有几个地方可能会发生错误,这会导致混乱和沮丧。如果您是初学者并想继续,我强烈建议您仔细阅读整个 MSDN 页面链接到下面的第一步。)
1. 打开 VBA 编辑器。
在 Outlook 功能区栏上,单击开发工具选项卡(在此处启用),然后单击Visual Basic。如果您的功能区栏上没有“开发人员”选项卡,则必须启用它。请参阅此 MSDN 页面上的说明(向下滚动到标有“启用开发人员选项卡”的部分。注意:您还应该阅读该站点标有“启用宏”的部分)。按下Visual Basic按钮将打开一个全新的应用程序(VBA 编辑器);打开ThisOutlookSession,中间的大窗格是您的宏所在的位置。
要使用,请按 Alt+F11 打开 VBA 编辑器,然后复制代码并将其粘贴到 ThisOutlookSession 中。(参考)

2. 在宏窗格底部粘贴以下宏。
'Original function written by Diane Poremsky: http://www.slipstick.com/developer/send-email-outlook-reminders-fires/
Private Sub Application_Reminder(ByVal Item As Object)
Dim objMsg As MailItem
Set objMsg = Application.CreateItem(olMailItem)
If Item.MessageClass <> "IPM.Appointment" Then
Exit Sub
End If
If Item.Categories <> "Automated Email Sender" Then
Exit Sub
End If
objMsg.To = Item.Location
objMsg.Subject = Item.Subject
objMsg.Body = Item.Body
objMsg.Send
Set objMsg = Nothing
End Sub
Run Code Online (Sandbox Code Playgroud)
3. 创建一个新类别。
新创建的 Category ( how to ) 应该被调用Automated Email Sender(这是一个任意的标题,但如果你改变它,一定要在宏中改变它)。
4. 创建日历约会。
将收件人电子邮件放在“位置”字段中。
约会的“主题”字段将用作电子邮件的主题字段。
约会的“正文”将是电子邮件的正文。
设置约会以按您想要的任何时间表重复。一定要设置提醒。
设置提醒时间
另外,不要忘记分配您在上一步中创建的类别。
首先通过在位置字段中输入您自己的电子邮件地址来测试它。

就是这样!只要您的宏安全设置设置正确,只要在指定类别的约会上触发提醒,此宏就会自动发送一封电子邮件。
| 归档时间: |
|
| 查看次数: |
121519 次 |
| 最近记录: |