Ищу сорцы парсера DBF-файлов

[Ёрик]

Ищу сорцы парсера DBF-файлов. К сожалению, стандартные методы вроде ADO не подходят, ибо в читаемой базе некоторые поля не соответствуют формату dbf (и их нужно поскипать при чтении).

[GSerg]

Если поля не соответствуют формату dbf, почему ты думаешь, что парсер dbf не пошлёт тебя так же, как ADO?

[Andrey Fedorov]

Может это и не DBF?

Вообще у DBF-ов очень простая структура - по F4 в FAR-e все хорошо просматривается. Вот у парадоксовских накрученно...

В общем, в яндексе поиск по словам структура DBF файлов тебе поможет. А парсер уже можно и самому набросать, если оно действительно надо...

[Ёрик]

Если поля не соответствуют формату dbf, почему ты думаешь, что парсер dbf не пошлёт тебя так же, как ADO?

Парсер конечно же пошлет, но имея сорцы я пропущу нужные (т.е. ненужные) столбцы.

[Ёрик]

Может это и не DBF?

Вообще у DBF-ов очень простая структура - по F4 в FAR-e все хорошо просматривается. Вот у парадоксовских накрученно...

В общем, в яндексе поиск по словам структура DBF файлов тебе поможет. А парсер уже можно и самому набросать, если оно действительно надо...

Да вроде dbf, просто криво используемый. Структуру я нашел, но я увы ограничен временем, поэтому ищу хоть что-нибудь готовое.

[GSerg]

Не знаю, насколько это полезно... Но можно попытаться извлечь пользу даже из главного носителя синдрома
http://basicproduction.nm.ru/BPDBF.rar

[Ёрик]

Не знаю, насколько это полезно... Но можно попытаться извлечь пользу даже из главного носителя синдрома
http://basicproduction.nm.ru/BPDBF.rar

Спасибо, попробую разобраться!

[RayShade]

Могу посоветовать почитать книжку Гюнтера Борна Форматы Данных.

BHV, 1995 год ISBN 5-87685-023-3

Познавательная вещь

[nouyana]

Не знаю, насколько это полезно... Но можно попытаться извлечь пользу даже из главного носителя синдрома
http://basicproduction.nm.ru/BPDBF.rar

Обновлённая ссылка на BPDBF.rar

В архиве есть тестовый пример, который создаёт файл readme.dbf. Этот файл не открывается ни при помощи Access, ни при помощи DBF Commander. Смог открыть его только при помощи Excel.

В качестве альтернативы нашёл в сети класс clsDBF. И зеркало на всякий случай. Класс хорошо прокомментирован и работает более стабильно на мой взгляд (сильно не тестировал). При этом класс не использует ни OemToChar, ни CharToOem. То есть вся работа с кодировками "зашита" в коде класса. Пример работы с ним:

Код: Выделить всё

Sub Main()
   Dim dbf As New clsDBF
   With dbf
      Call .CreateNewFile(App.Path & "\test.dbf", .xDBFType_dBASE_III, .xDBFCharsetDOS866, True)
      Call .CreateField("TESTFLD", 10, , 255)
      .SaveNewFile
     
      .MoveFirst
      .AddNew
      .SetFieldValue(0) = "Привет"
      .Update
     
      .MoveFirst
      Debug.Print .GetFieldValue(0)
   End With
   Set dbf = Nothing
End Sub