Important alert: (current site time 10/2/2014 12:00:54 AM EDT)
 

winzip icon

Capture Video from you Webcam (the best)

Email
Submitted on: 10/29/2001 8:41:23 AM
By: Chris Wilson UK  
Level: Advanced
User Rating: By 36 Users
Compatibility: VB 6.0
Views: 88897
(About the author)
 
     Capture motion or still images from your webcam to clipboard / file! Does not use any extra .dll's or .ocx's! I DID NOT WRITE THIS CODE Author: E. J. Bantz Jr. But its real good so I thought i'd share it!

 
winzip iconDownload code

Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.Virus note:All files are scanned once-a-day by Planet Source Code for viruses, but new viruses come out every day, so no prevention program can catch 100% of them. For your own safety, please:
  1. Re-scan downloaded files using your personal virus checker before using it.
  2. NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
  3. Scan the source code with Minnow's Project Scanner

If you don't have a virus scanner, you can get one at many places on the net including:McAfee.com

 
Terms of Agreement:   
By using this code, you agree to the following terms...   
  1. You may use this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
  2. You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.   
  3. You may link to this code from another website, but ONLY if it is not wrapped in a frame. 
  4. You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.


Other 12 submission(s) by this author

 


Report Bad Submission
Use this form to tell us if this entry should be deleted (i.e contains no code, is a virus, etc.).
This submission should be removed because:

Your Vote

What do you think of this code (in the Advanced category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor (See voting log ...)
 

Other User Comments

10/29/2001 2:42:26 PMUltimatum

There might be some people that will say "If the original author wanted to share it, then he would have." But I say thanks =)
(If this comment was disrespectful, please report it.)

 
10/29/2001 4:13:47 PMAnonymous

I experienced problems unzipping this file. Do i need to download the newest winzip version?
(If this comment was disrespectful, please report it.)

 
10/30/2001 11:04:36 AMChris Wilson

yeah well it said it may be distributed freely.

is the zip file nackered?? if it is i'll post it again..?
(If this comment was disrespectful, please report it.)

 
10/31/2001 12:34:50 PMElias from NY

Nice code. It works fine on my computer.
The ZIP file is just fine...

Thanks for sharing!

This code deserves 5 planets and that's what it is getting from me!

(If this comment was disrespectful, please report it.)

 
11/1/2001 3:15:33 PMAlfredo_Cpp


wwwwoooowwwwww  
Thanks for sharing!
It's very Usefull for me 

And the Zip File is OK

(If this comment was disrespectful, please report it.)

 
11/19/2001 2:05:53 AMShawn

Works great for me. Thanks a lot.
(If this comment was disrespectful, please report it.)

 
3/26/2002 8:44:25 AMAmar

Brilliant! Just brilliant!
This must be the single best peice of code i have seen on PSC!

My compliments to the author and the distributor!
(If this comment was disrespectful, please report it.)

 
4/6/2002 10:17:20 PMPhil

A super program - I've searched for something like this for 3 days... Thanks to you, and also PSC.

(If this comment was disrespectful, please report it.)

 
4/8/2002 4:26:50 AMAtul tak

thanx i am really searched for it
i wanna to do video conferencing through it
can u help me
(If this comment was disrespectful, please report it.)

 
4/13/2002 6:40:52 AMNeomancer (not necromancer)

Woo! Hoo!! welp.. thanks for that code!! Its easy when you see it!!

Nice sharing man!
(If this comment was disrespectful, please report it.)

 
6/3/2002 12:53:44 AMKevin Pirkl

FWIW Looks suspiciously a lot like the code found on http://www.shrinkwrapvb.com/ ... If your looking for even better examples and tutorials check out shrinkwrapvb.
KP
(If this comment was disrespectful, please report it.)

 
6/3/2002 2:44:08 AMJohn Galanopoulos

Excellent work. Congratulation to both coder and the friend who posted it.
(If this comment was disrespectful, please report it.)

 
6/7/2002 2:49:36 AMMr.Ruturaj Vilas Patki

Nice code. I'm developing an OCX for Video Conferencing. Your Code will help me in that !

Good one.
(If this comment was disrespectful, please report it.)

 
8/10/2002 3:47:36 PMYKK

I'm not really uunderstand wat is this for? Can u guys pls explain its function and how to use it to me? Thank u.
(If this comment was disrespectful, please report it.)

 
8/16/2002 12:45:29 PMJoe Shmoe

I have been looking for a way to add webcam to the instant messenger IM making. Thanx
5 Planets here(I would give you more...)
(If this comment was disrespectful, please report it.)

 
11/3/2002 1:26:40 PMDavid Bue Pedersen

I can get the code to work on my Windows 2000 workstation at home. When trying to run the code on Windows XP the API calls return a
(If this comment was disrespectful, please report it.)

 
11/5/2002 4:45:24 PM

Does anyone know how to rebuid a frame from the VideoData array from the Myframecallback into a DC?
I need to do this soooo bad!

jamestheguy@hotmail.com


(If this comment was disrespectful, please report it.)

 
11/28/2002 12:09:40 AM

Sorry I didnt vote for this code.But I never vote.Because I dont want to hurt any feelings.I wanna be everyone's friend.But anyways love the code this will help me through my years of coding.Thanx to both of u people for doin a job well done!!
(If this comment was disrespectful, please report it.)

 
1/13/2003 4:15:43 AM

