|
Metode dan Algoritma | Enkripsi MD5, SHA, DES dan RSA dengan Bahasa VB.NET . Anda bisa melakukan konsultasi tentang Enkripsi MD5, SHA, DES dan RSA dengan Bahasa VB.NET melalui form di samping kanan !!!
Penulis pernah membahas cara enkripsi menggunakan algoritma MD5, SHA, DES dan RSA pada C#.NET, bagaimana dengan bahasa kembarannya yaitu VB.NET. Berikut ini caranya :
Jika anda menggunakan bahasa pemrograman VB.NET, sebenarnya anda juga dapat melakukan lebih banyak tipe enkripsi, baik MD5, SHA, DES, RSA dsb. Caranya gunakan kode program di bawah ini :
Jangan lupa menambahkan import library berikut :
Imports System.IO
Imports System.Security.Cryptography
Imports System.Text
Kemudian tambahkan kode program di bawah ini :
Dim str As String = "abcdef"
Dim enc As Encoder = System.Text.Encoding.Unicode.GetEncoder()
Dim unicodeText As Byte()
unicodeText = DirectCast(Array.CreateInstance(GetType(Byte), str.Length * 2), Byte())
enc.GetBytes(str.ToCharArray(), 0, str.Length, unicodeText, 0, True)
Dim objmd5 As MD5 = New MD5CryptoServiceProvider ' Untuk enkripsi MD5'Dim objmd5 As MD5 = New SHA1CryptoServiceProvider() ' Untuk enkripsi SHA1'Dim objmd5 As MD5 = New DESCryptoServiceProvider() ' Untuk enkripsi DES'Dim objmd5 As MD5 = New RSACryptoServiceProvider ' Untuk enkripsi RSADim result As Byte() = objmd5.ComputeHash(unicodeText) Dim sb As StringBuilder = New StringBuilder()
Dim i As Integer
For i = 0 To result.Length - 1Anda dapat mengganti "abcdef" dengan kata yang anda butuhkan, dan menggunakan tipe enkripsi yang lain yang anda inginkan dengan mengaktifkan baris berikut :
sb.Append(result(i).ToString("X2"))
Next
Me.Text = sb.ToString()
'Dim objmd5 As MD5 = New MD5CryptoServiceProvider ' Untuk enkripsi MD5'Dim objmd5 As MD5 = New SHA1CryptoServiceProvider() ' Untuk enkripsi SHA1'Dim objmd5 As MD5 = New DESCryptoServiceProvider() ' Untuk enkripsi DES'Dim objmd5 As MD5 = New RSACryptoServiceProvider ' Untuk enkripsi RSA

Related Post :

Judul: Enkripsi MD5, SHA, DES dan RSA dengan Bahasa VB.NET
Rating: 100% based on 99998 ratings. 5 user reviews.
Ditulis Oleh hank2
Rating: 100% based on 99998 ratings. 5 user reviews.
Ditulis Oleh hank2
Anda sedang membaca artikel tentang
Enkripsi MD5, SHA, DES dan RSA dengan Bahasa VB.NET, Semoga artikel tentang Enkripsi MD5, SHA, DES dan RSA dengan Bahasa VB.NET ini sangat bermanfaat bagi teman-teman semua, jangan lupa untuk mengunjungi lagi melalui link
Enkripsi MD5, SHA, DES dan RSA dengan Bahasa VB.NET.
{ 0 komentar... Views All / Send Comment! }
Posting Komentar