Webcam OCX

[DCrake]

Does anyone know of a good shareware/freeware webcam ocx that I can use within an Access 2007 form?

I need it to set up a photo badge printing applet. I have one already but apparantly it only allows landscape format and it is hard to position the photo in top right of label.

We use the VideoCap OCX control from VisCom software

FYI, one issue I still have with the webcam control is it takes landscape pictures, and most ID card designs use portrait orientation. In theory we could cover the left and right of the image with a box, but that makes the report too big to fit on one page in some cases where you need a photo near the edge of the card.

 

[rainman89]

I know you probably thought of this, but instead of looking for a new ocx, What if you turn the camera on its side? Is the picture too long then?

 

[DCrake]

That did cross my mind but how do you go on when you have an inbuilt webcam on the laptop screen.

 

[Banana]

Just wondering if it's possible that there exists a C/C++ DLL that you can consume via Declare functions instead that maybe allow more control than you had via OCX?

 

[rainman89]

That did cross my mind but how do you go on when you have an inbuilt webcam on the laptop screen.

Ah Laptop.... hmmm.... no way i know of besides turning the laptop on its side...

 

[jdraw]

David,

I recently bought a Logitech C600 and was wondering if it could be used with Access. I have 2003 on XP sp3.

I set up a form and code that I found here
http://forums.quickcamteam.net/showthread.php?tid=140

The discussion says it works in Acc2007. However, I installed the
Windows® Image Acquisition Automation Library v2.0 and the appropriate .dll but find trying to get the captured photo in an image on the form quite a challenge. I'm sure you have tried this and more, and that this is the issue you are trying to solve. ...centering the photo etc...

Anyway, just my 2 cents for what it may be worth.

Also, I did try google-ing and did not find anything better than the link I gave above.

jack

 

[MMaynard]

I use WIA to resize and crop images in a VWI database at work.
WIA also has filters for rotate as well. I have added a rotate filter to my procedure here as an example
ImageToSize is the path and file name of the original image,
ImgFinal is the Path and image name of the final image

Public Sub ResizeVWI_Image(ImageToSize As String, ImgFinal As String)

Dim Img
Dim IP

Set Img = CreateObject("WIA.ImageFile")
Set IP = CreateObject("WIA.ImageProcess")

Img.LoadFile ImageToSize

IP.Filters.Add IP.FilterInfos("Scale").FilterID
IP.Filters.Add IP.FilterInfos("RotateFlip").FilterID
IP.Filters(1).Properties("MaximumWidth") = 600
IP.Filters(1).Properties("MaximumHeight") = 600
IP.Filters(2).Properties("RotationAngle") = 90

Set Img = IP.Apply(Img)
If FileFolderExists(ImgFinal) Then 'Check for existing image
Kill ImgFinal 'If it exists delete it
Img.SaveFile ImgFinal 'Save new image
Else
Img.SaveFile ImgFinal 'save new image
End If

End Sub

 

[jdraw]

Thanks MMaynard.

I have adapted your Resize procedure and I think it could work to adjust the photo size. Previously I only got part of the original photo in the Image, but with resizing, I can adjust to get the entire photo in a given box.

I commented out your rotate (90) line and adjusted the size to 60 by 60.

I think adjusting the size of the photo might work for David-- at least worth a try.
jack

 

[MMaynard]

Glad to help