[DJ Mogarych]

Powershell

Код:

$dbfSrc = 'C:\temp\dbf\sprav.dbf'
$dbfCsv = 'C:\temp\dbf\sprav.csv'
$txtSrc = 'C:\temp\dbf\vvod.TXT'
$txtDst = 'C:\temp\dbf\vyvod.TXT'

& 'C:\Users\User\AppData\Local\Programs\DBF Converter\dbfcnv.exe' $dbfSrc $dbfCsv
$dbf = Import-Csv $dbfCsv -Encoding default -Header 1,2 |% {"$($_.1) - $($_.2)"}
$meta = gc $txtSrc -encoding utf8 |select -first 7
$csv = gc $txtSrc -encoding utf8 |select -skip 7 |ConvertFrom-Csv -Delimiter ';' -Header (1..66)

$c = 0
$csv |% {
    $_.21 = $dbf[$c]
    $c++
}

$meta |Out-File $txtDst -Encoding utf8
$csv |Convertto-Csv -delimiter ';' -NoTypeInformation |select -skip 1 |Out-File $txtDst -Encoding utf8 -Append

Конвертеры dbf2csv:

• https://gist.github.com/mavericksevm...a4c5c3c7a8ee57 - не понимает кодировку русских букв без настройки, не стал разбираться.
• https://www.dbf2002.com/dbf-converte...bf-to-csv.html - использован в скрипте.
• https://www.convert-in.com/dbf2csv.htm - не пробовал.

[YuS_2]

Technik_spat,
Ещё есть варианты на основе powershell, но с установкой доп.модуля или сторонней библиотеки:
1. https://github.com/Delapro/PSDBF
2. https://gist.github.com/mavericksevm...a4c5c3c7a8ee57
- уже есть ссылка в сообщении выше
или вариант на питоне (тоже потребуется установка доп. батарейки)
cmd:

Код:

pip install dbfpy3

и сам код чтения на питоне:

Код:

from dbfpy3 import dbf

db = dbf.Dbf("sprav.dbf")
f = lambda x: x.decode('cp1251')
print(list(map(f,db.field_names)))
for item in db:
    print(list(item))

- если интересно, то можно написать код для конвертации...

[Technik_spat]

Премного БЛАГОДАРЕН))))))
Буду дальше скрипт pwsh развивать)))))
К сожалению, с пайтоном вообще не знаком((((((

[Technik_spat]

К сожалению файл через питон не сохраняется

[YuS_2]

Technik_spat,
подробности бы...
А так, в соответствии с первым постом:
python

Код:

import os
from dbfpy3 import dbf
fin = 'vvod.txt'
fdbf = 'sprav.dbf'
fout = 'out.txt'
file_path = os.path.abspath(__file__)
os.chdir(os.path.dirname(file_path))
db = dbf.Dbf(fdbf)
out,i = [],0
z = [(item[0] + ' - ' + item[1]) for item in db]
with open(fin,"r", encoding='utf-8') as f:
    for line in f:
        if ';' in line:
            tmp = line.split(';')
            tmp[20] = z[i]
            out.append(';'.join(tmp))
            i += 1
        else:
            out.append(line)

with open(fout,'w',encoding='utf-8') as fw:
    for lin in out:
        fw.write(lin)

все файлы необходимо положить рядом с файлом скрипта python...

[Technik_spat]

Technik_spat, подробности бы... А так, в соответствии с первым постом: python »

Скрипт отрабатывает, но файл не создается.
Вообще первоначальная задача:
из файла sprav.dbf ивзлечь 2 и 18 колонки, а ещё бы сразу в ANSI преобразовать.

[YuS_2]

но файл не создается. »

Покажите результат работы скрипта, то, что отображается в консоли.

Вообще первоначальная задача »

Вы можете отредактировать стартовый пост в этом топике и изложить задачу так, как необходимо.
Пример того, что должно получится в итоге и того файла, откуда необходимо получать данные, тоже надо бы добавить.

ещё бы сразу в ANSI преобразовать. »

ANSI — стандарты ANSI (American National Standards Institute, Национальный институт стандартизации США).
А вот какая кодировка требуется, это надо уточнить.
Доступные кодировки
Предполагаю, что требуется Windows-1251, тогда:

Код:

import os
from dbfpy3 import dbf
# Файлы должны находиться рядом со скриптом,
# либо можно указать абсолютный путь к ним:
fin = 'vvod.txt'
fdbf = 'sprav.dbf'
fout = 'out.txt'

file_path = os.path.abspath(__file__)
os.chdir(os.path.dirname(file_path))
db = dbf.Dbf(fdbf)
out,i = [],0
z = [(item[0] + ' - ' + item[1]) for item in db]
with open(fin,"r", encoding='utf-8') as fr:
    for line in fr:
        if ';' in line:
            tmp = line.split(';')
            tmp[20] = z[i]
            out.append(';'.join(tmp))
            i += 1
        else:
            out.append(line)

with open(fout,'w',encoding='cp1251') as fw:
    fw.writelines(out)

[Technik_spat]

»

Вы знаете, задача отпала в том виде в котором она вообще есть)))))
СПАСИБО ВСЕМ ЗА ПОМОЩЬ))))

[YuS_2]

"Не спеши выполнять работу, её могут отменить"