Question

我想通过转义文本中的特殊字符并用双引号括起输出来将文本文件复制到另一个文件

例如。考虑输入文件：

$('.myclass').addClass('newclass');

我希望输出为

ABC"hi%"
bcd

在一行中。脚本应该在输入文本的每一行的末尾动态添加回车符和换行符。

感谢任何帮助。

感谢

Answer 1

您应该可以使用一系列Replace()语句来执行此操作。

s = objTextStream.ReadAll()

s = Replace(s, """", """""")
s = Replace(s, vbTab, """ & vbTab & """)
s = Replace(s, vbCrLF, """ & vbCrLf & """)
.... 

' Add quotes around the whole string
s = """" & s & """"

但是，由于需要连接，最终结果中可能会出现一些空字符串。例如，如果您有连续的选项卡，则输出字符串将如下所示：

"some text" & vbTab & "" & vbTab & "" & vbCrLf & "Line2"

所以你可能不得不做一个Replace()来摆脱那些：

s = Replace(s, "& """" &", "&")

通过转义特殊字符来读取和写入vbscript中的文件

1 个答案: