elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Tutorial básico de Quickjs


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Ayuda sobre captura de ventanas
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Ayuda sobre captura de ventanas  (Leído 1,707 veces)
Ismy

Desconectado Desconectado

Mensajes: 79



Ver Perfil
Ayuda sobre captura de ventanas
« en: 15 Enero 2006, 17:53 pm »

Estoy programando un keylogger,

La parte de las teclas esta ventilada ya, estoy en la parte de capturar la ventana activa, pero tengo problemas, porque al poner que me envie la ventana:

Código:
Handle = GetForegroundWindow()
Longitud = GetWindowTextLength(Handle) + 1
Texto = Space(Longitud)
Retorno = GetWindowText(Handle, Texto, Longitud)
ventana = Left(Texto, Longitud - 1)
Text1.Text = Text1.Text & ventana & vbCrLf

Me la pone muchas veces, es decir, en el log me aparece:

Código:
Ventana activa
Ventana activa
Ventana activa
Ventana activa
Ventana activa
Ventana activa

Entonces hice que si la ventana era lo mismo que la que ya habia, no hiciera nada. Quedó asi:

Código:
ventana2 = "vacio"
If ventana <> ventana2 Then
Text1.Text = Text1.Text & ventana & vbCrLf
ventana2 = ventana

Como veis, primero le digo que la variable ventana2 es "vacio" ( por ejemplo )
Despues, si la ventana activa no es "vacio",  agrega al log la ventana, y hace que la variable ventana2 sea lo mismo que la ventana actual. Asi si la ventana sigue siendo la misma, esta no se pondrá en el Text.

Pero queda igual, en el text sigue saliendo

Código:
Ventana activa
Ventana activa
Ventana activa
Ventana activa
Ventana activa
Ventana activa

Creo que me he expresado con claridad jeje
A ver que hago mal, Gracias

Salu2


En línea

sch3m4
Ex-Staff
*
Desconectado Desconectado

Mensajes: 1.608

Nihil est in intelectu quod prius not fuerit insen


Ver Perfil WWW
Re: Ayuda sobre captura de ventanas
« Respuesta #1 en: 15 Enero 2006, 18:02 pm »

debes cojer el hwnd de la ventana activa, entonces después:

Código:
if Ventana_Activa = GetForegroundWindow() then
'notificas las teclas
else
'capturas teclas
end if


En línea

SafetyBits

"Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.(..
Ismy

Desconectado Desconectado

Mensajes: 79



Ver Perfil
Re: Ayuda sobre captura de ventanas
« Respuesta #2 en: 15 Enero 2006, 18:12 pm »

La verdad no lo entendí bien

Aclaro que la forma que estoy usando para capturar las teclas es la de las apis de windows, no la de hoooks. ( ya se que es mejor, pero eso es otra cosa)
En línea

sch3m4
Ex-Staff
*
Desconectado Desconectado

Mensajes: 1.608

Nihil est in intelectu quod prius not fuerit insen


Ver Perfil WWW
Re: Ayuda sobre captura de ventanas
« Respuesta #3 en: 15 Enero 2006, 18:33 pm »

lo sé. te digo, que para saber si la ventana ha cambiado, debes de hacer lo anterior. Si el hwnd de la ventana nueva es el mismo que el de la ventana activa, por eso te digo que compares el valor que tienes guardado de GetForegroundWindow, con el valor actual de GetForegroundWindow.

Código:
ventana = getforegroundwindow()
do while (1)
if ventana = getforegroundwindow() then 'si la ventana no ha cambiado
'sigues capturando teclas con getasynckeystate
else 'la ventana ha cambiado
'guardas las teclas, etc.
ventana = getforegroundwindow() 'muy importante esta linea
end if
loop
En línea

SafetyBits

"Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua.(..
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Consulta sobre ventanas Undecorated
Java
zonahurbana 1 2,177 Último mensaje 13 Septiembre 2014, 20:34 pm
por GCODE
Consulta sobre cierre de ventanas
Java
portocarrerojava 1 1,372 Último mensaje 6 Enero 2016, 04:14 am
por 0xFer
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines