Чтение из файла нескольких строк и присвоение их значений переменным

@nordri · Регистрация: 13.09.2018

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

Помогите! Поиск не помог...
Есть файл My.log
set "LogPatch=%~dp0My.log"

Строка ~~2121~~ не нужна для обработки.
Мне необходимо его прочитать Bat-ником, и работать с переменными:

 set Param+1=4556

set Param+2=4654566



set Param+3=89878978

@nordri · 01.06.2021, 21:52 **[ТС]**

Хороший вопрос. Пока не знаю, скорей всего еще и кодировку придётся настраивать. My.log это результат другого bat.
OEM086

@Karen87 · 01.06.2021, 22:17

nordri, пробуйте, предварительно сохранив скрипт в кодировке OEM-866:

Windows Batch file
1
2
3
4
5
6
7
8
@echo off
setlocal enabledelayedexpansion
for /f "tokens=1 delims=><" %%a in ('type my.log ^| findstr /rc:"^>.*<$"') do (
    set /A count+=1
    set "Param+!count!=%%a"
)
pause
exit

@nordri · 08.06.2021, 00:08 **[ТС]**

Так и не разобрался что значит:

Сообщение от Karen87

Windows Batch file
1
2
set /A count+=1
    set "Param+!count!=%%a"

Но вот что получилось

Windows Batch file
1
2
3
4
5
6
7
8
9
10
11
12
13
@echo off
SetLocal EnableDelayedExpansion
set "LogPatch=My.log"
for /f "tokens=1 delims=><" %%a in ('type "%LogPatch%" ^| findstr /rc:"^>.*<$"') do (
set /a Number+=1
call :#Numb !Number! %%a
)
Echo Max number string !Number! 
pause
exit
:#Numb
Echo String [%1] value: %2
exit /b

My.log

@Karen87 · 08.06.2021, 00:10

nordri, ну вроде правильный код написали. Выводит то, что нужно?

@nordri · 08.06.2021, 00:27 **[ТС]**

Выводит.

@Karen87 · 08.06.2021, 00:37

Ну и замечательно

@nordri · 08.06.2021, 01:53 **[ТС]**

Сообщение от nordri

Но вот что получилось

Вот что я хотел получить:

Windows Batch file
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
@echo off
SetLocal EnableDelayedExpansion
set "LogPatch=%~dp0My.log"
:: %~dp0 папка с батником \My.log
for /f "tokens=1 delims=><" %%a in ('type "%LogPatch%" ^| findstr /rc:"^>.*<$"') do (
set /a Number+=1
Set param+!Number!=%%a
call :#Numb !Number! %%a
)
Echo Max number string !Number! 
set /p LikeSet="Enter number  string  "
set Like=!param+%LikeSet%!
Echo %Like%
pause
exit
:#Numb
Echo String [%1] value: %2
exit /b
:#Find

Чтение содержимого файла, и вывод на экран (консоль через канал Echo) построчно, с нумерацией строк.
Для последующего выбора полученной строки и присвоение её значения set Like

@alpap · 08.06.2021, 02:45

Сообщение от nordri

Чтение содержимого файла, и вывод на экран (консоль через канал Echo) построчно, с нумерацией строк

Windows Batch file
1
2
3
@echo off
<file.txt (for /f "tokens=1* delims=" %%a in ('find /n /v ""') do @echo %%a%%b)
pause

Добавлено через 7 минут
вывести нужную строку:

Windows Batch file
1
2
3
@echo off
<"file.txt" (for /f "tokens=2 delims=[]" %%a in ('find /n /v ""^|find "[5]"') do @echo:%%a)
pause

вывести номер строки "stroka":

Windows Batch file
1
2
3
@echo off
<"file.txt" (for /f "delims=[]" %%a in ('find /n "stroka"') do @echo %%a)
pause

вывести первую строку потом свои строки потом вторую строку

Windows Batch file
1
2
3
4
5
6
7
@echo off
<file.txt (set /p s1=& set /p s2=)
echo %s1%
echo Своя строка 1
echo Своя строка N
echo %s2%
pause

FlasherX · 08.06.2021, 08:50

alpap, в общем первом случае цикл не требуется:

Windows Batch file
1
find/n /v "" file.txt

Windows Batch file
1
findstr/nrc:.* file.txt

@nordri · 08.06.2021, 10:13 **[ТС]**

