mrbims
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
BorlandIMHO
Уже пробовал делить на две части. Так работает, но возникает другой вопрос.
Не знаю как сделать Удаление дубликатов
Конечный файл после Удаления дубликатов должен называться %base%-noСлово.txt
Код:
@echo off
setlocal enableextensions enabledelayedexpansion
color 2F
SET /P base="Перетащите файл в это окно --> "
call :domain set domain
cls & echo Отсеиваем 1
FINDSTR /L " текст" %base% > %base%-текст1.txt
cls & echo Отсеиваем 2
FINDSTR /L " текст" %base% > %base%-текст2.txt
cls & echo Отсеиваем не нужные слова Часть 1
FINDSTR /L /I /P /OFF /V " слово слово1...слово400 " %base% > %base%-noСлова1.txt
cls & echo Отсеиваем не нужные слова Часть 2
FINDSTR /L /I /P /OFF /V " слово401 слово402...слово850 " %base% > %base%-noСлова2.txt
cls & echo Слияние двух файлов
copy /b %base%-noСлово1.txt + %base%-noСлово2.txt %base%-noСлово3.txt
del /q %base%-noСлово1.txt %base%-noСлово2.txt
RENAME %base%-noСлово3.txt noСлово3.txt
cls & echo Удаление дубликатов
из "%base%-noСлово3.txt" или "noСлово3.txt" убрать дубликаты и результат в файл "%base%-noСлово3.txt" "noСлово.txt"
RENAME noСлово.txt %base%-noСлово.txt
cls & echo end!
pause
exit
|
|
Всего записей: 5 | Зарегистр. 06-11-2020 | Отправлено: 01:53 07-11-2020 | Исправлено: mrbims, 01:59 07-11-2020 |
|
