cheap alternative to Access Imagine

[arnelgp]

sample picture-capturing database.
currently saving the image (bmp) to external folder.
but can also be save to an Attachment field.
the codes are not that organized so modify it as you wish.
the code comes from an excel forum with some modification
to adapt with msa.
code is 32 bit and 64 bit compatible.
tested on msa 2019 x64.
any questions, ask the original author 'coz I have not fully review the code.

 

[arnelgp]

found this error (Module1) while trying to run on x32 msa.

#Else
Private Declare Function GetDC Lib "user32" (ByVal hWnd As LongPtr) As LongPtr

should be change to:

#Else
Private Declare Function GetDC Lib "user32" (ByVal hWnd As Long) As Long

 

[isladogs]

@arnel
As mentioned in a PM to you yesterday, I've tested this repeatedly in Access 2010 32-bit but nothing happens when I take a snapshot. Do others have any success with it?
Setup Camera seems to do nothing. Setup Video gives a choice of front/rear camera. I've tried both! After clicking Take Snapshot the capture screen stays black

Also there is no GetDC declaration. There are GetWindowDC and GetDeviceCaps APIs.
All APIs look fine in 32-bit

As a side note, there is some useful code here such as getting the width of the nav pane which I may steal

 

[arnelgp]

i've tested it now with a2010 x32 and it worked.
i am using WIA so it may or may not detect your camera (step 1).
if on step 2, you can see the video running, then you can capture the snapshot of the video.

 

[isladogs]

Just to be clear, are you suggesting adding the Microsoft Windows Image Acquisition Library reference?
I just tried it but it had no effect.
What should happen when the Setup Camera button is clicked?

One more question - what is Access Imagine? Typo?

 

[isladogs]

OK - just tried it again on 2 more PCs - A2010 32-bit & A365 64-bit
After an initial crash its working on both of those but still not working on the Windows tablet I started testing with.

To answer my own question the WIA library reference isn't needed
And I assume Imagine is a typo for Imaging?

 

[isladogs]

For info, I've just discovered that Access Imagine is a commercial product available as shareware with a developer licence
It is available here: https://access.bukrek.net/ but I haven't tried it