Hack Forums
Complete Keylogging tutorial (writing own keylogger 80-95% UD) - Printable Version

+- Hack Forums (https://hackforums.net)
+-- Forum: Hacks, Exploits, and Various Discussions (https://hackforums.net/forumdisplay.php?fid=45)
+--- Forum: Grayhat • Purple Team • Hybrid Security (https://hackforums.net/forumdisplay.php?fid=449)
+---- Forum: Beginner Hacking (https://hackforums.net/forumdisplay.php?fid=4)
+----- Forum: Hacking Tutorials (https://hackforums.net/forumdisplay.php?fid=47)
+----- Thread: Complete Keylogging tutorial (writing own keylogger 80-95% UD) (/showthread.php?tid=29260)

Pages: Pages 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54


- Jaws - Nov 27, 2008

nice tut, an uploader for it would be useful to


- paulm2008 - Dec 1, 2008

(Nov 18, 2008 01:59 AM)Viral Dragon Wrote:  Mmmm, great tutorial and interesting thing to do with VB. However, I need some help . *cries*.
I've done everything as instructed, re-reading the steps at least 5 times. Having done everything as I should have,
I hit the debug button like you instructed and i brought up Notepad, type miscellaneous junk such as "dfsdf sadf !@#$@#42312"
and waited 5 minutes (but in the coding i used an interval of suggested timing).

I tried this twice, one without saving the text, the other with saving the txt file.
after which I went to the designated path "c:\windows\klog.txt"
funny enough it wasn't there both times. I tried changing the path, and the name. neither worked, so I reverted it back to normal.

Now..my question is....what could I have possibly have done wrong?
Heres the code I typed in...mabey I made a mistake, but I doubt it.

I noticed on a few bits in your code you missed out a couple of bit an example from your code was this
Code
If GetAsyncKeyState(85) <> 0 Then
If shift = True Then
Label1.Caption = Label.Caption + "U"
shift = False
GoTo u
End If
Label1.Caption = Label1.Caption + "u"
End If
u:

You have used Label.Caption instead of Label1.Caption a good few times, also he said in tut to change the GoTo to something else 👍 not picking faults as im far from good at this but hope this might make a difference and pssssst i've still not got it going yet as i am just learning


- eXesoul - Dec 1, 2008

nice tut -:))


- hacker476 - Dec 2, 2008

wow nice! i will definitely read this over, and start to my keylogger thanx for this tut.


- Mathias - Dec 2, 2008

(Dec 1, 2008 04:00 PM)paulm2008 Wrote:  
(Nov 18, 2008 01:59 AM)Viral Dragon Wrote:  Mmmm, great tutorial and interesting thing to do with VB. However, I need some help . *cries*.
I've done everything as instructed, re-reading the steps at least 5 times. Having done everything as I should have,
I hit the debug button like you instructed and i brought up Notepad, type miscellaneous junk such as "dfsdf sadf !@#$@#42312"
and waited 5 minutes (but in the coding i used an interval of suggested timing).

I tried this twice, one without saving the text, the other with saving the txt file.
after which I went to the designated path "c:\windows\klog.txt"
funny enough it wasn't there both times. I tried changing the path, and the name. neither worked, so I reverted it back to normal.

Now..my question is....what could I have possibly have done wrong?
Heres the code I typed in...mabey I made a mistake, but I doubt it.

I noticed on a few bits in your code you missed out a couple of bit an example from your code was this
Code
If GetAsyncKeyState(85) <> 0 Then
If shift = True Then
Label1.Caption = Label.Caption + "U"
shift = False
GoTo u
End If
Label1.Caption = Label1.Caption + "u"
End If
u:

You have used Label.Caption instead of Label1.Caption a good few times, also he said in tut to change the GoTo to something else 👍 not picking faults as im far from good at this but hope this might make a difference and pssssst i've still not got it going yet as i am just learning

thanks, will edit


- slot - Dec 2, 2008

Hi everybody and thank u mathias for this great tut.Seems though that i got a problem uploadin the log text file to my ftp server.Any suggestion?i've tried 2 different ftp servers and when im tryin to upload somethin else on the ftp everything goes normal..Anyway ty again :))


- InuyashaITB - Dec 3, 2008

Hey, im making it in the VB you uploaded and after i folowed the instructions i got this error:
only comments can be added to an end


- nxghacker_remy - Dec 4, 2008

its very helpful for me... keep posting the tutorials in all hacking methods..so new entries can learn more...


- foffo - Dec 4, 2008

Mathias: Thank you for explaining this


- nxghacker_remy - Dec 5, 2008

great help...


- cc2 - Dec 5, 2008

Where am i suppost to place this code:

If GetAsyncKeyState(number) <> 0 then
'code to execute if key is pressed
end if

?


- paulm2008 - Dec 5, 2008

(Dec 5, 2008 10:51 AM)cc2 Wrote:  Where am i suppost to place this code:

If GetAsyncKeyState(number) <> 0 then
'code to execute if key is pressed
end if

?

^^^^^^^this is an example in the tut, it goes in in timer1 you should start with this for keystroke "a" (65)

If GetAsyncKeyState(65) <> 0 Then
If shift = True Then
Label1.Caption = Label.Caption + "A"
shift = False
GoTo b
End If
Label1.Caption = Label1.Caption + "a"
End If
b:

you will need to repeat this for every letter and numbers 0-1 hope this helps :thumbsup


- cc2 - Dec 5, 2008

BTW the shift thingy doesn't work, but when i press a, it says a :D


- Mathias - Dec 5, 2008

(Dec 5, 2008 11:32 AM)cc2 Wrote:  BTW the shift thingy doesn't work, but when i press a, it says a :D

works if you did it right


- paulm2008 - Dec 5, 2008

^^^^^^ yes agree mines is working does anyone no the keycode value for the following keys i will do the two, one without shift and one with

-_

=+

@'

~#

?/

i have searched but still have not found away to look again 😧