Чтение DBF файлов

Question

Мне нужно читать и писать файлы DBF. Microsoft отказалась от поддержки этого в Office 2013.

Я пытаюсь использовать OLEDB. Проблема, с которой я столкнулся на данный момент (не вдаваясь в подробности), заключается в том, что когда я читаю информацию заголовка, она возвращается отсортированной по алфавиту, а строки не сортируются таким образом. Мне нужно сохранить их в том же порядке, чтобы я мог вернуться и создать файлы dbf (после некоторой обработки данных), чтобы вернуться к моим старым приложениям, которым требуется БД.

Это для внутреннего распространения, поэтому я могу позаботиться о правильной библиотеке.NET при необходимости. Я не могу найти ссылки, которая решает эту проблему, и я скорее использую технологию.NET, чем писать dbf с нуля...

Я прошу прощения, если на этот вопрос уже был дан ответ, и я был бы признателен за указание на правильный способ выполнения этой задачи.

Код для подражания

if (intype == 6)  //dbase
{
    int rowCount = 0;
    int colCount = 0;
    string npath = filein;
    i = npath.LastIndexOf("\\");
    aux2 = MySubStr(npath, i + 1, 1);  // directory  --- internal library
    auxstr = MySubStr(npath, i + 1, 2);
    i = auxstr.IndexOf(".");
    if (i > -1)
        auxstr = MySubStr(auxstr, i, 1);                         
    DataSet ds = new DataSet();
    OleDbConnection connection;
    string connstr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source = '"; // I can change this to proper library
    connstr = string.Concat(connstr, aux2);
    connstr = string.Concat(connstr, "';");
    connstr = string.Concat(connstr, "Extended Properties='dBASE 5.0';");  // again not worried about DBASE 3 or 4
    connection = new OleDbConnection(connstr);
    try
    {
        connection.Open();                            
        DataTable dbSchema = connection.GetOleDbSchemaTable(OleDbSchemaGuid.Columns, new object[] { null, null, auxstr, null });
        i = 0;
        foreach (DataRow rownm in dbSchema.Rows)
        {
            header[i] = rownm["COLUMN_NAME"].ToString();
            myDT[i++] = rownm["DATA_TYPE"].ToString();  // not using at this point... will be used when writing dbfs
        }
        colCount = i;

        aux2 = "Select * from ";
        aux2 = string.Concat(aux2, auxstr); 
        OleDbDataAdapter da = new OleDbDataAdapter(aux2, connection);
        da.Fill(ds,"ZDATA");
        count = ds.Tables[0].Rows.Count;
    }
    catch (Exception e)
    {
        auxstr = e.ToString();
        messages[cntmsgs++] = auxstr;
        zcode = 99;
        logerror(messages, cntmsgs, zcode);
        return 99;
    }
    System.Data.OleDb.OleDbCommand cmd1 = new System.Data.OleDb.OleDbCommand(aux2, connection);
    OleDbDataReader reader;
    reader = cmd1.ExecuteReader();
    StreamWriter ftmp = new StreamWriter(fileout[0], false, System.Text.Encoding.Default);

    while (reader.Read())
    {
        if (rowCount == 0)
        {
            auxstr ="";
            for (i = 0; i < colCount -1; i++)
            {
                auxstr += "\"" + header[i] + "\",";
            }
            auxstr += "\"" + header[colCount - 1] + "\"";
            ftmp.WriteLine(auxstr);
            rowCount++;
        }
        aux2 = "";
        for (i = 0; i < reader.FieldCount; i++)
        {
            if (reader.IsDBNull(i))
                auxstr = "";
            else
                auxstr = reader.GetString(i);
            auxstr = "\"" + auxstr + "\"";
            if (i < reader.FieldCount - 1)
            {
                auxstr = string.Concat(auxstr, ",");
                aux2 = string.Concat(aux2, auxstr);
            }
            else
            {
                aux2 = string.Concat(aux2, auxstr);
            }
        }
        ftmp.WriteLine(aux2);
    }
    ftmp.Close();
    reader.Close();
    connection.Close();
    filein = fileout[0];
    intype = 2;  // right now forcing additional processing in another block...
    return 0;
}

Answer 1

Вы упоминаете файлы.dbf, но действительно ли они dBASE 5 или это просто соединение, которое вы смогли получить. Я лично использовал поставщика Microsoft Visual Foxpro OleDb. Вы можете установить соединение, запросить таблицы, создать параметризованный выбор, вставить, обновить, удалить, и вам не нужно знать заголовок и тому подобное.

Есть много вопросов о соединениях с таблицами dbf и тому подобным, но я обычно использую OleDbDataAdapter, помещаю свою команду для выполнения в этом и перетаскиваю данные через.Fill() в объект DataTable.

Тогда я могу делать такие вещи, как

foreach( DataColumn dc in MyTable.Columns )
   [write whatever output of things like dc.ColumnName, dc.Type, etc]

foreach( DataRow dr in MyTable.Rows )
{
   write out...  dr["WhateverColumn"]
}

Нет, не точный код, но с ним просто работать. Создание команд для возврата данных также очень просто. Но если ваша большая задача - записать содержимое... Вы действительно пытаетесь переписать таблицу и преобразовать все в строки?

Другой комментарий о слишком большом количестве шума является точным... В общем, да, Microsoft отказалась от поддержки чего бы то ни было, но что вы ХОТИТЕ делать.