Título: KeyLogger (Por decirle de una manera) Publicado por: igustin en 5 Marzo 2013, 07:43 am Vengo haciendo un "KeyLogger" y lo quiero lograr es que al clickiar una ventana me diga su nombre en el .txt que ya he creado. Lo logre :D pero al tiepo de depurarlo me salta un error:
Título: Re: KeyLogger (Por decirle de una manera) Publicado por: igustin en 5 Marzo 2013, 07:51 am Public Class Form1
Private Declare Function GetForegroundWindow Lib "user32" () As Long Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long Y he añadido la Private Function: Private Function GetActiveWindowTitle() As String Dim MyStr As String MyStr = New String(Chr(0), 100) GetWindowText(GetForeGroundWindow, MyStr, 100) MyStr = MyStr.Substring(0, InStr(MyStr, Chr(0)) - 1) Return MyStr End Function Pero al tiempo de depurarlo me sale el siguente error: En: GetWindowText (Getforegroundwin-dow, mystr, 100) El mesaje: Unable to find an entry point named 'GetForegroundWindow' in DLL 'user32.dll'. please in charge Alguien sabe porque?? Soy novato y como ven he creado el post varias veces porque he trato de adjuntarlo a las etiquetas, las cuales no he encontrado todavia. Título: Re: KeyLogger (Por decirle de una manera) Publicado por: crifesma en 28 Marzo 2013, 15:38 pm con poco conocimiento que tengo, creo que deberías haber hecho la misma declaración para ambas funciones
Título: Re: KeyLogger (Por decirle de una manera) Publicado por: Crazy.sx en 29 Marzo 2013, 04:33 am Hola, mirá. Yo también hice un keylogger con todos los "chiches" y me funciona de lo más bien. Aquí te dejo una clase que hice para capturar el nombre de la ventana activa.
Espero que te sirva: Código
Saludos. Título: Re: KeyLogger (Por decirle de una manera) Publicado por: Eleкtro en 3 Abril 2013, 19:42 pm Eso es lo que pasa por querer hacer las cosas con un Copy/Paste de códigos antiguos de Windows XP o de VB6 xD.
El error es que estás usando el tipo Long, modifica todos los Long por Integer, y listo, funciona. Saludos! |