Форум программистов, компьютерный форум, киберфорум
Batch (CMD/BAT)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 04.05.2017
Сообщений: 1

Интересная BAT-задачка: нужно решение! :)

05.05.2017, 00:20. Показов 812. Ответов 2
Метки нет (Все метки)

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

Собственно, условие задачи: юзер качает архив с энным кол-вом фотографий с почты, архив кладётся в папку D:/Orders. Батник, лежащий там же, создаёт подпапку, названную по текущей дате, разархивирует туда архив, удаляет его, а сами файлы переименовывает по шаблону. Таких архивов за день качается несколько десятков, и одним из условий является необходимость сохранять все скачанные файлы по своим подподпапкам. Для этого подпапки надо создавать (не переименовывать, а именно создавать) с именем вида "дд.мм.гггг-1", "дд.мм.гггг-2" и т.д.

Вот тут и вышел затык: я научил батник создавать подпапку, имя которой он берёт из переменной datetime, но не догоняю, как подпапке присвоить порядковый номер через дефис, начиная с единицы, желательно без переименовывания.

З.Ы.
Ещё очень интересует вопрос, можно ли научить батник отслеживать содержимое папки и автоматом работать с архивами? В идеале батник должен быть запущен и висеть круглосуточно, обрабатывая папку и входящие архивы.

Батник на данный момент выглядит так:

Windows Batch file
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
set datetemp=%date:~-10%
MD D:\Orders\%datetemp%
 
"%ProgramFiles%\WinRAR\WinRAR.exe" x "*.rar" "*.zip" d:\Orders\%datetemp%
 
del /f /s /q D:\Orders\*.rar
del /f /s /q D:\Orders\*.zip
 
@echo off
 
setlocal enableextensions enabledelayedexpansion
 
set /a lCount=0
 
for /f "delims=*" %%i in ('dir /b /s "%datetemp%\*.jpg"') do (
    set /a lCount+=1
    ren "%%i" "image!lCount!%%~xi"
)
 
endlocal
 
start D:\Orders\%datetemp%\image1.jpg
Заранее огромное спасибо!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
05.05.2017, 00:20
Ответы с готовыми решениями:

Знатоки С++ и СИ, где вы ? Интересная олиппиадная задачка (Нужно перевести )
Буду благодарна за любую помощь // Меньшиков. Тренировка 1. // 1E. Степень // Длинная арифметика // ibelyaev: 20Feb2010 ...

Интересная задачка
Подскажите решение П.5.18.Правил Запрещено размещать задания и решения в виде картинок и других файлов с их текстом. Надо...

Интересная задачка
Доброго времени суток! Наткнулся на интересную задачку, и теперь не пойму как токое могло получится вообщем, кто сможет объяснить мне это...

2
 Аватар для volodin661
6688 / 2279 / 348
Регистрация: 10.12.2013
Сообщений: 7,884
05.05.2017, 01:18
оболочка powershell, являясь основным средством автоматизации Windows, начиная с версии 7,
имеет на борту все необходимые сервисы и языковые средства для решения задач в максимально
понятном и удобном виде.

Цитата Сообщение от YooJoo Посмотреть сообщение
можно ли научить батник отслеживать содержимое папки и автоматом работать с архивами?
ватник ничему научить нельзя, его функциональность и эффективность определяются функциональностью и эффективностью внешних утилит, а собственные языковые средства интерпретатора cmd крайне примитивны, небрежно реализованы и, скорее, мешают, а не помогают в решении задач.
0
4340 / 2130 / 661
Регистрация: 26.04.2015
Сообщений: 6,823
05.05.2017, 03:43
YooJoo,
вот вам пример, на основе докручивайте архивацию во внутренностях
Windows Batch file
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
@echo off
:: зафиксировали дату
set "d=%date%_%time::=%"
:: создали при необходимости папку
if not exist "%d%" md "%d%"
:: зашли в нее
pushd "%d%"
 :: здесь создаются для примера, а так пришли а папку файлы a b c
 rem:>"filea.txt"
 rem:>"fileb.txt"
 rem:>"filec.txt"
 :: пробежались по необходимым ("*.txt") файлам, попутно включив счет и выходим на метку взяв с собой текущий номер и имя
 for /f "delims=" %%a in ('dir /a-d/b "*.txt"') do set /a n+=1& call :# "%%n%%" "%%a"
popd
pause& exit
 
:#
  :: создаем нужную нам папку по маске при необходимости и перемещаем туда взятый ранее файл и так пока все не поместим
  if not exist "%d%-%~1" md "%d%-%~1"& >nul move "%~2" "%d%-%~1"
exit /b
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
05.05.2017, 03:43
Помогаю со студенческими работами здесь

Интересная задачка
Из цифр 1, 2, 4, 5 и 8 составляются все возможные четырехзначные четные числа с четной суммой цифр (цифры в числе могут повторяться)....

Интересная задачка
Кто как считает? Мой вариант ответа: Сначала загорится 3-я лампа. ...

Интересная задачка
Подскажите решение задачки П.5.18.Правил Запрещено размещать задания и решения в виде картинок и других файлов с их текстом. Надо...

Интересная задачка)
Платформа 1С:Предприятие 8.2 (8.2.18.104) Конфа Управление небольшой фирмой, редакция 1.4 (1.4.6.19) Дублирую роль...

Интересная задачка
#include <iostream> #include <math.h> using namespace std; int main() { double z1,z2; double a,b,c,d,s,t,u; ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru