Solved

Taking a Picture with MS WIA

Posted on 2014-11-25
9
161 Views
Last Modified: 2014-11-28
Hi,

Using WIA (or it's replacement), how can I take a picture and show this in an MS Access form and report ?
imgPic on frmPictures has tblPictures.PicFilePathAndName as its control source.

Your assistance is greatly appreciated.

Kind Regards,
Mohamed
0
Comment
Question by:Mohamed Singh
  • 4
  • 3
  • 2
9 Comments
 
LVL 57
ID: 40466688
Rather than deal with low level WIA calls, you might want to purchase a control:

http://www.ammara.com/support/samples/access-wia-camera-control.html

Jim.
0
 
LVL 57
ID: 40466693
and by the way, depending on what your doing, dealing with the WIA object library directly may not be all that hard.  For example, it might be as simple as this:

Dim commondialog1 As Object
Dim img As ImageFile
Set commondialog1 = CreateObject("wia.commondialog")
Set img = commondialog1.ShowAcquireImage

img.SaveFile ("c:\test.jpg")

Jim.
0
 
LVL 57
ID: 40466697
I should add that on that link in the first comment, look at the very bottom and view the sample code for frmCapture

Some of it involves dealing with their control, but a lot of it shows you how to work with the WIA lib.

Jim.
0
Back Up Your Microsoft Windows Server®

Back up all your Microsoft Windows Server – on-premises, in remote locations, in private and hybrid clouds. Your entire Windows Server will be backed up in one easy step with patented, block-level disk imaging. We achieve RTOs (recovery time objectives) as low as 15 seconds.

 
LVL 26

Accepted Solution

by:
Nick67 earned 500 total points
ID: 40467230
@Jim

There are no longer any webcams that have WIA drivers, regrettably.
MS decided DirectShow should be the webcam's driver of choice -- but VBA has no DirectShow support.
That leaves WinAPI if you want a free, and freely distributable solution.

Like the sample attached :)

The sample is ROUGH.
It depends upon a working webcam being installed, and the folder c:\temppdf existing and being freely available.
frmPicParameters has two textboxes.
Enter the number of milliseconds you'd like between snapshots in the LOWER textbox. The upper is used to indicate that the app is active.
frmView is pointed at the images that get blown into c:\temppdf

Since this was for my own use only, I haven't sewn up the niceties
c:\temppdf must be empty
The webcam must exist and not being use by other applications
The error messages when things go BANG! are quite grievous, but the app works

Nick67
SnagImages-v2.mdb
0
 
LVL 57
ID: 40467300
He just said he wanted to take a picture...not sure it will be from a webcam.

Jim.
0
 
LVL 26

Expert Comment

by:Nick67
ID: 40467459
@Jim
:)
He's read my WIA articles and asked for this in an unrelated Q
http://www.experts-exchange.com/Database/MS_Access/Q_28566220.html
The phrasing there was using WIA to take a pic (using an attached camera/webcam)

Way back, I worked with point-and-shoots that, when jacked in with USB, could be triggered to take a picture.
None of the point-and-shoots in the outfit now (various models of Canon PowerShots) have that ability anymore.
Do you know of any?
0
 

Author Closing Comment

by:Mohamed Singh
ID: 40470896
Hi Nick67,
Thank You for your efforts, your contribution and for sharing your hard work.
Kindest Regards,
Mohamed
0
 

Author Comment

by:Mohamed Singh
ID: 40470899
Hi Jim,
Thank You for participating.
I will definitely keep DBPix in mind.
Kind Regards,
Mohamed
0
 
LVL 26

Expert Comment

by:Nick67
ID: 40470904
@Mohamed.

Your welcome.  I hope it serves the purpose.

Nick67
0

Featured Post

Ransomware: The New Cyber Threat & How to Stop It

This infographic explains ransomware, type of malware that blocks access to your files or your systems and holds them hostage until a ransom is paid. It also examines the different types of ransomware and explains what you can do to thwart this sinister online threat.  

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Entering time in Microsoft Access can be difficult. An input mask often bothers users more than helping them and won't catch all typing errors. This article shows how to create a textbox for 24-hour time input with full validation politely catching …
It’s been over a month into 2017, and there is already a sophisticated Gmail phishing email making it rounds. New techniques and tactics, have given hackers a way to authentically impersonate your contacts.How it Works The attack works by targeti…
In Microsoft Access, learn different ways of passing a string value within a string argument. Also learn what a “Type Mis-match” error is about.
In Microsoft Access, learn how to use Dlookup and other domain aggregate functions and one method of specifying a string value within a string. Specify the first argument, which is the expression to be returned: Specify the second argument, which …

810 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question