Foro de elhacker.net

tengo un problema con mi codigo que hace capturas de pantalla cada segundo ya que luego no me marca error y a veces si

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
 
 
Private Sub Form_Load()
Timer1.Interval = 1000
Me.Hide
End Sub
 
Private Sub Timer1_Timer()
Timer1.Enabled = True
keybd_event 44, 0, 0&, 0&
Call SavePicture(Clipboard.GetData(vbCFBitmap), App.Path & "\miarchivo.jpg")
 
End Sub
 

Ayuda pliss

que error te marca?
agregale DoEvents... al final del sub del Timer

Me marca error 521 error en tiempo de ejecusion

No se puede copiar a portapapeles

agregale un antes de guardar/salvar la imagen...
tambien puede ser porque esta "ocupado" el portapeles digamos que tienes archivos en el portapapeles y da la casualidad que
copiaste esos archivos y los esta pasando, por dar un ejemplo...

me marca error: 424 se requiere objeto

Clipboard.GetData ?? WTF ??? eso es de .NET, creo que estas confundiendo codigo de .NET con visual basic 6...

Para nada!¡, claro que es vb6  >:D, y el problema que tiene es que no tubo la desencia de agregar un timer a su proyecto por que de hecho funciona perfectamente el codigo!¡.

 
option explicit
 
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
 
Private Sub Form_Load()
    keybd_event 44, 0, 0&, 0&
    Call SavePicture(Clipboard.GetData(vbCFBitmap), "c:\miarchivo.bmp")
End Sub
 
 

P.D.: Es mejor usar los Device Context...

Dulces Lunas!¡.

cierto, ya me habia olvidado lo del clipboard.

jeje ya lo solucione

le agrege un on error resume next

tipico...

Dulces Lunas!¡.

pero con eso no se soluciona el problema :/
con eso solo "parchas" el error y continua el programa lo legible es hace un programa
que no te debe dar ningun error no planeado :P
por cierto yo escribi mal el "Clipboard" :xD
si solo lo copiaste y lo pegaste :xD

siempre es mejor capturar el error, a veces caundo se usa sockets es necesario ponerlo, pero sino fijate si lo podes solucionar.

jeje no no lo pegue e di cuenta de q lo escibiste mal....

 ;-) :D :D :D :D :D :D :D