2
Public Function ConvertFileToBase64(ByVal fileName As String) As String
Dim ReturnValue As String = ""
If My.Computer.FileSystem.FileExists(fileName) Then
Using BinaryFile As FileStream = New FileStream(fileName, FileMode.Open)
Dim BinRead As BinaryReader = New BinaryReader(BinaryFile)
Dim BinBytes As Byte() = BinRead.ReadBytes(CInt(BinaryFile.Length))
ReturnValue = Convert.ToBase64String(BinBytes)
BinaryFile.Close()
End Using
End If
Return ReturnValue
End Function
我想问的问题:转换文件的base64功能输出
- 我想要的输出,我想转换一个文本文件“C:\用户\用户\桌面\老鼠\测试\ test.txt的” 为Base64
- 我无法得到任何输出,当我转换‘的test.txt’为base64
- 我使用的文件名=‘textbox1.text’加我‘的test.txt’
什么问题?它没有返回什么?你是否试图在函数内部放置断点来看看发生了什么?最可能的答案是路径是错误的(只给出一个文件名,并且需要一个完整的路径)。 – IvanH