Сценарий пакетного файла Windows для копирования каждого десятого файла из папки в другую папку

Question

У меня есть множество текстовых файлов в каталоге, и я хочу выбрать каждый десятый файл (т. Е. 10-й, 20-й, 30-й, 40-й и т. Д.) В соответствии с названием / алфавитным расположением файлов и скопировать их в другую папку.

Например:

У меня есть папка C: \ documents \ source \, в которой находятся файлы:

12.txt
16.txt
2007.txt
2008.txt
200865.txt
2008616263.txt
a.txt
across.txt
addition.txt
album.txt
American.txt
an.txt
and.txt
April.txt
article.txt
Artist.txt
at.txt
Award.txt
Awards.txt
Awards64.txt
Bad.txt
Best.txt
breakout.txt
by.txt
Canada.txt
categories.txt
Collaboration59.txt
Dance.txt
Dark.txt
December.txt
Diva.txt
Duo.txt
earned.txt
embarked.txt
Entertainment.txt
entitled.txt
Europe60.txt
Favorite.txt
Female.txt
Fiasco.txt
first.txt
five.txt
for.txt
four.txt
Girl.txt
Glow.txt
Gone.txt
Good.txt
Grammy.txt
Group.txt
he.txt
headlining.txt
her.txt
in.txt
including.txt
Kanye.txt
kicked.txt
Lupe.txt
Margeaux.txt
Monster.txt
MTV.txt
Music.txt
NERD.txt
nominated.txt
nominations.txt
of.txt
off.txt
on.txt
or.txt
other.txt
Performance.txt
PopRock.txt
R&B.txt
RapSung.txt
receiving.txt
Record.txt
Recording.txt
referred.txt
Rihanna.txt
second.txt
September.txt
several.txt
she.txt
shows.txt
Single.txt
Song.txt
SoulR&B.txt
States.txt
success.txt
support.txt
the.txt
then.txt
to.txt
tour.txt
United.txt
Video.txt
was.txt
Watson.txt
Weekly.txt
West.txt
which.txt
winning.txt
with.txt
won.txt
wrote.txt
Year.txt
Year58.txt

Я хочу, чтобы файлы album.txt, Awards64.txt, December.txt, Fiasco.txt, Group.txt, Monster.txt, other.txt, second.txt, support.txt и West.txt были скопированы в папку C: \ документы \ выход \

Как мне написать командный файл, который может достичь этой цели?

Answer 1

Просто посчитайте, просматривая список файлов:

@echo off
set Counter=0
for %%f in (*.txt) do call :p "%%f"
goto :eof

:p
    set /a Counter+=1
    set /a X=Counter %% 10
    if %X%==0 copy %1 C:\Documents\Output
goto :eof

Должен работать, но не могу проверить, так как у меня (по праву) нет прав на запись в корневой каталог; -)

Чтобы адаптироваться к каждому восьмому файлу или около того, просто измените 10 в set /a X=Counter %% 10.

Обратите внимание, что, хотя отсортированные списки выходных файлов NTFS это не та сортировка, которую вы получили бы из Explorer (или что-нибудь еще, что соответствует методу сортировки, заданному в региональных и языковых параметрах).

Answer 2

Можете ли вы изменить имена файлов? Простым решением будет пометить каждый 10-й файл в зависимости от того, что вы делаете для их вывода. Затем просто скопируйте их с подстановочными знаками и маркером.

Answer 3

добавлены некоторые модификации для создания пары дисков из одной папки: грязная, но работает :).Для каждого диска "offs" переменная и целевая папка должны быть изменены.Другое как в оригинальном сценарии

@echo off
set Counter=0
set offs=0
for %%f in (*.mp3) do call :p "%%f"
goto :eof

:p
    set /a c2=Counter-offs
    set /a X=c2 %% 8
    set /a Counter+=1
    if %X%==0 copy %1 d:\avtcd_tgt\cd1
goto :eof