IT-Stuffs

Encrypt and Decrypt your Self Using Base64

- To Encrypt the ASCIIEncoding and ToBase64String

Dim a() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes("9894465945")
  Dim ent As String = Convert.ToBase64String(a)
  MsgBox(ent)

Dim k() As Byte = Convert.FromBase64String("OTg5NDQ2NTk0NQ==")
  Dim et As String = System.Text.ASCIIEncoding.ASCII.GetString(k)
  MsgBox(et)