将传进来的字符串保存为文件

最新推荐文章于 2024-06-04 15:20:41 发布

算盘

最新推荐文章于 2024-06-04 15:20:41 发布

阅读量892

点赞数

CC 4.0 BY-SA版权

分类专栏： C# 文章标签：转换

本文链接：https://blog.youkuaiyun.com/codinglab/article/details/77962226

C# 专栏收录该内容

83 篇文章

订阅专栏

本文介绍了一种使用VB.NET将Base64编码的字符串转换并保存为文件的方法。该方法首先检查目标路径是否存在，若不存在则创建。接着判断文件是否已存在，如果不存在，则通过FileStream和BinaryWriter创建新文件，并将Base64字符串转换成字节数组写入文件。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

''' <summary>
''' 将传进来的字符串保存为文件
''' </summary>
''' <param name="savePath">文件保存路径</param>
''' <param name="fullPath">文件全路径</param>
''' <param name="binary">字符串</param>
''' <remarks></remarks>
Public Sub BinaryToFile(ByVal savePath As String, ByVal fullPath As String, ByVal binary As String)

'判断文件保存路径是否存在
If Not Directory.Exists(savePath) Then
Directory.CreateDirectory(savePath)
End If

'判断文件是否存在
If Not File.Exists(fullPath) Then
Dim fs As FileStream = New FileStream(fullPath, FileMode.CreateNew)
'利用新传来的路径实例化一个FileStream对像
Dim bw As BinaryWriter = New BinaryWriter(fs)

'实例化一个用于写的BinaryWriter
Dim byteStreamStr As String = binary.Replace("%2B", "+")

Dim byteStream() As Byte = Convert.FromBase64String(byteStreamStr)
fs.Write(byteStream, 0, byteStream.Length)
bw.Close()
fs.Close()
End If
End Sub