base64エンコード&デコード
概要
タイトルのまんま。
元ネタ
前提条件
手順
default.aspx を以下のように変更。
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim str_temp As String = "うぇぶあぷりけいしょん"
' 文字列をbyte配列に変換
Dim byte_temp() As Byte = System.Text.Encoding.Default.GetBytes(str_temp)
' byte配列をbase64文字列に変換()
Dim base64String As String = System.Convert.ToBase64String(byte_temp)
' base64文字列をbyte配列に戻す
Dim byte_temp2() As Byte = System.Convert.FromBase64String(base64String)
' byte配列を文字列に戻す
Dim str_temp2 As String = System.Text.Encoding.Default.GetString(byte_temp2)
' 結果を表示
Response.Write("文字列: " & str_temp)
Response.Write("<br><br>↓<br><br>")
Response.Write("base64文字列: " & base64String)
Response.Write("<br><br>↓<br><br>")
Response.Write("文字列: " & str_temp2)
End Sub
End Class
以下、実行結果。
not found (266.jpg)