Как объединить несколько строк в одном текстовом файле в одну строку, в Windows?

Question

У меня есть несколько стандартных текстовых файлов, которые следуют за этим форматом, с различным количеством строк в каждом файле:

Line1 
Line2 
Line3 
Line4 

Я хочу, чтобы объединить все строки в одну, с пробелом между каждым набором символов, так текстовый файл будет выглядеть следующим образом:

Line1 Line2 Line3 Line3 

... и так далее. Это необходимо для работы с любым количеством строк, из-за того, что каждый текстовый файл содержит другое количество строк. Мое намерение - не, чтобы объединить строки в текстовых файлах; Я хочу, чтобы каждый текстовый файл оставался отдельным. Все решения, которые я нашел в Интернете, либо не соответствуют этому, либо работают исключительно с UNIX. Я запускаю Windows 7. Это можно сделать в Powershell, VBS, Batch, конкретной программе, не имеет значения, просто нужно работать с Windows.

Большое спасибо!

Answer 1

Использование пакетного:

for /f "usebackqdelims=" %%i in ("infile.txt") do @<nul set /p"=%%i ">>"outfile.txt" 
>>"outfile.txt" echo. 

Answer 2

Использование PowerShell дать это попробовать и посмотреть, если это то, что вы хотите:

$my_file = "C:\file.txt" 
$out_file = "C:\out.txt" 
(Get-Content -Path $my_file) -join " " | Set-Content -Path $out_file 

Answer 3

@ECHO OFF 
setlocal 
(SET var=) 
FOR /f "delims=" %%x IN (list.txt) DO (
CALL SET var=%%var%% %%x 
) 
SET var=%var:~1% 
echo var=%var%= 

Где list.txt это файл, содержащий ваши строки и вар переменная, в которую вы хотите, чтобы линии каскадного ,

Answer 4

Что-то вроде этого?

(gc C:\test.txt) -join " " 

Answer 5

Установите Cygwin, то вы можете сделать

cat *.txt | tr "\n" " " 

Answer 6

Ради полноты вот еще одно решение в vbscript:

Set fso = CreateObject("Scripting.FileSystemObject") 

Set infile = fso.OpenTextFile("C:\infile.txt") 
Set outfile = fso.OpenTextFile("C:\outfile.txt", 2, True) 

If Not infile.AtEndOfStream Then outfile.Write infile.ReadLine 
Do Until infile.AtEndOfStream 
    outfile.Write " " & infile.ReadLine 
Loop 

infile.Close 
outfile.Close