Encryption and Decryption of Modual

[ConnorGD]

So basically i'm doing a collage project that involves me creating a real life system for a company. And I Have designed a system for a Counselling company called Arch, and they would like most of the information about the client encrypting and decrypting. However I would like to know how to encrypt my module so that any data saved to them files is encrypted. I would really appreciate it if someone helped me out with this. P.s iv read up on DES encryption and 3DES Encryption but I'm not sure how to incorporate that into my system. Below is what my module looks like and the forms that serve as the input into the module.

[2ndmessiah]

I know even less than yo do, but the .net framework does have encryption classes.

would this help.

http://msdn.microsoft.com/en-us/libr...v=vs.110).aspx

[Toph]

Here's a MSDN Encoding and Decoding class. I just modified it to make it easier to use. If you understand functions in vb.net you will understand this fairly easily.

Here's the pastebin of the class. Add a new class in vb
http://pastebin.com/HuniffTd

Here's how you'd call the class.

Public Class Form1

    Dim Simple As New Simple3Des("Toph")  ''// This is the Key

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        TextBox2.Text = Simple.Encode(TextBox1.Text)
    End Sub

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        TextBox3.Text = Simple.Decode(TextBox2.Text)
    End Sub

End Class 

If you want I can send you the sample project I created to demonstrate this but I'm not sure if that's against the rules of this forum.

The only problem is where you're going to store the key. Because ideally it shouldn't be in the vb.net app. But then again this is just a college work so its not like they'll care, as long as you can encrpyt and decrpyt you should be fine. And if you want to read a encoded text from the database just do.

Dim MyText As String = *Get text from my database*
Messagebox.Show(Simple.Decode(MyText)) ''simples.

if you want to encode.
Dim MyName As String = Simple.Encode("My Name is Toph")
Messagebox.Show(MyName)

[ConnorGD]

Thank you so much man i would love to see your sample project, that would help me out a lot! and yea I understand what you wrote. Thank you