[Foreigner]

Код:

@echo off
setlocal

for %%i in (USD EUR) do (

    for /f "tokens=1 delims=:" %%j in (' findstr /n "%%i" 1.txt ') do call:result %%j %%i

)
goto:eof

:result

set /a skip=%1+2
for /f "skip=%skip% tokens=1,2 delims=><" %%i in ( 1.txt ) do set "%%i=%%j" && goto:echo

:echo
1>>result.txt echo %2%value:~0,-2%

PS. Вариант на PowerShell для получения текущих курсов:

Код:

# get-currency.ps1

$date = get-date -format "dd/MM/yyyy"

$xml = new-object xml
$xml.load("http://www.cbr.ru/scripts/XML_daily.asp?date_req=$date")

"$($xml.ValCurs.Date) $($xml.ValCurs.name)" 

$result = @()
$xml.ValCurs.Valute | % { 

    $valute = @{}
    
    $valute.Code = $_.CharCode
    $valute.Name = $_.Name
    $valute.Nominal = $_.Nominal
    $valute.Value = $_.Value

    $result += $(new-object psobject -p $valute) 
 
}

$result | ft Name, Code, Nominal, Value -auto

[odin1]

Большое спасибо, что откликнулись!
К сожалению не могу понять, что не так. Но в результате только USD~0,-2.

[Iska]

odin1, возьмите лучше приведённый код на PowerShell. Там Вам сразу и загрузка, и вывод. Результат можно и отфильтровать, и вывести в файл.

[Foreigner]

odin1,
А в исходном файле нет отступов (пробелов)? Например:

Код:

Вместо:
<Value>29,6621</Value>
Есть:
    <Value>29,6621</Value>

Я исходил из приведенного куска. Если есть пробелы, то надо исправить:

Код:

...
for /f "skip=%skip% tokens=2,3 delims=><" %%i ...
...

[odin1]

Спасибо огромное! Действительно, я не обратил внимания, что эти пробелы исчезли при копировании. Сейчас все работает великолепно! Еще раз балагодарю!