We help IT Professionals succeed at work.
Get Started

WIA driving me a little crazy. Can only transfer one file from common dialog box with Access/VBA

Last Modified: 2012-08-13
Lately I've been looking for a good solution for integrating Camera Stills into an Access 2007 database. Right now I'm settling on taking pictures with a Digital Camera and grabbing them with WIA. The problem I'm having is that I can only get the WIA generated common dialog box to give my one picture at a time, rather than allowing me to grab multiple pictures at once.

This is the common dialog box that I'm looking for, note that it says to grab more than one image hold shift or ctrl:
 WIA Commmon dialog multiple files
This is what mine looks like, it only allows one picture at a time:
 WIA common dialog box single file
I'm using windows 7 64 bit and access 2007, but tested the code on windows XP 32bit just to make sure. Also same result with 2 different cameras

I've tried this code:
    Dim Commondialog1 As WIA.CommonDialog
    Dim wiadevice As Object
    Dim wiadevice1 As Object
    Set Commondialog1 = New CommonDialog
    Set wiadevice = Commondialog1.ShowSelectDevice
    Set wiadevice1 = Commondialog1.ShowSelectItems(wiadevice)

Open in new window

And this code:
    Dim imfile As WIA.ImageFile
    Dim Commondialog1 As WIA.CommonDialog    
    Set Commondialog1 = New CommonDialog
    Set imfile = Commondialog1.ShowAcquireImage

Open in new window

Watch Question
Most Valuable Expert 2014
This problem has been solved!
Unlock 1 Answer and 2 Comments.
See Answer
Why Experts Exchange?

Experts Exchange always has the answer, or at the least points me in the correct direction! It is like having another employee that is extremely experienced.

Jim Murphy
Programmer at Smart IT Solutions

When asked, what has been your best career decision?

Deciding to stick with EE.

Mohamed Asif
Technical Department Head

Being involved with EE helped me to grow personally and professionally.

Carl Webster
CTP, Sr Infrastructure Consultant
Ask ANY Question

Connect with Certified Experts to gain insight and support on specific technology challenges including:

  • Troubleshooting
  • Research
  • Professional Opinions
Did You Know?

We've partnered with two important charities to provide clean water and computer science education to those who need it most. READ MORE