Question

我有一个Access 2007客户数据库，我正在尝试向他们发送一封欢迎电子邮件，其中包含他们的计数器签署协议作为附件。我将他们的协议存储为客户表上的附件字段。文件将是.docx

MyMail.Attachments.Add Me.Agreement收到错误：运行时错误＆＃39;＆＃39;：对象不支持此属性或方法

我已经阅读了大量与我的问题类似的文章，但我似乎无法找到任何可行的文章。

'Open Outlook
Set MyOutlook = New Outlook.Application

'Creates the e-mail
Set MyMail = MyOutlook.CreateItem(olMailItem)

'Populates the fields
MyMail.To = Me.[ContactEmail]
MyMail.CC = Me.[repEmail]
MyMail.Subject = "Welcome to the evaluation program"
MyMail.Display
MyMail.HTMLBody = Me.[ContactName] & ":" & vbCr & vbCr & [strMessageBody] & vbCr & MyMail.HTMLBody
MyMail.Attachments.Add Me.Agreement

'Display it first
MyMail.Display

End Sub

Answer 1

Attachments.Add方法需要一个文件名为＆＃34; C：\ Myfile.txt＆＃34;。您可以将文件保存为数据库中的文件名，并将实际文件保存在另一个文件夹中，也可以使用SaveToFile方法从附件字段中保存文件。

如何将数据库附件字段作为电子邮件附件发送

1 个答案: