-Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")\r
-Dim sh: Set sh = CreateObject("WScript.Shell")\r
-Dim otf: Set otf = fso.OpenTextFile(WScript.Arguments.Unnamed(0), 1)\r
-\r
-Do Until otf.AtEndOfStream = True\r
- WScript.Echo sh.ExpandEnvironmentStrings(otf.ReadLine)\r
-Loop\r
-\r
-otf.Close\r
-\r
+Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
+Dim sh: Set sh = CreateObject("WScript.Shell")
+Dim otf: Set otf = fso.OpenTextFile(WScript.Arguments.Unnamed(0), 1)
+
+Do Until otf.AtEndOfStream = True
+ WScript.Echo sh.ExpandEnvironmentStrings(otf.ReadLine)
+Loop
+
+otf.Close
+