vb_net_logo_01

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
DecodeFileメソッドを使用する。

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

スポンサードリンク

  

関連記事