Access弹出文件选择对话框让用户选择图片或照片

2002-03-05 17:09:00
lzj_freedom-Office中国
原创
1004

Access弹出文件选择对话框让用户选择图片或照片



我有个表,里面有姓名,性别和附加的照片

如何让用户可选择照片文件,即弹出个窗口让用户选择

解决办法:
在Access窗体上放一个CommonDialog对话框控件,再放一个command按钮,加入如下代码
    dim strFilePathName as String
    With CommonDialog 'CommonDialog 是控件名
        .DialogTitle = "打开"
        .CancelError = False
        'ToDo: 设置 common dialog 控件的标志和属性
        .Filter = "显示文件 (*.gif)|*.gif"
        .ShowOpen
        If Len(.FileName) = 0 Then
            Exit Sub
        End If
        strFilePathName = Trim(.FileName)
    End With
其中strFilePathName 就是路径+文件名

如果不想使用第三方控件,可以使用Access的Application.Filedialog

可以参考下面的相关Access技巧文章:

1. 【Excel VBA】FileDialog 用法之 打开对话框获得文件夹路径

2.  access图片文件保存到数据库的通用技巧-Access经典源码剖析

分享