Tuesday, January 2, 2018

Kriptografi Base 64 dengan Visual Basic .NET

1:14 PM





Base64 adalah istilah umum untuk sejumlah skema pengkodean serupa yang mengkodekan data biner dan menerjemahkannya ke dalam representasi basis 64. Istilah Base64 berasal dari konten pengkodean MIME tertentu. (Wikipedia, 2010)

Berikut code dan penjelasan terhadap program kriptografi base 64 sederhana. 

Code
Penjelasan

Imports System.Security.Cryptography
Public Class Form1

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        Dim base64Decoded As String = TextBox1.Text
        Dim base64Encoded As String
        Dim data As Byte()
        data = System.Text.ASCIIEncoding.ASCII.GetBytes(base64Decoded)
        base64Encoded = System.Convert.ToBase64String(data)
        TextBox1.Text = base64Encoded
    End Sub

    Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click
        Dim base64Encoded As String = TextBox1.Text
        Dim base64Decoded As String
        Dim data() As Byte
        data = System.Convert.FromBase64String(base64Encoded)
        base64Decoded = System.Text.ASCIIEncoding.ASCII.GetString(data)
        TextBox1.Text = base64Decoded
    End Sub
End Class

Import library cryptography
Inisialisasi form1
Inisialisasi ketika button1 di klik maka
Menggunakan base64 melaluli library cryptography untuk enkripsi teks pada textbox1
Tampilkan teks pada textbox1 hasil dari enkripsi


Inisialisasi ketika button2 di klik maka teks pada textbox1 yang di enkripsi akan di deskripsi dengan base64



Tampilkan teks pada textbox1 hasil dari deskripsi
  

Semoga bermanfaat

Written by

nerd by nature

0 komentar:

Post a Comment

Baca Juga

 

© 24page. Some rights resevered.

Back To Top