عکس گرفتن در برنامه با وبکم

[msh_gold]

با سلام خدمت دوستان عزیز من می خوام توی برنامم با یه وبکم عکس بگیرم و در یه picturebox نمایش بدم ممنون می شم اگه دوستان نمونه برنامه یا کدی دارن برام بزارن:تشویق:

[msh_gold]

با سلام دوستان کسی نیست که به ما کمک کنه

[hadiit]

يه سري به اين لينك بزن

http://www.vb-helper.com/howto_net_video_capture.html

[nokhodsiah2001]

درود

از این کد می تونی استفاده کنی




Private Sub CaptureImage()
Dim data As IDataObject
Dim bmap As Image
'---copy the image to the clipboard---
SendMessage(hWnd, WM_CAP_EDIT_COPY, 0, 0)
'---retrieve the image from clipboard and convert it
' to the bitmap format
data = Clipboard.GetDataObject()
If data.GetDataPresent(GetType(System.Drawing.Bitmap) ) Then
bmap = _
CType(data.GetData(GetType(System.Drawing.Bitmap)) , _
Image)
PhotoPictureBox.Image = bmap
' PhotoPictureBox.Dock.Fill()

StopPreviewWindow()
Else
PhotoPictureBox.Image = My.Resources.InterDefault


End If
Me.TopMost = True
End Sub


پیروز باشی

[nokhodsiah2001]

برای صدا زدنش هم کافیه اینو بدی




mImageFilePath = "bmp"
CaptureImage()



اینا هم یادت نره



Private mImageFile As Image
Private mImageFilePath As String