我需要从带有附件的MS Access数据库发送电子邮件(不是Access对象,但是单独的文件),但不能绑定到任何一个电子邮件软件(Groupwise,Outlook等) )。我找到了使用Groupwise和Outlook发送带附件的电子邮件的代码,并且通用DoCmd.SendObject
只显示支持附加Access对象。有没有办法从Access发送带附件的电子邮件,无论用户的PC上配置了哪个电子邮件客户端?
理由:此处有软件推广的复杂性。我工作的机器安装了Access 2013和Outlook 2013。数据库的用户正在运行Access 2010,但是当我在2013年将数据库编译成.accde时,它在2010上不起作用。我能让它工作的唯一方法是在更老的PC上运行它也运行访问2010.但是,这台旧PC没有Outlook,IT无法在其上安装Outlook。这意味着我无法使用Outlook库编译数据库,因为计算机上没有Outlook库。
答案 0 :(得分:2)
以下是我使用Gmail发送电子邮件的代码:
AttachedFiles
smtpserver
是一个字符串或一个字符串数组,表示要附加到电子邮件的文件或文件的完整路径。
CDO.message 是Microsoft Windows对象
您可以将{{1}}的值替换为其他邮件服务。如果您这样做,请务必修改其他参数。
代码基于我在网络上找到的代码。