JavaScript is not enabled!...Please enable javascript in your browser

جافا سكريبت غير ممكن! ... الرجاء تفعيل الجافا سكريبت في متصفحك.

الصفحة الرئيسية

حول السرفر الخاص بك الي Base64

السلام عليكم ورحمة الله وبركاتة

يعاني الكثير من كثرة التلغيم في البرامج الخاص 

بي تحويل السيرف اليbase64

الاول ايه base64؟يسرفك نفسك خوارزم base64

base64 من افضل الخواريزم في عمالية التشفير في سهولة التعامل معه طبعا 

هيبقي انشاء في دروس ازي تشفر بيه بي نفسك وشرح مفصل ليه 

اما الان خلينا في موضوعنا النهرده يسرفك نفسك خوارزم base64

الادوات : 


عدد3 
Button

عدد1
textbox

عدد1

RichTextBox

وعدد1
OpenFileDialog

ودي صورة توضحيه


طيب ناتي الان لي الاكواد :

اول Button1

 Dim a As New OpenFileDialog With            {                .Filter = "exefiles (.exe) | *.exe"                }        If a.showdialog = Windows.Forms.DialogResult.OK Then            TextBox1.Text = a.FileName        End If



ثاني Button2

الكود

RichTextBox1.Text = Convert.ToBase64String(IO.File.ReadAllBytes(TextBox1.Text))
ثالث
Button3

Clipboard.SetText(RichTextBox1.Text)


وده الكود كامل 


Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim a As New OpenFileDialog With
            {
                .Filter = "exefiles (.exe) | *.exe"
                }
        If a.showdialog = Windows.Forms.DialogResult.OK Then
            TextBox1.Text = a.FileName
        End If
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button2.Click
        RichTextBox1.Text = Convert.ToBase64String(IO.File.ReadAllBytes(TextBox1.Text))
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Clipboard.SetText(RichTextBox1.Text)
    End Sub 
End Class

ويارب يكون الشرح مفهوم حولت اوضحو علي قد مقدر

وايضا ده البروجيكت جاهز كامل ^^

لتحميل : PRINSOFHACKER

تحيات فريق     
SilEnTCybERS TM

الاسمبريد إلكترونيرسالة