在双引号内搜索和替换字符串

Question

我们如何使用vbscript搜索和替换文件中双引号中的字符串？

例如：“thisisstring”是否可以搜索thisisstring以替换为“wearestrings”？

Answer 1

这是一个使用 the function Replace()

的小例子

Option Explicit
Dim Message,MyString,ReplaceString,NewMessageString
Message = "Hello ""thisisstring"" Example"
MyString = DblQuote("thisisstring")
ReplaceString = DblQuote("wearestrings")
NewMessageString = Replace(Message,MyString,ReplaceString,1)
wscript.echo Message & VbcrLF & NewMessageString
'*****************************************************
Function DblQuote(Str)
    DblQuote = Chr(34) & Str & Chr(34)
End Function
'*****************************************************