Как скопировать текст от одной заданной метки до другой из одного текстового файла в другой?

@DarkJoker1992 · Регистрация: 19.02.2013

Студворк — интернет-сервис помощи студентам

нужно скопировать всё что находится в txt файле ОТ <dekl> ДО </dekl>
подскажите пожалуйста, сам найти так и не смог =(

@temkasky · 11.11.2014, 15:13

notepad++
выделить синтаксис, свернуть массив <dekl></dekl> и копировать его

@DarkJoker1992 · 11.11.2014, 15:13 **[ТС]**

-_- причём тут notepad++, мне bat нужен.

@temkasky · 11.11.2014, 15:17

DarkJoker1992, ах, прости, не дочитал раздел в котором статья находится)

@DarkJoker1992 · 11.11.2014, 15:18 **[ТС]**

бывает =)

@ComSpec · 11.11.2014, 15:49

Bash
1
2
3
4
5
6
7
8
9
10
11
12
@echo off
 
set "in=D:\Test\example.txt"
set "out=D:\Test\new.txt"
set "from=^<dekl^>"
set "to=^</dekl^>"
 
type "%in%">.tmp
mshta "vbscript:CreateObject("Scripting.FileSystemObject").GetStandardStream(1).Write("%from%"+Split(Split(CreateObject("Scripting.FileSystemObject").OpenTextFile(".tmp").ReadAll(),"%from%")(1),"%to%")(0)+"%to%")&Close()">"%out%"
del .tmp
 
exit /b

@DarkJoker1992 · 11.11.2014, 16:33 **[ТС]**

простите а как сделать что бы <dekl> </dekl> не входили в out файл?

@ComSpec · 11.11.2014, 16:53

DarkJoker1992, надо было писать "между", а то я специально включил разделители в вывод результата.

Без включения разделителей:

Bash
1
2
3
4
5
6
7
8
9
10
11
12
@echo off
 
set "in=D:\Test\example.txt"
set "out=D:\Test\new.txt"
set "from=^<dekl^>"
set "to=^</dekl^>"
 
type "%in%">.tmp
mshta "vbscript:CreateObject("Scripting.FileSystemObject").GetStandardStream(1).Write(Split(Split(CreateObject("Scripting.FileSystemObject").OpenTextFile(".tmp").ReadAll(),"%from%")(1),"%to%")(0))&Close()">"%out%"
del .tmp
 
exit /b

.

@Azartno · 20.11.2016, 00:20

ComSpec, большое вам спасибо за это решение! Очень помогло!

Пусть спустя несколько лет, но можно вас попросить ещё подсказать - как после копирования, в отдельный файл строк в заданном промежутке, ещё и удалить этот промежуток из исходного файла?

Т.е. скопировали и сохранили в новый файл ОТ <dekl> ДО </dekl> (включая сами <dekl> и </dekl>), а потом в исходном файле удалили всё ОТ <dekl> ДО </dekl> (включая сами <dekl> и </dekl>).

Заранее спасибо!

volodin661 · 20.11.2016, 03:13

да-а ...
2 года промежуток провёл в исходном файле, будучи в своё время неудалённым.

@alpap · 20.11.2016, 20:07

Azartno,

Windows Batch file
1
2
3
4
5
6
7
8
9
10
11
12
@echo off
set "f=file.txt"
set "sp=<dekl></dekl>"
<"%f%" (for /f "delims=" %%a in ('find/v ""') do (
  set "s=%%a"& echo "%%a"|findstr/rnc:"%sp:><=>.*<%" && (
   >"new_file.txt" (cmd/v/c echo:!s:*:^^=!)
  ) || (
   >>$ (cmd/v/c echo:!s:*:^^=!)
  )
 )
)& move $ "%f%"
exit

.

@ComSpec · 21.11.2016, 02:35

Сообщение от Azartno

...скопировали и сохранили в новый файл ОТ <dekl> ДО </dekl> (включая сами <dekl> и </dekl>), а потом в исходном файле удалили всё ОТ <dekl> ДО </dekl> (включая сами <dekl> и </dekl>).

Вариант 1:

Windows Batch file
1
2
3
4
5
6
7
8
9
10
@echo off
 
set "in=example.txt"
set "out=new.txt"
set "from=<dekl>"
set "to=</dekl>"
 
mshta vbscript:Execute("On Error Resume Next:Set o=CreateObject(""Scripting.FileSystemObject""):a=o.OpenTextFile(""%in%"").ReadAll():t=""%from%""+Split(Split(a,""%from%"")(1),""%to%"")(0)+""%to%"":o.OpenTextFile(""%out%"",2,True).Write(t):o.OpenTextFile(""%in%"",2,True).Write(Replace(a,t,"""")):close()")
 
exit /b

.

Вариант 2:

Windows Batch file
1
2
3
4
5
6
7
8
9
10
@echo off
 
set "in=example.txt"
set "out=new.txt"
set "from=<dekl>"
set "to=</dekl>"
 
mshta vbscript:Execute("On Error Resume Next:With CreateObject(""VBScript.RegExp""):.Pattern=""%from%[\s\S]*%to%"":.IgnoreCase=True:Set o=CreateObject(""Scripting.FileSystemObject""):a=o.OpenTextFile(""%in%"").ReadAll():t=.Execute(a).Item(0):End With:o.OpenTextFile(""%out%"",2,True).Write(t):o.OpenTextFile(""%in%"",2,True).Write(Replace(a,t,"""")):close()")
 
