Create your own data encryption program

Create a data encryption program in Notepad in 3 minutes!

How?

All you need is Notepad++ (maybe a regular Notepad). If you are ready to get started!

Open Notepad ++ and paste the code below this paragraph. Then click on "Save As.." and select "All files" below, and for the name type "encrypt .vbs" (you can do anything else but it must be at the end of .vbs ).

set x = WScript.CreateObject("WScript.Shell")
mySecret = inputbox("Input password and press OK for encryption")
mySecret = StrReverse(mySecret)
x.Run "%windir%\notepad"
wscript.sleep 1000
x.sendkeys encode(mySecret)


function encode(s)
For i = 1 To Len(s)
newtxt = Mid(s, i, 1)
newtxt = Chr(Asc(newtxt)+5)
coded = coded & newtxt
Next
encode = coded
End Function

Save it somewhere, e.g. on the desktop.

Now open Notepad++ again and paste that SAME Code again. But now we have to change something.

Find line number 12 and at the end of the line you will see that it says "+5"

All you have to do is delete that Plus (+) and replace it with Minus (-).

Save this file in the same way as the first one, but put "decrypt.vbs " for the name

You now have 2 files, the first to encrypt your password and the second to decrypt.

More about Encryption at this link.