Exel в Paradox

← →
Андрей_1 © (2008-06-30 02:39) [0]

Подскажите пожалуйста как преобразовать таблицу Exel в Paradox. Мне надо некие расписания загнать в свою прогу и делать отбор определенных строк в определенное время, т.е. видеть текущее событие. Расписания меняются каждую неделю(бывает даже чаще). Каждый раз это новый файл .xls.

← →
Виталий Панасенко(дом) (2008-06-30 11:35) [1]

OLE Automation or ADO тебе в помощь

← →
Alex7 (2008-06-30 14:20) [2]

Можно сохранять как Excel 5 (старая версия). Затем из Paradox-а вызвать мастера импорта данных. Excel-5 он прочитает и создаст таблицу Paradox.

← →
Виталий Панасенко(дом) (2008-06-30 15:32) [3]

> Alex7 (30.06.08 14:20) [2]
>
> Можно сохранять как Excel 5 (старая версия). Затем из Paradox-
> а вызвать мастера импорта данных. Excel-5 он прочитает
> и создаст таблицу Paradox.
>

А интересно, где в Д взять Парадокс? Достаточно указанных мною средств. При чем АДО - вообще мухой(за редким исключением)

← →
oldman © (2008-06-30 15:36) [4]

Таблица большая?
Можно тупо:
1. В Excel SaveAsDBF
2. В проге конвертирования dbf->db хоть построчно.
3. В нужной проге работаем уже с db (хотя, почему не с dbf?)

← →
Андрей_1 © (2008-07-02 05:37) [5]

> Таблица большая?
> Можно тупо:
> 1. В Excel SaveAsDBF
> 2. В проге конвертирования dbf->db хоть построчно.
> 3. В нужной проге работаем уже с db (хотя, почему не с dbf?
> )

Так я делал, получается. Сохраняю в dbf, загоняю в Table, перевожу в парадокс:
begin
Table1.First;
While Table1.Eof=false do
begin
Table2.Insert;
Table2TIME.Value:=Table1_.AsString;
Table2FILM.Value:=ConvertOemToAnsi(Table1N2.Value);
//Table2Otr.Value:=ConvertOemToAnsi(Table1BDEDesigner.Value);
Table2.Next;
Table1.Next;
end;
Table1.First;
Table2.First;

Потом удаляю ненужное и работает.
Таилица не большая. Просто если бы я постоянно сидел и преобразовывал, а то другие люди (user) этим пользуются.
Хочется сделать так:
По сетке скидываю в определенную папку, а юзер тупо нажимает кнопку и расписание сменилось!

> While Table1.Eof=false do

While тще Table1.Eof do

> Table2.Next;

Лишнее, потеря времени.

Стесняюсь спросить, а зачем это ConvertOemToAnsi, это же и так делается прозрачно, для того что бы это делать надо предпринимать особые действия.

Если dbf, то шрифт только Терминал. А после конвертации мне доступны все шрифты, и если SQL-запросы делать, то в этом виде удобнее. В принципе это действие только нажатие кнопки, но под эту кнопку прописать бы еще загрузку из .xls.
А что значит прозрачно. У меня не получалось работать нормально с базой без конвертирования.

Exel в Paradox Найти похожие ветки