Access快速开发平台--对上传附件及图片功能限制附件上传的文件大小示例；控制上传图片与附件的文件大小

时　间:2024-11-22 09:21:00
作　者:麥田   ID：11  城市：上海  QQ：3002789054
摘　要:Access快速开发平台上传附件功能可以限制附件上传的大小吗？
正　文:

      可以，先判断文件大小，再决定是否可以上传；

以下代码是根据获取的文件大小，进行代码控制限制：

If FileLen("D:\测试.jpg") / 1024 > 10240 Then

    MsgBox "该文件太大，超过10M了，请重新选择文件上传"

    Exit Sub
End If

如   图：

获取附件的文件大小

控制上传文件不超过10M

下面我们以Access快速开发平台的环境中，上传下载功能为例，制作的示例请参考：

'对保存附件超过10M的文件，限制附件上传的文件大小代码
If FileLen(varItem) / 1024 > 10240 Then
    MsgBox "该附件文件太大，超过10M了，请重新选择文件格式较小的附件上传！！"
    Exit Sub
End If

附   件：

盟威Access快速开发平台V2.6.6版(32位).zip示例

盟威Access快速开发平台V2.6.6版(64位).zip示例

图   示：