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

подскажите плз:

Код:
set ThisCmdDir=%~dp0
for /F "tokens=*" %%i in ('dir C:\ /s/b ^| find "ACCOUNT.VCF"') do set path_ACCOUNT_VCF=%%i

Set Key=@mail.ru
For /F "usebackq delims=" %%i in (`Find /I "%Key%" %path_ACCOUNT_VCF%`) Do Set Value=%%i
@Echo.%Value%

Free_Soft

Цитата:

Ребята, как можно поменять значок (иконку) в заголовке окна консоли?

ярлык сделай на cmd.exe и в св-вах ярлыка

wolf0425, mugil_cephalus, СПАСИБО БОЛЬШОЕ!

воспользовался кодом mugil_cephalus. Только не понял в этом месте:

echo.%%~i|1>nul 2>&1 find /i "tables=" &&(echo.tables=%var%) ||(echo.%%~i)

у меня создался файл со строчкой через запятую, но там нет текста tables= - так и должно быть?

mediate
вот мой файл 3.txt
MOP
LOST
HIGH
LOW
вот 3_.txt
MOP, LOST, HIGH, LOW
вот batch.cmd
ACTS
ACTSVOLS
ADDR
ADDRFOLD
ADDRRECIP
tables=a
ACTS
ACTSVOLS
ADDR
ADDRFOLD
ADDRRECIP
вот batch_.cmd
ACTS
ACTSVOLS
ADDR
ADDRFOLD
ADDRRECIP
tables=MOP, LOST, HIGH, LOW
ACTS
ACTSVOLS
ADDR
ADDRFOLD
ADDRRECIP

mugil_cephalus, спасибо. Методом тыка разобрался с 5 попытки куда и что, я не создавал cmd - потом создал и все получилось, большое спасибо еще раз, помогли ребята!

Free_Soft
sic, любопытная получилась консоль с пиктограммой в виде аватара с форума

mugil_cephalus, вопрос еще появился - файлик создается с одной большой строкой - открываю виндовским нотпадом - нет переноса слов, но строк 3 штуки (названий через запятую много достаточно), обрывается на NOMENCLA и со след. строки TURE и дальше через запятую перечисления идут.

И новый batch_.cmd создается с этим обрубком первой строки -т.е. там tables=...., NOMENCLA - и все, как быть? как снять ограничения на длину?


Код: tables=A, AA, ACTS, ACTSVOLS, ADDR, ADDRFOLD, ADDRRECIP, AGENTS, ARCHIVEFUNDS, ARCHIVEMOVEMENT, ARCHIVERS, ATTRIB, AUTONUM, BLANKS, BLANKS_DELIVERY, BLANK_DOCS, BOARD_ACL, BOSS_ASSISTANT, BRIEFCASE, CALENDAR, CAMERAS, CARDINCARDVAL, CARDLINK, CARDPAGES, CARDS, CARDS_ACCESS, CARDS_BODY, CARDS_EDIT, CARDS_FOLDERS, CARDS_OLE, CARDS_REPORTS, CARDTARIF, CARDTARIFGRID, CARDTEMPLATE, CARDVAL, CATEGORY, CHAPTER, CHECKINCHECKOUT, CHIEFS_DEPS, CONFIG, CTRL_MSG, CTRL_OWNER, DOCLOG, DOCSIGN, DOCSNOMS, DOCUMENT, DOCUMENT_CTRL, DOC_DISPATCH, DOC_HIST, DSBINDER, DSDATA, DSFOLDER, EMPLOYEE, EMPL_CHIF_DEPT, EVENTLOG, EVENTLOGDETAIL, EXECUTIONREPORTS, EXECUTOR, FATHERFIELD, FGL, FIELDLIST, FILEBALANCE, FILTERS, FLIST, FOLDER, FOLDERLEVEL, FOLDER_AD, FOLDER_CARD, FOLDER_LEVELS, FOLD_EDIT, FOLD_EMPL, FOLD_MESSAGE, FOLD_PROF, FREE_SCRIPTS, FULLDOCPATH, GL, GROUP_ADDRESS, GROUP_FOLDER, GROUP_LIST, IERARCH, INDEXBASE, INDEXPATHS, INSP_FOLDERS, INSTATTACH, INSTINSPECTORS, INSTRUCTIONS, JOURNAL, LINKCOLUMN, LINK_TEXT, MSGTEMPLATE, NOMENCLA

