کد و دی کد کردن اطلاعات

سلام.
خیلی از این سوالات دیدم میپرسن
تا چند وقت پیش هم منم سوال داشتم و کلی تو سایت برنامه نویس گشتم تا پیدا شد.
کار راحتی اما برای راحت تر شدنش کلاسشو میذارم
برای این کار شما فقط باید رشته ای که میخواهید کد کنید به همراه کلیدی که می خواهید بر اساس آن کد شود رو برای این کلاس بفرستید و برای دی کد کردن آن رشته کد شده به همراه کلید را برای متد این کلاست می فرستید
این کار بیشتر برای query string code decode به کار میره
مثلا مثل همین سایت

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim a As New ClassLibrary1.Farshad_Code_Decode

        Label1.Text = a.CodeString(TextBox1.Text, TextBox2.Text)

    End Sub

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim a As New ClassLibrary1.Farshad_Code_Decode

        Label1.Text = a.DeCodeString(Label1.Text, TextBox2.Text)

    End Sub

 

مرسی دوست عزیز . من خیلی وقت بود دنبال یه همچین کدی میگشتم . راستی الگوریتم کد کننده شما چیه؟

یه چیز دیگه . . .
میشه سورس هم بزارید؟

با تشكر از دستمون كه مقاله هاي خوبي در اين بخش مي زاري
میشه سورس هم بزارید؟

دوست من یه سرچ بکنی پیدا میکنی من توی همین سایت کدشو پیدا کردم گفتم کامپوننت کنم دوستن را حت باشن
از الگوریتمی که 3 بار MD5 رو اجرا میکنه و کد میکنه