写入少于大于asp vbscript中的文本文件

时间:2012-10-27 03:32:14

标签: asp-classic vbscript special-characters delimiter

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

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

正确的格式应该是这样的

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

在编写文本文件时是否有某种技巧来转换这些段,或者我是否需要做一些更奢侈的事情?

提前致谢!

2 个答案:

答案 0 :(得分:1)

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

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

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

答案 1 :(得分:0)

试试这个:

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