RosettaCodeData/Task/File-input-output/VBScript/file-input-output.vbs
2026-04-30 12:34:36 -04:00

1 line
165 B
Text

CreateObject("Scripting.FileSystemObject").OpenTextFile("output.txt",2,-2).Write CreateObject("Scripting.FileSystemObject").OpenTextFile("input.txt", 1, -2).ReadAll