我在访问中创建了一个基本表单,其中包含一个附件字段和一个按钮,当单击该按钮时,会打开一个窗口,允许用户通过电子邮件发送上传到表单的所有附件的名称。我用:
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,我想在电子邮件中发送所有三个名字。任何帮助表示赞赏
答案 0 :(得分:0)
附件有几个属性
Attachments.FileName
您可以尝试查询
"SELECT ID, {attachmentfieldname}.FileName FROM {TABLE}"
并过滤记录ID
" WHERE ID = 1"
(注意:远离电脑,需要检查一下)