I am not able to download this code. I would be very thankful if u email me this code or give a url from where i can download this code.

regards
Puneet
(If this comment was disrespectful, please report it.)

 
3/19/2003 7:57:15 PM

COMMENT YOUR CODE!
(If this comment was disrespectful, please report it.)

 
7/10/2003 3:15:13 AM

I am unable to download could you please send me the zipfile?
(If this comment was disrespectful, please report it.)

 
8/1/2003 7:12:13 PMrFFf

Dude, thanks! I needed this to port into a Trojan. ;-)
(If this comment was disrespectful, please report it.)

 
8/18/2003 11:55:42 PM

nice code.. but how can i make it to be able to be viewed on the other pc??
like video conference??

(If this comment was disrespectful, please report it.)

 
8/24/2003 4:39:53 PM

Thanx a million for this... i really needed something like this... thanx a gain
(If this comment was disrespectful, please report it.)

 
10/7/2003 4:48:07 AM

it will be better if you explain how to execute VB script.
(If this comment was disrespectful, please report it.)

 
10/29/2003 12:13:41 PMJesse Hart

Great code. Thanx for sharing it! I am going to use it in an upcoming trojan/rat project. Keep on sharing!
(If this comment was disrespectful, please report it.)

 
10/29/2003 9:04:10 PM

thanks alot it really helps...... Hope to hear you soon guys.....

Thanks in a million :)
(If this comment was disrespectful, please report it.)

 
11/10/2003 1:29:01 PM

Thanks!!.. this really help me...
this program its asome!!
(If this comment was disrespectful, please report it.)

 
11/25/2003 4:06:37 PM

This looks awsome, will it also record audio?
(If this comment was disrespectful, please report it.)

 
2/23/2004 9:21:07 AM

Elo, Thanks for this great program you share with us. One thing i,m curious, how do i save an image file as jpg using that program? thanks again
(If this comment was disrespectful, please report it.)

 
2/23/2004 9:21:30 AM

Elo, Thanks for this great program you
share with us. One thing i,m curious,
how do i save an image file as jpg
using that program? thanks again

(If this comment was disrespectful, please report it.)

 
3/4/2004 2:18:55 PMEshaq Amir

Did this work in windowsXP??
(If this comment was disrespectful, please report it.)

 
6/1/2004 12:26:54 PM

Hellow! thanks for sharing a wonderful stuff with us. "GREAT"!
Will this work with other OS like Win2000 or NT?, or even XP?
(If this comment was disrespectful, please report it.)

 
7/24/2004 7:23:17 PMLev Shamilov

Finally, somthing that works !!! Thanks !!!
(If this comment was disrespectful, please report it.)

 
3/5/2005 7:40:43 AMUK-DesignTeam

How do you get it to capture and save 1 frame as a bmp to file?
(If this comment was disrespectful, please report it.)

 
3/28/2005 7:42:29 AMbammylove

my name is victoria and this game is wonderful,i am a female programmer and i give you 5 globes for this,pls can you send the compiled version of this code to me,i will like to have one on my computer,if it needs any OCX,you can as well send it to me through this email bammington@yahoo.com this is cool,keep it up and dont forget to send it to me,pls Victoria says great job
(If this comment was disrespectful, please report it.)

 
10/5/2005 3:23:01 PMBurningmace

Brilliant code.
I've fixed a few bugs with the camera enumeration, replace the Form_Load in frmSelect.

Private Sub Form_Load()
Dim lpszName As String * 100
Dim lpszVer As String * 100
Dim x As Byte
Dim lResult As Boolean
Dim Caps As CAPDRIVERCAPS
'// Enumerate installed drivers
For x = 0 To 9
lResult = capGetDriverDescriptionA(x, lpszName, 100, lpszVer, 100) '// Retrieves driver info
If lResult Then cmboSource.AddItem lpszName
Next x
'// Get the capabilities of the current capture driver
lResult = capDriverGetCaps(lwndC, VarPtr(Caps), Len(Caps))
'// Select the driver that is currently being used
If cmboSource.ListCount = 0 Then
MsgBox "Error: No devices found!"
Exit Sub
End If
If lResult Then cmboSource.ListIndex = Caps.wDeviceIndex
End Sub
(If this comment was disrespectful, please report it.)

 
12/25/2005 12:22:38 PMChris O

Cool code, i got a webcam today and i have used this program before... works on windows xp pro
(If this comment was disrespectful, please report it.)

 
3/13/2007 5:36:13 AMhalcon

Excellent work. Congratulation from Colombia
(If this comment was disrespectful, please report it.)

 
8/30/2007 9:51:10 AMEleusmario Mariano Rabelo

It seems that it contains malicious code, when executing it erased my username and password of Internet connection!
(If this comment was disrespectful, please report it.)

 
4/18/2009 12:01:33 PMJorge Enrique Romn Cadenas

Muy Buen Codigo!!!!!
(If this comment was disrespectful, please report it.)

 

Add Your Feedback
Your feedback will be posted below and an email sent to the author. Please remember that the author was kind enough to share this with you, so any criticisms must be stated politely, or they will be deleted. (For feedback not related to this particular code, please click here instead.)
 

To post feedback, first please login.