VB.NET:base64形式でエンコードされたファイルの変換

2007/2/13 2018/8/14 VB.NET/ASP.NET 0

base64形式でエンコードされたファイルをShift-JISにデコードするサンプルプログラムを覚書。

サンプルプログラム

サンプルプログラムを以下に記載。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
   Dim b As New BASE64COMLib.Base64
   Dim r As Long
   r = b.DecodeFile("C:¥test.b64", "c:¥test.txt")
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim b As New BASE64COMLib.Base64

Dim r As Long

r = b.DecodeFile("C:¥test.b64", "c:¥test.txt")

End Sub

DecodeFileメソッドを使用する。

ループを利用すれば、複数のファイルを一気にデコードすることも可能。