Fso fioco, tsIn, tsOut
Regolare il fso = CreateObject (“Scripting.FileSystemObject„)
Regolare il tsIn = fso.OpenTextFile (“c:\Input.txt ")
Regolare il tsOut = fso.CreateTextFile (“c:\Output.txt„, allineare)
tsOut.Write sostituiscono (tsIn.ReadAll, “#„, "", 1, -1, 1)
tsIn.Close
tsOut.Close
Regolare il tsIn = niente
Regolare il tsOut = niente
Regolare il fso = niente
|