» Задачи на bat-файлах 7

anachrom

Код:
@echo off
setlocal

set "cnt=0"
for /f %%i in ('tasklist ^| findstr process.exe') do set /a cnt+=1
if not %cnt% equ 0 (
if not %cnt% gtr 1 (
echo Only one copy of the program
) else (
echo Some copies of the program
)
) else (
echo Process not found
)

ShriEkeR
спс!

Подскажите, как решить задачу? Нужно проверить дату файла 1 в каталоге A, сравнить с датой файла 2 в каталоге B и если она раньше то выполнить определенное действие, в частности скопировать файл 1 в каталог B.

Доброго времяни суток всем.
При написаний очередной "кухни" под прошивку зверька. Сталкнулся с двумя проблемами. Одну из них очень очень довно (еще во времена MS-DOS 3.3) я решал, но просто за бытностью времен (да и системы круто изменились) все позабыл окончательно...
Проблема номер один.
Мне нужно поменять внутри файла с данными (не тхт) 3 байтика где эти байтики находятся я знаю (не в начале и не в конце). Как их можно поменять только средствами BAT файла??? Или стороней консольной программы, только что бы она это делала автоматически без лишних остановок и запросов...

Проблема номер два.
Как мне проверить размер файла? Т.е. мне в батнике нужно проверить получившийся файл и если он меньше или равнятся определенному размеру то продолжаем, если больше то "материмся" и выходим...

зы Заранее благодарен за помощь!

Цитата:

Проблема номер один.
Мне нужно поменять внутри файла с данными (не тхт) 3 байтика

если файлик не очень велик - можно поизвращаться с debug.exe и перенаправлением ввода. Поищи примеры, что-ли...


Цитата:

Проблема номер два.
Как мне проверить размер файла? Т.е. мне в батнике нужно проверить получившийся файл и если он меньше или равнятся определенному размеру то продолжаем, если больше то "материмся" и выходим...

for %%a in (file.ext) do if %%~za gtr 12345 echo великоват && goto :eof

В том то и дело что файл почти 53 метра, а эти три байта нужно менять примерно в середине...

Сам отвечу на свой вопрос... Нашел малюсинькую программку для пойска и замены байт в любом файле... Т.ч. пока пользую ее...
http://ivr.webzone.ru/articles/mreplace/index.htm

Набрёл на хорошую статью по получению даты в батче. Решение через реестр, наиболее универсальное из всех имеющихся, на основе только встроенных средств и reg.exe

http://www.robvanderwoude.com/datetimentparse.php

Народ нужен батник с командой, которая выполняет поиск по всем дискам нужного файла и копирует его на другой диск

RRRRR
А если будут несколько файлов с одним названием? Найти можно так:

Код:
@echo off
setlocal

set "exec=wmic volume where drivetype^="3" get driveletter /value"

for /f "tokens=2 delims==" %%i in ('%exec%') do (
    for /f "tokens=*" %%i in ('2^>nul dir /b /s /a %%i\1.txt') do echo %%i
)

Нужен алгоритм разбиения текста на слова, ну или выделения слов из текста

Допустим есть файл вида:
Код: This is the source code for Advanced JavaServer Pages, published
by Prentice-Hall and Sun Microsystems Press. All of this code
was tested with Tomcat 3.2.1 and Resin 1.2.

Shylock

Код:
@echo off
for /f "tokens=*" %%i in (1.txt) do (
    for %%i in (%%i) do echo %%i
)

Shylock
Цитата:

Но как считывать разделенные блоки %%# , когда кол-во слов не известно и в одной строке их может быть сколь угодно?

так подойдет?

Код: for /f "delims=" %%j in (myfile.txt) do call :_select %%j
goto :eof

:_select
if '%1'=='' goto :eof
(echo %1)>>myfile2.txt
shift
goto :_select

01MDM
wolf0425
Все работает, большое вам спасибо!

Подскажите, пажалосто, в чем м\б ошибка? Задача такая: скачать все картинки от имг-0001 до имг-9999. Делаю так:

Код: for %n in (seq -w 4 99); do wget http://test.ru/img-%n.jpg; done

Есть текстовый файл akelpad.txt - HTML-код страницы http://akelpad.sourceforge.net/ru/download.php .
Пример - под #


Надо выцепить из этого файла ссылку на скачку архива (русская версия). В приведенном примере это http://prdownloads.sourceforge.net/akelpad/AkelPad-4.3.2-bin-rus.zip?download. Цифры 4.3.2 - меняются.
Заранее спасибо.

Цитата:

Надо выцепить из этого файла ссылку на скачку архива (русская версия).

Цитата:

Цифры 4.3.2 - меняются.

там одновременно ссылки на 4.* и 3.* версии.
Ести тебе надо не 4.* - формализуй как-то еще, можно "первую" или "обе"

