Mas Sehat | Blog Tentang Kesehatan | Mas Sehat ~ Blog Tentang Kesehatan | www.mas-sehat.com

Mendapatkan MD5 Checksum Suatu File dengan VB.net

MD5
google images

Hai, Sudah lama sekali tidak posting di blog ini.
Sudah hampir setahun saya tidak posting di blog ini.
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
VB.net
2. Tambahkan 2 label, 2 textbox dan 1 button pada form
     label1.text = Lokasi file
     label2.text = MD5
     button1.text = Get MD5
VB.net

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
VB.net

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


vb.net




VB.net


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.
Terima kasih telah membaca artikel tentang Mendapatkan MD5 Checksum Suatu File dengan VB.net di blog Blognya Ardiant jika anda ingin menyebar luaskan artikel ini di mohon untuk mencantumkan link sebagai Sumbernya, dan bila artikel ini bermanfaat silakan bookmark halaman ini di web broswer anda, dengan cara menekan Ctrl + D pada tombol keyboard anda.

Artikel terbaru :

Mas Sehat | Blog Tentang Kesehatan | Mas Sehat ~ Blog Tentang Kesehatan | www.mas-sehat.com