一 Outlook延遲傳遞 1.1 新建一封郵件,,點(diǎn)擊“選項-延遲傳遞” 1.2 在“傳遞不早于”設(shè)置中選擇自己需要的時間 1.3 點(diǎn)擊發(fā)送之后,,郵件會一直存在發(fā)件箱中,達(dá)到設(shè)置的時間點(diǎn)時才會發(fā)送回去 二 設(shè)置每天定時發(fā)送郵件 2.1 在Outlook客戶端打開開發(fā)工具 依次點(diǎn)擊“文件-選項-自定義功能區(qū)”,,在右邊的功能區(qū)勾選開發(fā)工具 2.2 通過VBA編輯器編輯代碼 點(diǎn)擊“開發(fā)工具-VBA編輯器”,,在ThisOutlookSession對象中輸入以下代碼,保存,; 'Original function written by Diane Poremsky: http://www./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 2.3 創(chuàng)建一個名為Automated Email Sender的分類 新建一個約會,,點(diǎn)擊“分類-所有類別”,新建Automated Email Sender類,; 2.4 創(chuàng)建一個日歷約會 主題欄中填寫郵件的主題,,地點(diǎn)欄填寫收件人地址,內(nèi)容欄填寫郵件的內(nèi)容,,提醒時間設(shè)置為0,,重復(fù)周期根據(jù)自己的需求,分類選擇剛才創(chuàng)建好的Automated Email Sender類
|
|