Код: wget http://akelpad.sourceforge.net/ru/download.php
for /f "tokens=2 delims=>=" %%a in (' find "http://prdownloads.sourceforge.net/akelpad/AkelPad-4" download.php ^| find "bin-rus.zip?download"') do wget %%a

korosya

Код:
@echo off
setlocal

set "url=http://prdownloads.sourceforge.net/akelpad/AkelPad-.*-bin-rus.zip\?download"

cmd /c wget http://akelpad.sourceforge.net/ru/download.php

for /f "tokens=2 delims==?" %%i in ('findstr "%url%" download.php') do (
    set "download=%%~i?download"
    goto:download
)

:download
del download.php
cmd /c wget %download%

А можно как то коммандной строкой вызвать для просмотра коды из *.DLL-ов ?
А то у меня получается только для printui.dll:

C:\>rundll32 printui.dll,PrintUIEntry /?

вот вывод:
Использование: rundll32 printui.dll,PrintUIEntry [параметры] [@командный файл]
/a[имя_файл] имя двоичного файла
/b[имя] основное имя принтера
/c [имя] UNC-имя компьютера, где выполняется команда
/dl удаление локального принтера
/dn удаление подключения к сетевому принтеру
/dd удаление драйвера принтера
/e вывод параметров настройки печати
/f[file] или информационный файл, или выходной файл
/ga добавление подключений компьютеров к принтеру
/ge перечисление подключений компьютеров к принтеру
/gd удаление подключений компьютеров к принтеру
/h[arch] Архитектура драйвера для: Alpha | Intel | IA64 | х64
/ia установка драйвера принтера с помощью информационного файла
/id установка драйвера принтера с помощью мастера установки драйверов принтеров
/if установка принтера с помощью информационного файла
/ii установка принтера с помощью мастера установки принтеров и информационного файла
/il установка принтера с помощью мастера установки принтеров
/in добавление подключения к принтеру
/j[provider] имя системы печати
/k печать пробной страницы на выбранном принтере, не может использоваться с другими командами установки принтера
/l[path] путь к исходному размещению драйвера принтера
/m[model] имя модели драйвера принтера
/n[name] имя принтера
/o показать очередь заданий на печать
/p отображение свойств принтера
/q скрытый режим без вывода сообщений об ошибках
/r[port] имя порта
.........................

и т.д.

01MDM
Спасибо - всё заработало.
А на вопрос, который я задавал ранее:

Цитата:

Подскажите, возможно ли из командной строки изменить версию файла?

нет ответа?

Такая задача - батник запускается с параметрами через пробел, количество параметров величина переменная, как написать, чтобы определённая программа обрабатывала все отданнные банику данные. Допустим в виде данных идут имена файлов, а запускаемая в батнике программа 7z. Не писать же по очереди что-то типа: 7z -y %1, потом 7z -y %2 и т.д.

Alexeyfan

Цитата:

Не писать же по очереди что-то типа: 7z -y %1, потом 7z -y %2 и т.д.

Код:
@echo off
for %%i in (%*) do 7z -y %%i

Alexeyfan

Цитата:

Не писать же по очереди что-то типа: 7z -y %1, потом 7z -y %2 и т.д.

Код: :_1
if "%1"=="" goto :eof
7z -y %1
Shift
goto _1

Коллеги, подскажите плз, как проверить на пинг комп, если он есть то подключить сетевой диск.
Вот тут был пример http://forum.ru-board.com/topic.cgi?forum=62&topic=6156&start=220#18 но не совсем что нада

Придумал вот такой вариант
ping srv1 > nul && подключаем диск || говарим, вставьте кабель

Кто знает вариант получше? Желательно с циклом, чтобы проверка продолжалась дальше, если кабель не воткнут.

zett

Код:
@echo off
1>nul ping -n 1 \\Comp && net use z: \\Comp\Resource || echo \\Comp not available at time

01MDM
Нифига ты меня на пол секунды опередил)
А с цыклом знаешь как лучше?

zett

Цитата:

А с цыклом знаешь как лучше?

Не понял на счет цикла. Нужно несколько сетевых дисков?

01MDM

Цитата:

Не понял на счет цикла. Нужно несколько сетевых дисков?

Да не! Просто на ноуте может быть кабель сетевой не подключен, надо чтоб в этом случае пинг зацикливался, и писал подключите кабель. Кабель подключает и пошло поехало )

zett
Я просто не прочитал твое исправление. Попробуй так:

Код:
@echo off
:check
1>nul ping -n 2 \\Comp && net use z: \\Comp\Resource || echo bla-bla-bla && goto:check

01MDM

Цитата:

Я просто не прочитал твое исправление.

Так уже похоже на правду, но он заклевает блаблабла, а когда кабель втыкаешь просто останавливается.

Не, гоню, все норм!))
А можно както сделать чтобы блаблабла не зацикливалось, а просто один раз напилало и все?