导入记事本

Question

将文本导出到记事本时遇到问题。 我使用adwriteline来表示每个文件，但是当文件包含带有换行符的文本或类似“¶”时，代码出错了。问题是在我的计算机上，这条新线被无条件地导入到记事本中（更不用说这个导出的隐形新线被成功导入）但是当我在其他PC上尝试它时，新线是可见的。因此，产生错误。

谢谢和问候。

编辑：

导出的文本在其句子中有新行时会发生错误

出口：

adoStreamExport.WriteText Filepath &"' '" & child.Height & "' '" & child.Width, adWriteLine

导入：

fileIn = Split(Replace(adoStreamImport.ReadText, vbCrLf, "' '"), "' '")

scanText fileIn(indexCount), fileIn(indexCount + 2), fileIn(indexCount + 3)

Case "Text" SetValue value, value2, value3