[VB.Net] Mendapatkan MD5 Checksum Suatu File

google images

Hai, ini adalah blog yang baru saya buat..
Blog ini merupakan blog ke-2 saya.
Blog pertama saya adalah amzkomp
Kali ini, saya akan memberi tahu "Mendapatkan MD5 Hash Suatu File dengan VB.net"

Apakah itu MD5?
MD5 adalah  algortima yang didesain atau dibuat oleh Profesor Ronald Rivest pada tahun 1991, MD5 ini biasa digunakan untuk aplikasi keamanan dan untuk melakukan pengujian integritas suatu file.

Nah, bagaimana cara mendapatkannya di VB.net?
Ini dia caranya, Disini saya menggunakan VS Community 2013
1. Buka VB.net agan. Maka akan muncul tampilan seperti ini

2. Tambahkan 2 label, 2 textbox dan 1 button pada form
     label1.text = Lokasi file
     label2.text = MD5
     button1.text = Get MD5

3. Tuliskan kode deklarasi pada form.

Kode ::

Imports System
Imports System.IO
Imports System.Text
Imports System.Security.Cryptography

4. Tuliskan atau copy kode ini

Kode ::

Function GetMD5(ByVal filePath As String) Dim md5 As MD5CryptoServiceProvider = New MD5CryptoServiceProvider
Dim f As FileStream = New FileStream(filePath, FileMode.Open, FileAccess.Read, FileShare.Read, 8192)
f = New FileStream(filePath, FileMode.Open, FileAccess.Read, FileShare.Read, 8192)
md5.ComputeHash(f)
f.Close()
Dim hash As Byte() = md5.Hash
Dim buff As StringBuilder = New StringBuilder
Dim hashByte As Byte
For Each hashByte In hash
buff.Append(String.Format("{0:X2}", hashByte))
Next Dim md5string As String
md5string = buff.ToString()
Return md5string
End Function

     Kode diatas adalah kode untuk menghasilkan checksum MD5
5. Masukkan kode ini untuk mendapatkan checksum dari file

Kode ::

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TextBox2.Text = GetMD5(TextBox1.Text)
End Sub

     textbox1 diisi dengan lokasi file yang ingin dicari checksumnya. ketika button1 diklik maka          checksum MD5 dari file yang ada di textbox1 akan ditampilkan pada textbox 2

Kode diatas akan menjadi seperti ini

6. Klik "Start" yang ada di menubar. ketik lokasi file yang ingin di cari MD5 checksumnya

Nah, bagaimana? Apakah berhasil?
Untuk memudahkan saya sertakan source codenya.
Silahkan download source codenya di sini
Password : amzkomp.blogspot.com

Nah, begitulah Cara Mendapatkan MD5 Checksum Suatu File dengan VB.net

Semoga artikel ini bermanfaat ya.