Bueno este es el problema
Fijense q les deje detallado el error!!
uso el codigo de cJpg mensionado en este post.
http://foro.elhacker.net/index.php/topic,135071.msg635582.html#msg635582
La verdad no tengo idea
Código [Seleccionar]
Private Sub Command1_Click()
Dim Captura As New cJpeg
Captura.SetSamplingFrequencies 2, 2, 2, 2, 2, 2
Captura.Quality = 70 ' aqui se ajusta la calidad, entre 1 y 100
Captura.SampleScreen 'Me da error aca
Captura.SaveFile ("c:\" & "\mu" & ".jpg")
End Sub
Fijense q les deje detallado el error!!
uso el codigo de cJpg mensionado en este post.
http://foro.elhacker.net/index.php/topic,135071.msg635582.html#msg635582
La verdad no tengo idea