Ciemnawy fso, tsIn, tsOut
Ustalony fso = CreateObject ("Scripting.FileSystemObject")
Ustalony tsIn = fso.OpenTextFile ("c:\Input.txt ")
Ustalony tsOut = fso.CreateTextFile ("c:\Output.txt", Prawdziwy)
tsOut.Write Zamieniać (tsIn.ReadAll, "#", "", (1), -1, 1)
tsIn.Close
tsOut.Close
Ustalony tsIn = Nic
Ustalony tsOut = Nic
Ustalony fso = Nic
|