Come estrarre i dati in un campo memo FoxPro utilizzando .NET?

Question

Sto scrivendo un programma C # per convertire un database FoxPro in XML e tutto funziona tranne il campo memo è vuoto. C'è qualcosa che mi manca per convertire quel bit?

Sto usando C # .Net 3.5 SP1, driver OLE DB di Visual FoxPro 9 SP 1. La stringa di connessione è a posto, poiché tutti gli altri dati vengono estratti correttamente.

Quando ho convertito il database FoxPro in SQL Server, anche il campo memo è vuoto lì, quindi non posso convertirlo due volte.

Answer 1

Alla fine ho dovuto fare un po 'di lavoro da solo, ma forse può aiutare qualcun altro in futuro:

        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;
    }

Prendi semplicemente il risultato e usalo come indice nel file memo (quel codice è piuttosto semplice usando la documentazione MSDN).

Answer 2

Non ho molta familiarità con C # o FoxPro o SQL Server, quindi non posso darti molti consigli a riguardo.

Tuttavia, se non riesci a trovare un driver adatto, potresti considerare di analizzare tu stesso i dati grezzi e i file di memo. Un'altra domanda ha affrontato questo problema:

Qual è il modo più semplice per leggere un file DBF FoxPro da Python?

Che ci crediate o no, questi formati di file sono abbastanza semplici da analizzare se decidete di scrivere il vostro parser C #. Queste specifiche sono disponibili da Microsoft:

• Strutture dei file di Visual FoxPro
• Struttura dei file delle tabelle
• Struttura dei file dei memo

Answer 3

Uso ODBC per collegare le tabelle VFP 8 e i campi memo funzionano senza problemi. Non so se OLEDB è diverso.

Qui potresti non avere tabelle di Visual FoxPro. Molti sistemi VFP utilizzano le stesse tabelle dell'applicazione FoxPro 2 o dBase che hanno sostituito. Puoi guardare l'intestazione del file o semplicemente provare uno degli altri driver ODBC per vedere se funzionano.