ext/CrashServer/CrashHandler/DumpUploaderServiceLib/replace_text.vbs

   1 Const ForReading = 1
   2 Const ForWriting = 2
   3
   4 strFileName = Wscript.Arguments(0)
   5
   6 Set objFSO = CreateObject("Scripting.FileSystemObject")
   7 Set objFile = objFSO.OpenTextFile(strFileName, ForReading)
   8 strText = objFile.ReadAll
   9 objFile.Close
  10
  11 strNewText = Replace(strText, "_USCORE", "_")
  12 strNewText = Replace(strNewText, "_x002e", "_")
  13 Set objFile = objFSO.OpenTextFile(strFileName, ForWriting)
  14 objFile.Write strNewText  'WriteLine adds extra CR/LF
  15 objFile.Close