Форум: "Базы";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];
ВнизПеренос таблицы БД из MS Works в Paradox Найти похожие ветки
← →
Programmer1 (2002-11-13 09:45) [0]Уважаемые мастера программирования! Подскажите, пожалуйста, как можно электронную таблицу базы данных TableName.wdb, созданную в Micrisift (R) Works Версия 2.0 1987-1990гг. преобразовать в таблицу Paradox?
Спасибо.
PS
В самом редакторе Works есть возможность преобразовать таблицу в ASCII файл, как "текст и запятые" и как "текст и табуляции".
← →
Leran2002 (2002-11-13 12:17) [1]В принципе надо просто пройтись по этому текстовому файлу, и все...
Присылай если можешь в ASCII виде (лучше сжатом РАРом или ЗИПом), что нить придумаем...
← →
Programmer1 (2002-11-15 14:37) [2]Я выслала Вам файл.
Если удастся что-нибудь сделать, то ответ отправьте пожалуйста на tetrad123@narod.ru
Спасибо :)
← →
ScareCrow (2002-11-15 15:18) [3]Уважаемая Programmer1 !
Свойство TTable.TableType может принимать значение ttASCII
(Table is a text file with comma-delimited, quoted strings for each field - Это из хелпа). Я использовал такой путь.
Вообще, для текстовой таблицы (в DELPHI) с фиксированной шириной столбцов должен присутствовать (или создавайте Сами) файл-дескриптор (*.sch) и его имя без расширения должно совпадать со значением свойства TTable.TableName
Вот как мне доводилось его формировать:
...
SCHFileName:=ExtractFileName(tbTXT.TableName); { т.е. без расширения }
AssignFile(SCHFile,SCHFileName+".sch");
Rewrite(SCHFile);
Writeln(SCHFile,"["+ExtractFileName(SCHFileName)+"]");
Writeln(SCHFile,"Filetype=Fixed");
Writeln(SCHFile,"Field1=F1,Char,15,00,00");
Writeln(SCHFile,"Field2=F2,Char,20,00,15");
Writeln(SCHFile,"Field3=F3,Char,02,00,35");
CloseFile(SCHFile);
tbTXT.Open; (tbTXT:TTable)
...
т.е. его содержимое:
[MyImportTXTFile]
Filetype=Fixed
Field1=F1,Char,15,00,00
Field2=F2,Char,20,00,15
Field3=F3,Char,02,00,35
Теперь из tbTXT делайте BatchMove в tbParadox:TTable.
Естественно, tbParadox должна существовать на диске или быть создана Вами (ручками или программно).
Если я что непонятно обяснил, спрашивайте:). И, кстати, обратите внимание на Filetype=Fixed, если Fixed вас не устраивает.
← →
Leran2002 (2002-11-15 15:49) [4]
> Programmer1 © (15.11.02 14:37)
Вы точно его выслали???
Почемуто мой ящик пуст... :((
menshov_s@mail.ru
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.007 c