Home » , , , , , , » Aplikasi Enkripsi-Deskripsi Sederhana Pada Visual Basic

Aplikasi Enkripsi-Deskripsi Sederhana Pada Visual Basic

 

Enkripsimerupakan proses untuk mengubah plainteks menjadi chiperteks.Planteks sendiri adalah data atau pesan asli yang ingin dikirim, sedangkan Chiperteks adalah data hasil enkripsi.Definisi lain tentang Enkripsi adalah proses mengacak data sehingga tidak dapat dibaca oleh pihak lain.
Berikut cara membuat Aplikasi Enkripsi dan Deskripsi data sederhana menggunakan visual basic :
  1. Desain Form seperti gambar berikut : 


    2. Masukkan Coding dibawah ini :


Private Sub Command1_Click() 'tombol enkripsi
Dim Enkrip, Output, Inputan As String
Dim Panjang_Input As Integer
Inputan = Text1.Text
Panjang_Input = Len(Text1.Text)

For i = 1 To Panjang_Input
Enkrip = Mid(Inputan, i, 1) 'ambil karakter input
Enkrip = Asc(Enkrip) 'ubah karakter ke ascii
Enkrip = (Enkrip + 20) - 43 'key + 20 - 30 (bisa gunakan yg lain)
Enkrip = Chr(Enkrip) ' ubah kembali ke karakter
Output = Output & Enkrip
Next i

Text2.Text = Output ' tampilkan enkrip
End Sub

Private Sub Command2_Click() 'tombol deskripsi
Dim Dekrip, Output, Inputan As String
Dim Panjang_Input, Pesan As Integer
Inputan = Text3.Text
Panjang_Input = Len(Text3.Text)

For i = 1 To Panjang_Input
Dekrip = Mid(Inputan, i, 1)
Dekrip = Asc(Dekrip)
Dekrip = (Dekrip - 20) + 43 'invert key enkripsi
Dekrip = Chr(Dekrip)
Output = Output & Dekrip
Next i

Text4.Text = Output
End Sub


        3. Selesai..... :)

Semoga bermanfaat, dan terimakasih telah berkunjung.... 

28 comments:

  1. Terimakasih atas sharenya

    ReplyDelete
    Replies
    1. Hay,,, aku buatin SDK enkripsi dngn Crypto dan ditambah juga Enkripsi terproteksi paswd, beda Enkripsi beda juga Dekripsi, hehehe, aku juga masih belajar ,oh ya ini modifikasi dariku sindiri lho :D , Nih video Tutorialnya dan File downloadnya ada di keterangan : https://www.youtube.com/watch?v=uXv33e0Nod4

      Delete
    2. mbak, saya mau buat skripsi tentang enkripsi dan deskripsi kriptografi MARS. ada ide g gimana buatnya, dan minta arahan dan contoh nya boleh kak ?

      Delete
  2. Ini pake algoritma apa gan ?

    ReplyDelete
    Replies
    1. Hay,,, aku buatin SDK enkripsi dngn Crypto dan ditambah juga Enkripsi terproteksi paswd, beda Enkripsi beda juga Dekripsi, hehehe, aku juga masih belajar ,oh ya ini modifikasi dariku sindiri lho :D , Nih video Tutorialnya dan File downloadnya ada di keterangan : https://www.youtube.com/watch?v=uXv33e0Nod4

      Delete
  3. Makasih Gan.. Informasinya, untuk tambah refensi belajar vb ;)

    ReplyDelete
  4. makasih gan....

    ReplyDelete
  5. makasih atas sharenya :)

    ReplyDelete
  6. Gan habis buat di VB selanjutnya bagaimana gan

    ReplyDelete
    Replies
    1. Hay,,, aku buatin SDK enkripsi dngn Crypto dan ditambah juga Enkripsi terproteksi paswd, beda Enkripsi beda juga Dekripsi, hehehe, aku juga masih belajar ,oh ya ini modifikasi dariku sindiri lho :D , Nih video Tutorialnya dan File downloadnya ada di keterangan : https://www.youtube.com/watch?v=uXv33e0Nod4

      Delete
    2. recomended video kamu @devirianingsih

      Delete
  7. gan sy sdh buat desain di vb tp untuk input teks1 gk bisa trus selanjutnya bagaimana gan

    ReplyDelete
  8. gan tolong buatin program enkripsi sederhana sebuah string melibatkan mode console menggunakan vb.net. tolong ya, makasih

    ReplyDelete
  9. Gan kalo misalnya enkripsinya cuman buat 26 karaktet codingnya gimana ??

    ReplyDelete
    Replies
    1. code diatas itu memanfaatkan kode ASCII, jadi karakternya tdk cuma alfabet mbak. klw mau sih dibatasin penggunaan ascii nya, lebih gampang pake function aja... :D

      Delete
    2. Oh gitu toh. Kalo misalnya pake array itu gimana ??

      Delete
    3. Pake array juga bisa kak, tinggal dikembangin aja source code nya.

      Delete
  10. Klo untuk enkripsi menggunakan md5 untuk login dengan database mysql , gmn yaa?

    ReplyDelete
  11. Mksdnya, coding untuk enkripsi password dgn vb6 database mysql

    ReplyDelete
  12. Ini pake algoritma apa gan ?

    ReplyDelete
  13. Sip, kunjungi juga blog http://hitamkopiku.com/

    ReplyDelete
  14. Klo untuk enkripsi menggunakan vb untuk login dengan database xampp , bisa ga kak, trus caranya gimana ?
    Kungjungi Website kampus saya http://www.atmaluhur.ac.id

    dan Website saya https://ernaningsih.mahasiswa.atmaluhur.ac.id




    ReplyDelete

Blogger templates

Followers

Popular Posts

Lencana Facebook

Popular Posts