Info Komputer SM, Artikel kali ini adalah tentang algoritma Hash SHA512. Hash merupakan algoritma One-Way Hash (Algoritma satu arah) yaitu algoritma yang cuma bisa melakukan enkripsi, sebaliknya tidak dapat melakukan dekripsi isi kembali. Algoritma Hash SHA521, berfungsi hanya untuk integritas data, yang mana data yang kita hash dapat diketahui jika terjadi perubahan.
Dibawah ini merupakan gambar yang akan dirancang untuk membuat aplikasi sederhana algoritma Hash SHA512, dengan Visual Studio 2010 (VB.Net):
Berikut Komponen:
Form1 "Text = Algoritma Hash SHA512 ; Name=FormSHA512"
Komponen
|
Text
|
Name
|
Label1
|
Algoritma Hash SHA512
|
Label1
|
Label2
|
Hash SHA512
|
Label2
|
TextBox1
|
Kosong
|
textplain
|
TextBox2
|
Kosong
|
textcipher
|
Buttons1
|
Proses Hash512
|
btnProsesHash
|
Berikut Source Codenya:
Imports System.Text
Imports System.Security.Cryptography
Public Class FormSHA512
Private Function SHA512(ByVal
SourceText As String)
Dim
a() As Byte =
Encoding.UTF8.GetBytes(SourceText)
Dim b
As Byte()
Dim c
As New SHA512Managed
b = c.ComputeHash(a)
'Dim d As
String = Convert.ToBase64String(b)
'Dim d As
String = BitConverter.ToString(b)
Dim d
As String = ""
For Each e As Byte In b
d &= e.ToString("x2")
Next
Return
d
End Function
Private Sub btnProsesHash_Click(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
btnProsesHash.Click
textcipher.Text =
SHA512(textplain.Text)
End Sub
End Class
|
Source Dibawah merupakan 3 Metode Hasila Hash SHA512, dari 2 tiga metode ini tidak bisa digunakan sekaligus.
1
'Dim d As String = Convert.ToBase64String(b)
2
'Dim d As String = BitConverter.ToString(b)
3
Dim d As
String = ""
For Each e As Byte In b
d &= e.ToString("x2")
Next
|
Semoga Bermanfaat!
0 Komentar:
Posting Komentar