Как извлечь данные в мемо поле FoxPro с помощью .NET? - PullRequest
2 голосов
/ 09 января 2009

Я пишу программу на C # для преобразования базы данных FoxPro в XML, и все работает, за исключением того, что поле memo пустое. Я что-то упускаю, чтобы преобразовать этот бит?

Я использую C # .Net 3.5 SP1, драйвер OLE DB для Visual FoxPro 9 SP 1. Строка подключения в порядке, так как все остальные данные обрабатываются правильно.

Когда я конвертировал базу данных FoxPro в SQL Server, мемо-поле там также пусто, поэтому я не могу конвертировать дважды.

Ответы [ 3 ]

3 голосов
/ 12 января 2009

Закончилось тем, что мне пришлось поработать самостоятельно, но, возможно, это поможет кому-то еще в будущем:

        public static object GetDbaseOrFoxproRawValue(string DBPath, string TableName, string ColumnName, 
        string CompareColumnName, string CompareValue, bool CompareColumnIsAutoKey)
    {
        using (BinaryReader read = new BinaryReader(File.Open(
            Path.Combine(DBPath, TableName + ".dbf"), FileMode.Open, FileAccess.Read, FileShare.ReadWrite)))
        {
            // Is it a type of file that I can handle?
            if (new byte[] { 0x02, 0x03, 0x30, 0x43, 0x63, 0x83, 0x8b,
                             0xcb, 0xf5, 0xfb }.Contains(read.ReadByte()))
            {
                // Skip date.
                read.BaseStream.Seek(3, SeekOrigin.Current);

                // Read useful datas...
                uint RecordCount = read.ReadUInt32();
                ushort FirstRecord = read.ReadUInt16();
                ushort RecordLength = read.ReadUInt16();
                int FieldCount = FirstRecord - 296 / 32;

                // Make sure things aren't stupid.
                ColumnName = ColumnName.ToLower();
                CompareColumnName = CompareColumnName.ToLower();

                // Find target column (field)
                string temp;
                UInt32 CompareFieldOffset = uint.MaxValue, FieldOffset = uint.MaxValue;
                byte CompareFieldLength = 0, FieldLength = 0;
                char FieldType = ' ';
                for (int i = 0; i < FieldCount; i++)
                {
                    read.BaseStream.Seek(32 + (i * 32), SeekOrigin.Begin);
                    temp = Encoding.ASCII.GetString(read.ReadBytes(11)).Replace("\0", "").ToLower();
                    if (temp == CompareColumnName)
                    {
                        read.ReadChar();
                        CompareFieldOffset = read.ReadUInt32();
                        CompareFieldLength = read.ReadByte();
                    }
                    if (temp == ColumnName)
                    {
                        FieldType = read.ReadChar();
                        FieldOffset = read.ReadUInt32();
                        FieldLength = read.ReadByte();
                    }

                    if (CompareFieldOffset != uint.MaxValue && FieldOffset != uint.MaxValue)
                        break;
                }

                // Make sure we can continue.
                if (CompareFieldOffset == uint.MaxValue || 
                    FieldOffset == uint.MaxValue) return null;

                // Iterate through each record to find the one we want.
                for (int index = 0; index < RecordCount; index++)
                {
                    read.BaseStream.Seek(FirstRecord + (index * RecordLength) + CompareFieldOffset, SeekOrigin.Begin);
                    temp = Encoding.Default.GetString(read.ReadBytes(CompareFieldLength)).Replace("\0", "");
                    if (temp == CompareValue)
                    {
                        read.BaseStream.Seek(FirstRecord + (index * RecordLength) + FieldOffset, SeekOrigin.Begin);
                        switch (FieldType)
                        {
                            case 'M':
                            case 'I': return read.ReadUInt32();
                            case 'C':
                            default: return Encoding.Default.GetString(read.ReadBytes(FieldLength)).Replace("\0", "");
                        }
                    }
                }
            }
            else
            {
                return null;
            }
        }

        return null;
    }

Просто возьмите полученный результат и используйте его в качестве индекса в файле memo (этот код довольно прост с использованием документации MSDN).

1 голос
/ 09 января 2009

Я использую ODBC для связи таблиц VFP 8, и мемо поля работают без проблем. Я не знаю, если OLEDB отличается.

Возможно, здесь нет таблиц Visual FoxPro. Многие системы VFP используют те же таблицы, что и приложения FoxPro 2 или dBase, которые они заменили. Вы можете посмотреть на заголовок файла или просто попробовать один из других драйверов ODBC, чтобы увидеть, работают ли они.

1 голос
/ 09 января 2009

Я не очень знаком с C #, FoxPro или SQL Server, поэтому не могу дать вам много советов на этот счет.

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

Какой самый простой способ прочитать файл FoxPro DBF из Python?

Верьте или нет, эти форматы файлов довольно просто анализировать, если вы решите написать собственный синтаксический анализатор C #. Эти спецификации доступны от Microsoft:

...