|
摸索了一番,终于找到了Outlook定期发送邮件的方法。发现很多人有这个需求,发个帖,供大家参考。
发布自定义任务窗体
1. 启动 Outlook 并打开您的任务文件夹。
2. 在 操作 菜单上单击 新建任务。
3. 在 工具 菜单上指向 窗体,然后单击 设计该窗体。
4. 在 窗体 菜单上单击 查看代码,,并在脚本编辑器中键入以下代码:
Sub Item_PropertyChange(ByVal Name)
Select Case Name
Case "Status"
if Item.Status = 2 then '2 = Completed
Set NewItem = Application.CreateItem(0)
NewItem.To = "myemailaddress@myisp.com"
NewItem.Recipients.ResolveAll
NewItem.Subject = "This is the message subject text"
NewItem.Body = "This is text that will appear in the body of the message."
NewItem.Display
End IF
End Select
End Sub
5. 在脚本编辑器中,在 文件 菜单上单击 关闭。
6. 在 工具 菜单上指向 窗体,然后单击 发布窗体。
7. 在 查找范围 列表中单击 任务。在 显示名称 和 窗体名称 框键入 提醒,然后单击 发布。
8. 在 文件 菜单上单击 关闭。 不保存更改。
注: 在该的代码替换为您自己的 NewItem.To、 NewItem.Subject 和 NewItem.Bod y 引号内的信息。这些行设置 为、 主题,和提醒邮件的正文。
回到顶端
创建使用自定义窗体的定期任务
1. 打开您在其中发布自定义提醒窗体在任务文件夹。
2. 在 操作 菜单上单击 新建提醒。这将打开一个新的任务,根据您的自定义窗体。
3. 键入您的提醒任务的主题。在 截止日期,单击以从日历中选择到期日期。单击以选中 提醒 复选框。
4. 在 操作 菜单上单击 重复周期,,并设置希望发送该提醒邮件的频率。
5. 单击 保存并关闭。
回到顶端
为电子邮件发送提醒
当您收到该提醒,该任务的截止时,单击 打开项目。在 状态 框中单击以选中 完成。
-或者-
消除该提醒,并在任务列表中单击 已完成。
设置为已完成的任务将自动生成新任务,并显示电子邮件并在其中包含您可反复套用的文字。单击发送邮件的 发送。
参考链接:http://support.microsoft.com/kb/239087/zh-cn |
|