Fso não ofuscante, tsIn, tsOut
Ajustar o fso = o CreateObject (“Scripting.FileSystemObject”)
Ajustar o tsIn = o fso.OpenTextFile (“c:\Input.txt ")
Ajustar o tsOut = o fso.CreateTextFile (“c:\Output.txt”, verdadeiros)
tsOut.Write substituem (tsIn.ReadAll, “#”, "", 1, -1, 1)
tsIn.Close
tsOut.Close
Ajustam o tsIn = nada
Ajustar o tsOut = nada
Ajustar o fso = nada
|