Fso dévil, tsIn, tsOut
Fijar el fso = CreateObject (“Scripting.FileSystemObject”)
Fijar el tsIn = fso.OpenTextFile (“c:\Input.txt ")
Fijar el tsOut = fso.CreateTextFile (“c:\Output.txt”, verdades)
tsOut.Write substituyen (tsIn.ReadAll, “#”, el "", 1, -1, 1)
tsIn.Close
tsOut.Close
Fijar el tsIn = nada
Fijar el tsOut = nada
Fijar el fso = nada
|