@Echo Off
Set txtfile=e:\Temp\bigtxt.txt
(Echo Создаем большой текст
Echo Весь текст в батнике
Echo Здесь очень много строк
Echo Но спец. символов здесь нет
Echo Иначе их придется экранировать
Echo А это сложно... :^)
Echo Три пустые строки
Echo.
Echo.
Echo.
Echo Последняя строка
)>"%txtfile%"Пример регистрации WinRar:
@Echo Off
Set txtfile=C:\Program Files\WinRAR\rarreg.key
(Echo RAR registration data
Echo Igor
Echo Unlimited Company License
Echo UID=bc97e9a6a0de2ffbd5b1
Echo 6412212250d5b13462c82f004b39b6bf9c35e6bc37d2e3798642fd
Echo 835c59b17fa8b19f054860fce6cb5ffde62890079861be57638717
Echo 7131ced835ed65cc743d9777f2ea71a8e32c7e593cf66794343565
Echo b41bcf56929486b8bcdac33d50ecf7739960ff4c4cdf72212c1868
Echo 10d56b3cbed0695a8cecc85a0d596b46f7e6a3c97082113116681b
Echo c9cf4d3d8f7da5087a5ed390cd9089d6c687ae404c4ecbe260e1e5
Echo 6702c55bd094698d39c00455766f6940aae8ead62d162751488860
)>"%txtfile%"Или так:
@echo off setlocal enableextensions enabledelayedexpansion set sFile=BigText.txt more +10 "%~0">"%sFile%" endlocal exit /b 0 Создаем большой текст Весь текст в батнике Здесь очень много строк Так можно и спецсимволы :^) `~!@#$%^&*()_+|\/.,;:'" Три пустые строки Последняя строка
Пример регистрации WinRar:
@echo off
setlocal enableextensions enabledelayedexpansion
set sFile=C:\Program Files\WinRAR\rarreg.key
more +10 "%~0">"%sFile%"
endlocal
exit /b 0
RAR registration data
Igor
Unlimited Company License
UID=bc97e9a6a0de2ffbd5b1
6412212250d5b13462c82f004b39b6bf9c35e6bc37d2e3798642fd
835c59b17fa8b19f054860fce6cb5ffde62890079861be57638717
7131ced835ed65cc743d9777f2ea71a8e32c7e593cf66794343565
b41bcf56929486b8bcdac33d50ecf7739960ff4c4cdf72212c1868
10d56b3cbed0695a8cecc85a0d596b46f7e6a3c97082113116681b
c9cf4d3d8f7da5087a5ed390cd9089d6c687ae404c4ecbe260e1e5
6702c55bd094698d39c00455766f6940aae8ead62d162751488860Записать в файлы в директории выше:
set "sFile=%~dp0..\12345\123.txt"
Другой вариант создания файла (нужный тест пишется ниже :TEXT):
@echo off
set "BATNAME=название файла"
for /f "delims=[]" %%N in ('find /n ":TEXT" ^<"%~f0"') do more +%%N >"%~dp0%BATNAME%.txt" <"%~f0"
exit /b
:TEXT
№
Имя-
Фамилия-
Отчество-
Телефон-
Сумма долга-
Выплатили-
Остаток-Ещё вариант с указанием места, где должен быть создан файл. При многократном запуске меняется имя файла (добавляется цифра).
@echo off
set "FILENAME=название файла"
set "PLACE=D:\Directory"
if not exist "%PLACE%" md "%PLACE%"
set count=1
set "postfix="
:FILE
set "FILE=%PLACE%\%FILENAME%%postfix%.txt"
if exist "%FILE%" (
set "postfix= %count%"
set /a count+=1
goto FILE
)
for /f "delims=[]" %%N in ('find /n ":TEXT" ^<"%~f0"') do more +%%N >"%FILE%" <"%~f0"
exit /b
:TEXT
№
Имя-
Фамилия-
Отчество-
Телефон-
Сумма долга-
Выплатили-
Остаток-Пример регистрации WinRar:
@echo off
set "FILENAME=rarreg"
set "PLACE=C:\Program Files\WinRAR"
if not exist "%PLACE%" md "%PLACE%"
:FILE
set "FILE=%PLACE%\%FILENAME%%postfix%.key"
for /f "delims=[]" %%N in ('find /n ":TEXT" ^<"%~f0"') do more +%%N >"%FILE%" <"%~f0"
exit /b
:TEXT
RAR registration data
Igor
Unlimited Company License
UID=bc97e9a6a0de2ffbd5b1
6412212250d5b13462c82f004b39b6bf9c35e6bc37d2e3798642fd
835c59b17fa8b19f054860fce6cb5ffde62890079861be57638717
7131ced835ed65cc743d9777f2ea71a8e32c7e593cf66794343565
b41bcf56929486b8bcdac33d50ecf7739960ff4c4cdf72212c1868
10d56b3cbed0695a8cecc85a0d596b46f7e6a3c97082113116681b
c9cf4d3d8f7da5087a5ed390cd9089d6c687ae404c4ecbe260e1e5
6702c55bd094698d39c00455766f6940aae8ead62d162751488860