vb.net - 编码/解码字符串

Question

(使用 vb.net)

嗨，

我有一个 ini 文件，我需要将 RTF 文件作为 ini 文件中的一行发布 - 就像...

[my section]
rtf_file_1=bla bla bla (the content of the rtf file)

为了避免 RTF 文件中的换行符、特殊代码等包装在 ini 文件中，如何将其编码(和解码)为单个字符串？

我想是否有一个函数可以将字符串(在我的例子中是 RTF 文件的内容)转换为一行数字，然后将其解码回来？

你会做什么？

谢谢!

Answer 1

您可以使用 base64 编码对它们进行编码。就像内容被处理为二进制一样——>它可以是任何类型的文件。但是当然在配置文件中您将无法读取文件的内容。

这里是 Base64 编码/解码的片段

//Encode
string filePath = "";
string base64encoded = null;
using (StreamReader r = new StreamReader(File.OpenRead(filePath)))
{
    byte[] data = System.Text.ASCIIEncoding.ASCII.GetBytes(r.ReadToEnd());
    base64encoded = System.Convert.ToBase64String(data);
}

//decode --> write back
using(StreamWriter w = new StreamWriter(File.Create(filePath)))
{
    byte[] data = System.Convert.FromBase64String(base64encoded);

    w.Write(System.Text.ASCIIEncoding.ASCII.GetString(data));
}

在 VB.NET 中:

    Dim filePath As String = ""
    Dim base64encoded As String = vbNull

    'Encode()
    Using r As StreamReader = New StreamReader(File.OpenRead(filePath))
        Dim data As Byte() = System.Text.ASCIIEncoding.ASCII.GetBytes(r.ReadToEnd())
        base64encoded = System.Convert.ToBase64String(data)
    End Using

    'decode --> write back
    Using w As StreamWriter = New StreamWriter(File.Create(filePath))
        Dim data As Byte() = System.Convert.FromBase64String(base64encoded)
        w.Write(System.Text.ASCIIEncoding.ASCII.GetString(data))
    End Using