asp-classic - 在asp vbscript中写入小于大于到文本文件

Question

我很难尝试使用 Scripting.FileSystemObject 将 xml 文件从 asp vbscript 写出到文本文件。问题是小于和大于字符。为了让我将这些字符添加到代码中的变量中，我需要使用 < >。这在编写文本时会导致问题。结果看起来像这样

<copyright>request copyright</copyright>
<lastBuildDate>10/26/2012</lastBuildDate>

正确的格式应该是这样

<copyright>request copyright</copyright>
<lastBuildDate>10/26/2012</lastBuildDate>

在编写文本文件时转换这些段是否有某种技巧，还是我需要做一些更奢侈的事情？

提前致谢！

Answer 1

在TextStream中写入时，您可以通过两次调用Replace来包围您的变量

TextStream.Write Replace(Replace(myString, "&lt;","<"),"&gt;",">")

这样变量不会改变，但写出的数据使用正确的字符。

Answer 2

尝试这个：

Dim objStream
Set objStream = CreateObject("ADODB.Stream")
objStream.CharSet = "utf-8"
objStream.Open
objStream.WriteText "testdata"
objStream.SaveToFile "C:\test.txt", 2