如何将 DataTable 保存到 .DBF？

Question

我一直在开发一个程序来读取 dbf 文件，处理数据，然后将其保存回 dbf。 我遇到的问题具体与写作部分有关。

    private const string constring = "Driver={Microsoft dBASE Driver (*.dbf)};"
                                   + "SourceType=DBF;"
                                   + "DriverID=277;"
                                   + "Data Source=¿;"
                                   + "Extended Properties=dBASE IV;";
    private const string qrystring = "SELECT * FROM [¿]";
    public static DataTable loadDBF(string location)
    {
        string filename = ConvertLongPathToShort(Path.GetFileName(location));
        DataTable table = new DataTable();
        using(OdbcConnection conn = new OdbcConnection(RTN(constring, filename)))
        {
            conn.Open();
            table.Load(new OdbcCommand(RTN(qrystring, filename), conn).ExecuteReader());
            conn.Close();
        }
        return table;
    }

    private static string RTN(string stmt, string tablename)
    { return stmt.Replace("¿", tablename); }

    [DllImport("Kernel32", CharSet = CharSet.Auto)]
    static extern Int32 GetShortPathName(
    String path,                // input string
    StringBuilder shortPath,    // output string
    Int32 shortPathLength);     // StringBuilder.Capacity

    public static string ConvertLongPathToShort(string longPathName)
    {
        StringBuilder shortNameBuffer;
        int size;

        shortNameBuffer = new StringBuilder();

        size = GetShortPathName(longPathName, shortNameBuffer, shortNameBuffer.Capacity);
        if (size >= shortNameBuffer.Capacity)
        {
            shortNameBuffer.Capacity = size + 1;
            GetShortPathName(longPathName, shortNameBuffer, shortNameBuffer.Capacity);
        }

        return shortNameBuffer.ToString();
    }

这就是我正在处理的事情。 我尝试了多种方法来写入新文件，但没有一种有效。 老实说，虽然通常我会是形式和功能的倡导者，但我只是想让该死的东西发挥作用，这个应用程序应该做一件非常具体的事情，它不会模拟天气。

-=# 编辑 #=-

由于时间压力，我已经停止使用该应用程序，但在废弃它之前，我意识到我正在使用的 dbf 的特定格式没有主键信息。 这当然意味着我必须将数据读取到 DataTable 中，对其进行处理，然后擦除 dbf 中的所有记录并从头开始插入所有内容。 管它呢。

Answer 1

对于将来来这里的人：我今天写了这篇文章，效果很好。 文件名不带扩展名 (.dbf)。 路径（用于连接）只是目录路径（无文件）。 您可以将数据表添加到数据集并将其传入。此外，我的一些数据类型是 FoxPro 数据类型，可能不与所有 DBF 文件兼容。 希望这可以帮助。

    public static void DataSetIntoDBF(string fileName, DataSet dataSet)
    {
        ArrayList list = new ArrayList();

        if (File.Exists(Path + fileName + ".dbf"))
        {
            File.Delete(Path + fileName + ".dbf");
        }

        string createSql = "create table " + fileName + " (";

        foreach (DataColumn dc in dataSet.Tables[0].Columns)
        {
            string fieldName = dc.ColumnName;

            string type = dc.DataType.ToString();

            switch (type)
            {
                case "System.String":
                    type = "varchar(100)";
                    break;

                case "System.Boolean":
                    type = "varchar(10)";
                    break;

                case "System.Int32":
                    type = "int";
                    break;

                case "System.Double":
                    type = "Double";
                    break;

                case "System.DateTime":
                    type = "TimeStamp";
                    break;
            }

            createSql = createSql + "[" + fieldName + "]" + " " + type + ",";

            list.Add(fieldName);
        }

        createSql = createSql.Substring(0, createSql.Length - 1) + ")";

        OleDbConnection con = new OleDbConnection(GetConnection(Path));

        OleDbCommand cmd = new OleDbCommand();

        cmd.Connection = con;

        con.Open();

        cmd.CommandText = createSql;

        cmd.ExecuteNonQuery();

        foreach (DataRow row in dataSet.Tables[0].Rows)
        {
            string insertSql = "insert into " + fileName + " values(";

            for (int i = 0; i < list.Count; i++)
            {
                insertSql = insertSql + "'" + ReplaceEscape(row[list[i].ToString()].ToString()) + "',";
            }

            insertSql = insertSql.Substring(0, insertSql.Length - 1) + ")";

            cmd.CommandText = insertSql;

            cmd.ExecuteNonQuery();
        }

        con.Close();
    }

    private static string GetConnection(string path)
    {
        return "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + path + ";Extended Properties=dBASE IV;";
    }

    public static string ReplaceEscape(string str)
    {
        str = str.Replace("'", "''");
        return str;
    }

Answer 2

您正在使用哪种 dbf 文件？ （有几个，例如 dBase、FoxPro 等不是 100% 兼容。）我已经让它与 C# 中的 Microsoft Visual FoxPro OleDB Provider 一起使用，您可以尝试一下，而不是使用 dBase ODBC 驱动程序。

Answer 3

使用 ADO.Net 读取和写入 dbf 文件非常慢，因此我建议您使用替代方法。

一种选择是使用旧的 DAO 3.6 库。 这要快得多并且兼容，但依赖于 com 对象才能工作。

更好的方法是使用开源 DBFExporter 组件。 它可能需要一些代码来设置（您需要一个具有描述记录集的属性的类，并且这些属性必须设置某些属性），但之后它就可以很好地工作。 它使用起来很快，但它不读取 dbf 文件。 该组件是 LGPL 下的许可证，因此您应该能够在商业代码中使用它。