Цитата:

как присвоить переменной (выделить из %%i получившейся строки) все что находится левее %Key% но до первого же символа ":"

наверно так:

Код: Set Key=@mail.ru
setlocal enabledelayedexpansion
For /F "usebackq delims=" %%i in (`Find /I "%Key%" %path_ACCOUNT_VCF%`) Do Set "Value=%%i" & for /f "delims=:" %%j in ("!Value:%Key%=:!") do set "Value=%%j"
@Echo.%Value%

mediate

Цитата:

Даже, если подскажете как фалик со строкой одной создать

ещё способ

Код: FOR /F "tokens=* delims=" %%a IN (files.lst) DO SET /p=+"%%~a"<nul>>result.txt

mediate
Цитата:

как снять ограничения на длину?

для упрощения кода чуть поменял промежуточную строку

Код: @echo off
for /f "tokens=*" %%i in (.\in.txt) do 0>nul 1>.\string.txt set /p="table=%%~i" & goto:loop
:loop
for /f "skip=1 tokens=*" %%i in (.\in.txt) do 0>nul 1>>.\string.txt set /p=", %%~i"
1>>.\string.txt echo.
for /f "tokens=*" %%i in ('type ".\batch.cmd"') do (
    echo.%%~i | 1>nul 2>&1 find /i "tables=" && ( 1>>.\batch_new.cmd type .\string.txt) || (1>>.\batch_new.cmd echo.%%~i)
)
pause

wolf0425, king_stiven, спасибо, помогли - создается все верно теперь!

Имеется такой вопрос. Как правильно записать деление с остатком в команде SET?

Код: set /a x=a%b

freewood
а так не хочешь:
Код: set /a "x=a-a/b*b"

Нет, так не хочу. =)
Мне просто любопытно почему не работает хотя должно. =)

Код: set /a "x=a-a/b*b"

freewood
Хорошо. Но так как ты хочешь еще некрасивее получится:
Код: SET /a "x=%a%%%b%"

Т.е. запись должна быть именно в таком виде, с предопределением переменных a и b?
А вот так сделать нет возможности?

Код: set /a "x=3%5"

freewood
Ну одинарный процент "съедается" по способу обработки - там допустимо использование переменных окружения без обрамления этими символами... Стандартная экранировка символом "^" почему-то не отрабатывает. Ну вобщем сделай "ECHO ON" и посмотри как транслируется команда в процессе выполнения.
А первый приведенных вариант работает по простой причине:
- все вычисления выполняются последовательно с учетом приоритета обработки операций
- все вычисления целочисленные

Добрый день!
[more]
Код: @ECHO OFF
MKDIR GIFLITE.$$$ 2>nul
REM Основной цикл обработки файлов GIF
FOR /R %%N IN (*.gif) DO @CALL :method %%N
REM Удаляем весь мусор, который мог остаться
DEL /Q giflite.tmp 2>nul
RMDIR /S /Q GIFLITE.$$$
EXIT
:method
REM Перебираем методы
FOR %%M IN (0 1 2 3) DO @CALL :giflite %%M %%~s1 %1
REM Сортируем полученное по размеру и забираем последний
REM (наименьший) файл
FOR /F "usebackq skip=3" %%R IN (`DIR /B /O-S GIFLITE.$$$`) ?
DO @CALL :getresult %%R %1
GOTO :EOF
:getresult
REM Переписываем файл на место прежнего, удаляем мусор
MOVE /Y GIFLITE.$$$\%1 %2
DEL /Q GIFLITE.$$$\*.*
GOTO :EOF
:giflite
REM Запускаем преобразование
GIFLITE.EXE -t -h -m%1 -o %2 GIFLITE.$$$\%1