[Freezet]

amel27, спасибо большое. Работает.

а как можно указать список папок в которых должно искать? например img, image, picture, photo чтоб не искало по всему диску а именно по таким папкам если они существуют?

и еще одно, как указать все локальные диски для поиска?

[porosenok]

подскажите такую простую вещь
только начал капатся с bat-cmd

перетаскиваю файл на bat файл
соответсвенно переменная %1 возращает путь этого файла
мне нужно выделить из пути только имя файла и "прибавить".jpg

copy image.jpg /b + %1 /b <имя файла %1+.jpg>

[gora]

переменная %1 возращает путь этого файла мне нужно выделить из пути только имя файла и "прибавить".jpg »

%~n1 - из переменной %1 выделяется только имя файла

Для вашего случая будет: %~n1.jpg
Для подробностей см. Пуск - Выполнить - набрать в ком строке: For /?

Здесь выкладывал справку по консольным командам

[porosenok]

чиорт в моем примере всеравно чето не стыкуется
видимо в команде copy не допускается подстановки пути
если вместо %1 использовать имя файла, предварительно положив файл в туже папку - то работает

[rBBWYwg]

Как написать батник, который бы создавал файлы, соответствующие заранее составленному списку?
То есть, в директории лежит файл списка list.txt, в котором:
1.txt
2.txt
3.txt
и батник test.bat, который должен обратиться к этому списку и создать соответствуюшие файлы:
1.txt, 2.txt, 3.txt.
В точном соответствии с именем и количеством.

[___oj]

Код:

@ECHO OFF
REM Код читает файл LIST.TXT построчно по одному слову и создает 
REM пустые файли с именами соответствующими тому что прчитано.
REM Код может принимать один параметр: Папку в которой создавать
REM файлы. Если указанной папки не окажется, то она будет создана.
REM  Если параметр не задан, то файлы создадутся с Current Work Path(в рабочем каталоге).




IF NOT EXIST LIST.TXT GOTO NOLISTF


@IF NOT "%1"=="" (
IF NOT EXIST %1\NUL MD %1 > NUL
CD /D %1  > NUL
 )


FOR /F "TOKENS=1" %%I IN ('TYPE %~DP0LIST.TXT') DO IF NOT "%%I"=="" (
IF NOT EXIST %%I\NUL ECHO. > %%I
ECHO MAKE %%I
 )
GOTO SUCC

:NOLISTF
ECHO LIST.TXT: FILE NOT FOUND.
PAUSE
GOTO END

:SUCC
ECHO OPERATION SUCCESSFULLY.
PAUSE

:END

Фактически по вопросу работает одна строчка

Код:

 
FOR /F "TOKENS=1" %%I IN ('TYPE LIST.TXT') DO IF NOT "%%I"=="" ECHO. >%%I

Т.е здесь читается файл LIST.TXT причем одно слово из строчки и переходит на новую строчку. Значит файл LIST.TXT должен быть таким:

Код:

 
1.txt
2.txt
3.txt

а не таким:

Код:

 
1.txt 2.txt 3.txt

В послелнем случае создастся один файл 1.txt.

[amel27]

illznn
сам батник запускается?... если нет, то все вопросы сюда:
Файл ответов Winnt.sif .:[все вопросы, уточнения, не срабатывает установка, etc]:.

Freezet

как можно указать список папок в которых должно искать? например img, image, picture, photo чтоб не искало по всему диску а именно по таким папкам если они существуют? »

не совсем корректная постановка задачи - пути к папкам указываются целиком или только по имени подкаталога?.. В последнем случае при поиске с подкаталогами файлы могут дублироваться... например, файлы "C:\IMG\IMG\*.jpg" будут скопированы дважды: "C:\IMG" и "C:\IMG\IMG"... без подкаталогов тоже вроде нет смысла искать. Как вариант: искать во всех папках, но копировать по условию наличия в имени папок типа "\IMG\".

как указать все локальные диски для поиска?

по какому условию отбирать диски?... варианты:
- явным перечислением;
- все несетевые диски (включая CD/DVD/USB);
- только конкретного типа;
- другие варианты?

porosenok

Код:

@echo on

Copy /B "%~dp0image.jpg" + "%~f1" "%~dpn1.jpg"

PAUSE

rBBWYwg

Код:

For /F "Delims=" %%i In (list.txt) Do @Echo.>%%i

[Freezet]

amel27,

тогда с именами папок пусть остается как было. Все ето нужно для того чтоб ускорить процесс поиска, может есть другие варианты ускорения?

по какому условию отбирать диски?... варианты: »

по не сетевым (hdd) и сьемным (usb)

тогда как я понимаю нужно исключить из поиска ту папку в которую будет копироваться информация

[amel27]

Freezet

как я понимаю нужно исключить из поиска ту папку в которую будет копироваться информация »

можно просто почистить целевую папку, скинуть список в файл и только потом копировать по списку

по не сетевым (hdd) и сьемным (usb) »

вариант для всех локальных за исключением CD/DVD приводов, версия XP должна быть русской
(имя временного файла - имя CMD-файла с расширением .LST)

Код:

@Echo Off

Set $MSK=*.CMD
Set $DST=X:\FILES
Set $LST=%TEMP%\%~n0.tmp

If Exist "%$LST%" DEL /F /Q "%$LST%"
If Exist "%$DST%" (
    @Echo Удаление каталога назначения:
    RD /S "%$DST%"
)
MD "%$DST%"

@Echo.
For /F "Tokens=3 Delims= " %%i In ('@Echo List Volume^|@DiskPart^|@FindStr /RBC:"  *Том [0-9]  *[A-Z] "^|Find /V "-ROM"') Do (
    @Echo Формирование списка файлов по маске "%%i:\%$MSK%"...
    DIR /B/S/A:-D "%%i:\%$MSK%" >>"%$LST%"
)

@Echo.
@Echo Копирование отобранных файлов в назначенную папку...
For /F "Delims=" %%i In ('FindStr /VBRIC:"[A-Z]:\\RECYCLER\\S" /C:"[A-Z]:\\$RECYCLE.BIN\\S" "%$LST%"') Do (
    Call :FileGetNewName "%%i" "%$DST%"
    Call :FileCopy "%%i"
)
If Exist "%$LST%" DEL /F /Q "%$LST%"

@Echo Работа скрипта завершена.
Exit

:FileCopy
:: ---
:: %1 - полное имя исходного файла, включая путь
:: ---
:: @Echo.%~1
Copy "%~1" "%FileGetNewName%" >Nul
GoTo :EOF

:FileGetNewName
:: ---
:: %1 - полное имя исходного файла, включая путь
:: %2 - путь к целевому каталогу
:: ---
Set $I=
Set FileGetNewName=

If Not Exist "%~1" GoTo :EOF
For %%i In ("%~1") Do Set $N=%%~ni
For %%i In ("%~1") Do Set $X=%%~xi

:FileGetNewName_LOOP

Set FileGetNewName=%~2\%$N%%$I%%$X%
If Not Exist "%FileGetNewName%" GoTo :EOF
Set /A $I +=1
GoTo FileGetNewName_LOOP

[Freezet]

amel27, призапуске бат файла создало файл с именем етого же бат файла и расширением .lst и папку Files но в папке пусто