webcam to capture images and save to file, URGENT!!

I have a web cam im using to show live video in my MS access form, but i want to beable to snap the image and save to file.(sort of like the windows movie maker works , in XP)

so far im using VideoCapFree activex to capture live video.... but how can i take snap shots and save it to .jpg, .bmp.etc?
heres my code:

_------------------

Option Compare Database

Private Sub Command1_Click()
 Me.VideoCap1.Stop
   
End Sub

Private Sub Command16_Click()


End Sub

Private Sub Command2_Click()
On Error GoTo Err_Command2_Click

Dim Bx, Hwn, Scnav As Boolean
Scnav = ScanControl.ScannerAvailable
Select Case Scnav
Case True

'check for file type being used

DoCmd.GoToControl "piclocation"
If InStr(piclocation.Text, ".bmp") Then
VideoPreview1.FileType = BMP_Bitmap
ElseIf InStr(piclocation.Text, ".awa") Then
VideoPreview1.FileType = AWD_MicrosoftFax
ElseIf InStr(piclocation.Text, ".tif") Then
VideoPreview1.FileType = TIFF
End If

'Uncomment the next line to give user scan preferences
'ScanControl.ShowScanPreferences


DoCmd.GoToControl "piclocation"
ScanControl.Image = piclocation.Text



 Me.VideoCap1.Start

'names the file in this case I named it by combining ID and Last Name
Me.Imagepath = Me.NameID & Me.LastName & ".bmp"
Exit Sub

Case False
MsgBox "Scanner is Busy!" + vbCrLf + "Try Again Later.", vbInformation, "Scanner: Busy!"
Exit Sub


End Select
Err_Command2_Click: MsgBox Err.Description

End Sub

Private Sub Command3_Click()
'comment out the next line to select the default cam/scanner
ScanControl.ShowSelectScanner
'VideoCap1.Devices
End Sub
--------------------

please let me know how to add a save image feature..
or if you might know of a better way please let me know!!

I reply quickly~