Bloquear teclado y mouse en vb6

[nicogranelli]

Alguien sabe como bloquear el teclado y el mouse, como así también, la combinación Ctrl + Alt + Delete en Visual Basic 6?

[Jorge_Mota]

checa esto.


Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Activate()
'KPD-Team 2000
'URL: http://www.allapi.net/
'E-Mail: [email protected]
DoEvents
'block the mouse and keyboard input
BlockInput True
'wait 10 seconds before unblocking it
Sleep 10000
'unblock the mouse and keyboard input
BlockInput False
End Sub

[nicogranelli]

Lo único que no me bloquea el Ctrl + Alt + Delete, o por lo menos no lo hace en XP. Ya lo voy a proabr en w98

[nicogranelli]

Esto no bloque el teclado y el mouse, sino que todo el sistema, no?

[Jorge_Mota]

El Alt Ctrl Delete
y creo que la Tecla Windows
no las vas a poder bloquear en NT, XP, W2k

esto por la razon que forman parte del sistema
en si.

y si la api, te elimina el input del sistema desde
el teclado y el mouse.

[nicogranelli]

o sea que por ejemplo yo podría recivir una peticion a traves de winsock en de esperar x segundos para volver a activar el sistema.

O sea, la api no me bloquea la llegada, por ejemplo, de informacion a traves del winsock

[Jorge_Mota]

Correcto.

Esa es la idea, aunque la persona quiera no lo podra activar.

tu pormedio de Winsock, o un archivo flag
podrias tener un timer que cada x tiempo

revise por ese flag. y en base a eso active un contador.
y cuando llege a x valor (tiempo) vuelva a desactivarlo.

[nicogranelli]

Muchisimas Gracias