У меня придумалось вот это:

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
23
24
25
26
27
28
@echo off
:#St
rem chcp 1255>nul
SetLocal EnableDelayedExpansion
set "LogPatch=%~dp0My.log"
for /f "tokens=1 delims=><" %%a in ('type "%LogPatch%" ^| findstr /rc:"^>.*<$"') do (
set /a Number+=1
Set Param+!Number!=%%a
call :#Num !Number! "%%a"
)
echo.
Echo Max number string !Number! 
echo.
choice /c !NumberString! /M "Enter number string  "
for /f "tokens=1 delims=" %%l in ('echo !Param+%errorlevel%!') do set "LikeChoise=%%l"
echo.& echo Your choise %errorlevel% string with value   !LikeChoise!
pause
cls
ENDLOCAL
rem exit
goto #St
:#Num
echo.
Echo String [%1] value: %2
set NumberString=!NumberString!!Number!
rem echo !NumberString!
::последовательность строк 1 12 123 1234
exit /b

За то интересно получилось с ключами Choise.

Code
1
2
3
for /f "tokens=1 delims=" %%l in ('echo !Param+%errorlevel%!') do set "LikeChoise=%%l"
echo.& echo Your choise %errorlevel% string with value   !LikeChoise!
set NumberString=!NumberString!!Number!

Еще раз, исходный файл.

My.log

Изначально все нужные строки обрамлены ><

@Garry Galler · 08.06.2021, 14:34

Сообщение от nordri

У меня придумалось вот это

Откуда такое желание писать именно нечитабельные программы?
Если взять любой рандомный язык программирования, то рядом с ним код на batch с очень большой вероятностью будет похож на рандомный набор символов.

Просто сравни.

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
os.execute("chcp 1251 > nul")
 
text = [[>4556<
>4654566<
2121
>89878978<]]
 
data = {} 
cnt = 1  
for m in text:gmatch(">(%d+)<") do 
    data[cnt] = m ; cnt = cnt+1  
end
print("Max number string:", cnt) 
-- ожидание пользовательского ввода
while true do 
    io.write("Введите номер строки:")
    n = io.read()
    if n == "q" then -- выход
        break; end 
    n = tonumber(n)
    -- если ввели число и в таблице есть строка с таким индексом
    if n ~= nil then
        if n == -1 then
            -- вывод всей таблицы: номер строки=значение
            for i,v in ipairs(data) do print(i,v) end    
        else  -- вывод по номеру строки 
            print(data[n])
        end    
        break
    end    
end

Code
1
2
3
4
5
6
7
8
9
10
11
J:\lua>lua test.lua
Max number string:      4
Введите номер строки:-1
1       4556
2       4654566
3       89878978
 
J:\lua>lua test.lua
Max number string:      4
Введите номер строки:1
4556

Это lua - самый маленький в мире интерпретируемый язык программирования. Для запуска требуется два файла:

lua.exe	119kb (интерпретатор)
lua54.dll	397kb (стандартаная библиотека)

опционально:

luac.exe

292kb (компилятор в байткод )

lua.rar

Новые блоги и статьи Все статьи Все блоги /
Жизня: рисунок укладки багажа, сделанный клодом anaschu 21.08.2026 Сделал 15 снимков, он по снимкам сделал схему.	Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .	Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .	Лето уходит kumehtar 17.08.2026
Мысли в слух kumehtar 17.08.2026 Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .	Перемещение строк из ТЧ в другой документ с учетом текущего пробега Maks 17.08.2026 Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины". За основу взят алгоритм отсюда: https:/ / www. cyberforum. ru/ blogs/ 359708/ 10838. html Задача: . . .	Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .	Часы электронные Uhbif79 12.08.2026 Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .

@nordri 1 / 1 / 0 Регистрация: 13.09.2018 Сообщений: 110

	Чтение из файла нескольких строк и присвоение их значений переменным 01.06.2021, 20:15. Показов 3840. Ответов 30 Метки bat, cmd, for in, set, token (Все метки) Помогите! Поиск не помог... Есть файл My.log `set "LogPatch=%~dp0My.log"` `>4556< >4654566< 2121 >89878978<` Строка ~~2121~~ не нужна для обработки. Мне необходимо его прочитать Bat-ником, и работать с переменными: `set Param+1=4556 set Param+2=4654566 set Param+3=89878978` 0

@nordri 1 / 1 / 0 Регистрация: 13.09.2018 Сообщений: 110
	01.06.2021, 21:52 [ТС]
	Хороший вопрос. Пока не знаю, скорей всего еще и кодировку придётся настраивать. My.log это результат другого bat. OEM086 0

@Karen87 3449 / 1110 / 494 Регистрация: 29.05.2016 Сообщений: 4,566
	08.06.2021, 00:10
	nordri, ну вроде правильный код написали. Выводит то, что нужно? 0

@nordri 1 / 1 / 0 Регистрация: 13.09.2018 Сообщений: 110
	08.06.2021, 00:27 [ТС]
	Выводит. 0

@Karen87 3449 / 1110 / 494 Регистрация: 29.05.2016 Сообщений: 4,566
	08.06.2021, 00:37
	Ну и замечательно 0

Чтение из файла нескольких строк и присвоение их значений переменным

Решение