exit /b

.

Новые блоги и статьи Все статьи Все блоги /
Unity 4D GameUnited 13.06.2025 Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .	SSE (Server-Sent Events) в ASP.NET Core и .NET 10 UnmanagedCoder 13.06.2025 Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .	С днём независимости России! Hrethgir 13.06.2025 Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .	Лето вокруг. kumehtar 13.06.2025 Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .	Популярные LM модели ориентированы на увеличение затрат ресурсов пользователями сгенерированного кода (грязь -заслуги чистоплюев). Hrethgir 12.06.2025 Вообще обратил внимание, что они генерируют код (впрочем так-же ориентированы разработчики чипов даже), чтобы пользователь их использующий уходил в тот или иной убыток. Это достаточно опытные модели,. . .
Топ10 библиотек C для квантовых вычислений bytestream 12.06.2025 Квантовые вычисления - это та область, где теория встречается с практикой на границе наших знаний о физике. Пока большая часть шума вокруг квантовых компьютеров крутится вокруг языков высокого уровня. . .	Dispose и Finalize в C# stackOverflow 12.06.2025 Работая с C# больше десяти лет, я снова и снова наблюдаю одну и ту же историю: разработчики наивно полагаются на сборщик мусора, как на волшебную палочку, которая решит все проблемы с памятью. Да,. . .	Повышаем производительность игры на Unity 6 с GPU Resident Drawer GameUnited 11.06.2025 Недавно копался в новых фичах Unity 6 и наткнулся на GPU Resident Drawer - штуку, которая заставила меня присвистнуть от удивления. По сути, это внутренний механизм рендеринга, который автоматически. . .	Множества в Python py-thonny 11.06.2025 В Python существует множество структур данных, но иногда я сталкиваюсь с задачами, где ни списки, ни словари не дают оптимального решения. Часто это происходит, когда мне нужно быстро проверять. . .	Работа с ccache/sccache в рамках C++ Loafer 11.06.2025 Утилиты ccache и sccache занимаются тем, что кешируют промежуточные результаты компиляции, таким образом ускоряя последующие компиляции проекта. Это означает, что если проект будет компилироваться. . .

@DarkJoker1992 148 / 4 / 0 Регистрация: 19.02.2013 Сообщений: 369

	Как скопировать текст от одной заданной метки до другой из одного текстового файла в другой? 11.11.2014, 14:44. Показов 6728. Ответов 11 Метки нет (Все метки) нужно скопировать всё что находится в txt файле ОТ <dekl> ДО </dekl> подскажите пожалуйста, сам найти так и не смог =( 0

@temkasky 81 / 81 / 50 Регистрация: 26.11.2012 Сообщений: 303
	11.11.2014, 15:13
	notepad++ выделить синтаксис, свернуть массив <dekl></dekl> и копировать его 0

@DarkJoker1992 148 / 4 / 0 Регистрация: 19.02.2013 Сообщений: 369
	11.11.2014, 15:13 [ТС]
	-_- причём тут notepad++, мне bat нужен. 0

@temkasky 81 / 81 / 50 Регистрация: 26.11.2012 Сообщений: 303
	11.11.2014, 15:17
	DarkJoker1992, ах, прости, не дочитал раздел в котором статья находится) 0

@DarkJoker1992 148 / 4 / 0 Регистрация: 19.02.2013 Сообщений: 369
	11.11.2014, 15:18 [ТС]
	бывает =) 0

@DarkJoker1992 148 / 4 / 0 Регистрация: 19.02.2013 Сообщений: 369
	11.11.2014, 16:33 [ТС]
	простите а как сделать что бы <dekl> </dekl> не входили в out файл? 0

@Azartno 0 / 0 / 0 Регистрация: 20.11.2016 Сообщений: 1
	20.11.2016, 00:20
	ComSpec, большое вам спасибо за это решение! Очень помогло! Пусть спустя несколько лет, но можно вас попросить ещё подсказать - как после копирования, в отдельный файл строк в заданном промежутке, ещё и удалить этот промежуток из исходного файла? Т.е. скопировали и сохранили в новый файл ОТ <dekl> ДО </dekl> (включая сами <dekl> и </dekl>), а потом в исходном файле удалили всё ОТ <dekl> ДО </dekl> (включая сами <dekl> и </dekl>). Заранее спасибо! 0

volodin661 6565 / 2211 / 344 Регистрация: 10.12.2013 Сообщений: 7,616
	20.11.2016, 03:13
	да-а ... 2 года промежуток провёл в исходном файле, будучи в своё время неудалённым. 0

Опции темы

Как скопировать текст от одной заданной метки до другой из одного текстового файла в другой?

Решение