Tuesday, January 2, 2018

Peranan Sistem Informasi dalam Kehidupan





Dengan mempelajari Sistem Informasi mahasiswa dapat memahami bagaimana jalannya sebuah sistem dan membuat sistem yang efektif serta efisien guna menghasilkan informasi yang akurat dan berkualitas. Dalam Sistem Informasi mahasiswa diharuskan untuk menguasai bahasa pemrograman, diagram unified modelling language (UML) dan algoritma yang bertujuan untuk membantu dalam proses analisa dan pengembangan sistem itu sendiri.
Fungsi dari Ilmu Sistem Informasi adalah menghasilkan sebuah sistem yang membantu suatu entitas untuk mendapatkan informasi yang akurat jelas dan kredibel sehingga kesalahan dan kecurangan dapat diminimalisir dalam proses kegiatan yang dilakukan entitas tersebut, Dalam hal ini Sistem Informasi digunakan untuk mencapai tujuan yang diinginkan dengan lebih efektif dan efisien. Peranan Sistem Informasi dalam kehidupan mahasiswa yang penulis rasakan adalah menjadi lebih analitis terhadap suatu keadaan pengambilan keputusan dan penyelesaian suatu masalah.

Tulisan diatas adalah buah pikir dari pemikiran saya sendiri (opini).

Kriptografi Base 64 dengan Visual Basic .NET





Base64 adalah istilah umum untuk sejumlah skema pengkodean serupa yang mengkodekan data biner dan menerjemahkannya ke dalam representasi basis 64. Istilah Base64 berasal dari konten pengkodean MIME tertentu. (Wikipedia, 2010)

Berikut code dan penjelasan terhadap program kriptografi base 64 sederhana. 

Code
Penjelasan

Imports System.Security.Cryptography
Public Class Form1

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        Dim base64Decoded As String = TextBox1.Text
        Dim base64Encoded As String
        Dim data As Byte()
        data = System.Text.ASCIIEncoding.ASCII.GetBytes(base64Decoded)
        base64Encoded = System.Convert.ToBase64String(data)
        TextBox1.Text = base64Encoded
    End Sub

    Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click
        Dim base64Encoded As String = TextBox1.Text
        Dim base64Decoded As String
        Dim data() As Byte
        data = System.Convert.FromBase64String(base64Encoded)
        base64Decoded = System.Text.ASCIIEncoding.ASCII.GetString(data)
        TextBox1.Text = base64Decoded
    End Sub
End Class

Import library cryptography
Inisialisasi form1
Inisialisasi ketika button1 di klik maka
Menggunakan base64 melaluli library cryptography untuk enkripsi teks pada textbox1
Tampilkan teks pada textbox1 hasil dari enkripsi


Inisialisasi ketika button2 di klik maka teks pada textbox1 yang di enkripsi akan di deskripsi dengan base64



Tampilkan teks pada textbox1 hasil dari deskripsi
  

Semoga bermanfaat

Baca Juga

 

© 24page. Some rights resevered.

Back To Top