Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Запись в базу из файла

Автор: Dron84 27.11.2005, 02:38

Напимер, есть текстовой документ, в нём записаны какие-то данные в строку. Есть база данных. Вопрос, как прочитать эти данные и записать в нужные поля базы, при том что некоторын поля могут быть пустыми... Если можно, небольшой пример...

Автор: FRAGNATIC 27.11.2005, 03:14

смотря какая база =)
а так моно и просто считывать с файла и добовлять в БД
но лучше экспорт , но это уже смотря какая база =)

Автор: Sergus 27.11.2005, 08:40

Я делал таким образом:

Код


var
Import : textfile;
KOD    : string[3];
NAME   : string[10];
SURNAME: string[15];

begin

Basa.Open;
AssignFile(Import, ExtractFilePath(Application.Exename)+'\Import\import.txt');
Reset(Import);
    try
        while not Eof(Import) do
            begin
        Readln(Import, KOD, NAME, SURNAME);
        Basa.Insert;
        Basa['KOD']:=KOD;
        Basa['NAME']:=NAME;
        Basa['SURNAME']:=SURNAME;
        Basa.Post;
        end;
    finally
            Close(Import;)
            end;
end;

В принципе, можно переделать под свою задачу...
(строка в текстовике состояла из KOD + NAME + SURNAME)

Автор: Dron84 27.11.2005, 14:59

FRAGNATIC
база Paradox

Sergus
а какой формат строки у тебя используется?