Access快速开发平台--通用附件功能保存必须要上传附件的示例；添加附件不能为空的代码

时　间:2023-12-27 08:01:25
作　者:麥田   ID：11  城市：上海  QQ：3002789054
摘　要:Access快速开发平台使用通用附件，请问新增记录的时候，如何要求必须上传附件呢？
正　文:

请问老师，我用Access快速开发平台开发的软件，使用通用附件功能，请问新增记录的时候，如何要求必须上传附件呢？

二、解决方法：
      在新增编辑窗体的保存按钮代码里面，加如下代码：

'附件不能为空
If Me.sfrAttachments.Form.txtCurrent = "(无)" Then
    MsgBox "你输入的数据在保存的时候没有添加附件，该单据必须上传附件，请添加至少一个附件！", vbCritical, "警告"
    Me.sfrAttachments.SetFocus
    Exit Sub
End If

如果代码不会改的，请下载示例参考用法，就可以学会了。

示   例:

点击下载此盟威Access快速开发平台V2.6.6版(32位).zip附件

图   示:

1、如果保存记录时候没有添加附件，则弹出如下提示：

2、添加至少一张图片或者附件上传功能，则才能保存记录成功，如下图：