关于Outlook自动、定时发送邮件 自动定时发送邮件

Outlook 只支持延时发送,但没有按计划任务发送的功能。你还是到WEB里设置定点发送邮件,很方便的。
如果你一定要在客户端实现,可以试试其他方法配合实现了。
需要的工具有3个:Windows计划任务,VBS脚本,Outlook2007(其实这个也可以不需要,但你电脑上一定要安装正确)
1. 制作自动发送邮件的VBS脚本
我是将邮件另存为一个邮件模板,由VBS直接调用发送的,实现如下:
①写好邮件,包括收件人、抄送人、内容等,与正常写邮件一样;
②Outlook2007中,选择菜单"文件另存为",保存类型选择"Outlook模板(*.oft)",填好文件名保存(文件名最好英文);
③写VBS脚本,内容如下,可以复制后保存为后缀名为.vbs的文件:
Call SendMail
Sub SendMail()

DimOutApp
DimOutMail
DimstrBody

Set OutApp =GetObject("", "Outlook.Application")
IfErr.Number > 0 Then
Err.Clear
Set OutApp = CreateObject("Outlook.Application")
If Err.Number > 0 Then
MsgBox "Could not create Outlook object.", vbCritical
Exit Sub
End If
End If
关于Outlook自动、定时发送邮件 自动定时发送邮件
OutApp.Session.Logon
Set OutMail= OutApp.CreateItemFromTemplate("C:ReserveTempLab.oft")'这里根据你模板的保存位置修改

WithOutMail
.Send
EndWith

Set OutApp =Nothing
Set OutMail= Nothing
'MsgBox "Themail has been sent successful."
End Sub
④设计Windows计划任务
通过"开始程序附件系统工具计划任务"打开Windows计划任务工具,选择"添加计划任务",然后"下一步","浏览"选中上面的VBS脚本,然后设置你要重复的周期(每天、每周、每月...),"下一步"设置开始时间,最后一路"下一步"完成设置。

  

爱华网本文地址 » http://www.413yy.cn/a/25101014/193334.html

更多阅读

声明:《关于Outlook自动、定时发送邮件 自动定时发送邮件》为网友疯狂的粉分享!如侵犯到您的合法权益请联系我们删除