win7系统设置outlook自动更新邮件方法

时间：2015-07-24 16:16:33

发布者：haibin

来源：当客下载站

　　目前outlook邮件收发软件还是被多人使用着，在日常的工作中，我们经常会遇到需要每天定时发送邮件的情况。但是很多客户端软件的定时发送只能生效一次，而且邮件的附件还不能定时更新。其实ontlook都可以实现这些功能呢，具体该如何操作，请看小编在雨林木风win7系统中的操作。

　　1、编制自动方案代码，首先启动Outlook2010，然后按下Alt+F11组合键，启动VBA编辑器，在代码窗口左侧点击ThisOutlookSession，然后在右侧代码窗口中输入如下代码：

　　Sub Application_Startup()

　　Set oApp = Outlook.Application

　　Set oMessage = oApp.CreateItem(olMailItem)

　　oMessage.To = "wangxiang169@163.com "

　　oMessage.Subject = "每日报表 "

　　oMessage.Attachments.Add ("E:\新建文件夹\每日报表.xls ")

　　oMessage.Send

　　Set oMessage = Nothing

　　Set oApp = Nothing

　　End Sub

　　ps：以上代码中的oMessage.To = 后面是收件人地址，oMessage.Subject =指的是邮件标题，而oMessage.Attachments.Add则指的是所添加的附件文件路径。

　　2、输入完毕，检查无误后，点击“保存”按钮，然后关闭Outlook，这段代码的作用是当启动Outlook时，新建一封邮件，自动添加附件，并将此发邮件予以发送。

　　3、制定自动发送任务，首先执行“开始→程序→系统工具→任务计划”命令，选择“添加计划任务”，然后单击“下一步”，在弹出的任务计划向导的程序列表中，选择Microsoft Outlook 2010，在随之弹出的向导对话框中选择执行此任务的循环周期，如“每天”，单击“下一步”按钮，在弹出的对话框中设置起始时间以及日期，如16：30，单击“下一步”按钮;

　　4、然后在弹出的用户名以及密码设置对话框中，输入你登录本机的用户名以及密码(必需输如)，然后单击“下一步”，最后单击“完成”按钮就可以了，这样，当每周的星期五就会自动将带有附件的邮件自动发送到指定邮箱了，很简单吧。

　　注意：如果服务中的任务计划程序没有运行，运行上面设置的任务计划时，会提示错误，这时候，可以执行“开始→程序→管理工具→服务”命令，将其中的Task Scheduler设置为“自动”，然后予以启动即可解决。