如何从访问表单中获取多个附件的名称

时间:2015-11-13 21:41:10

标签: forms vba ms-access access-vba attachment

我在访问中创建了一个基本表单,其中包含一个附件字段和一个按钮,当单击该按钮时,会打开一个窗口,允许用户通过电子邮件发送上传到表单的所有附件的名称。我用:

Dim bodytext As String
bodytext = Me.Field1.FileName
DoCmd.SendObject acSendNoObject, stDocName, acFormatXLS, "person123@gmail.com", , , "mysubject", bodytext, True

我使用bodytext作为字符串来保存附件的名称,并且能够拉出表单上显示的当前附件。什么是列出该表单中附件的所有名称的方法。我的最终目标是能够发送所有附件的所有名称的电子邮件。Screenshot of the form.

例如,如果我上传了三个文件:attachment1.txt,attachment2.txt和attachment3.txt,我想在电子邮件中发送所有三个名字。任何帮助表示赞赏

1 个答案:

答案 0 :(得分:0)

附件有几个属性

Attachment Properties

Attachments.FileName

您可以尝试查询

"SELECT ID, {attachmentfieldname}.FileName FROM {TABLE}"

并过滤记录ID

" WHERE ID = 1"

(注意:远离电脑,需要检查一下)

https://support.office.com/en-za/article/Attach-files-and-graphics-to-the-records-in-your-database-d40a09ad-a753-4a14-9161-7f15baad6dbd#bm4