如何实现自动保存报表到指定目录,自动发送报表到指定到指定邮箱

fan0217 · 发表于 2006-1-13 20:23:00

应该是：注意红色的部分

Dim stDocName As String

stDocName = "R_Report"
DoCmd.SendObject acSendReport, stDocName, acFormatRTF, "43544@163.com", , , "Report", "Report", False

fan0217 · 发表于 2006-1-13 20:44:00

这个例子是将报表以附件的形式发送。

winner · 发表于 2006-1-13 21:09:00

我加了DoCmd.SetWarnings False语句,它还是弹出警告框,而且邮箱收不到发出的邮件,怎么回事?(发送邮件时不用保存到D盘的ACCESS目录)

winner · 发表于 2006-1-13 21:13:00

补充:我已改了自己的邮箱号,但仍收不到邮件.

fan0217 · 发表于 2006-1-13 23:43:00

我在我的电脑上调试通过，在我的邮箱也收到了发送的邮件，主要看看你的Outlook的配置。

我的例子是把报表用附件的形式发送的，所以需要导出。

用SendObject发送就不需要了导出文件了。

winner · 发表于 2006-1-14 00:15:00

fan0217:那你用SendObject发送,是否会出现警告框?那个存在不美观,而且还要按"是"的按钮,麻烦!

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[报表] 如何实现自动保存报表到指定目录,自动发送报表到指定到指定邮箱

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)