Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Передача данных из Парадокса в Интербейз [D6, XP]

Новичок © (2007-11-06 18:29:00)
Есть таблица Парадокса
Как мне записать данные в таблицу Интербейз

Desdechado (2007-11-07 10:50:00) [1]
> begin
> s:=table1.fieldbyname('Name').AsString;
> INSERT INTO "STR_LIST"
> ("STR_FULL_NAME", "STR_CODE", "STR_SHORT_NAME", "STR_COUNT")
> VALUES (f_s, 2, s_s, NULL);
> table1.Next;
> end;
SQL прямо в тексте программы - это что-то.

Почитай про TTable.Insert или про TQuery.

Anatoly Podgoretsky (2007-11-06 22:53:00) [2]
> DrPass (06.11.2007 22:06:13) [13]

Ну пусть хоть попытается.

DrPass (2007-11-06 22:06:00) [3]

> Anatoly Podgoretsky © (06.11.07 22:00) [12]
> > Новичок (06.11.2007 21:53:11) [11]
>
> Ну набей INSERT INTO вместо INSERT INT0

Вот тут

> begin
> s:=table1.fieldbyname('Name').AsString;
> INSERT INTO "STR_LIST"
> ("STR_FULL_NAME", "STR_CODE", "STR_SHORT_NAME", "STR_COUNT")
> VALUES (f_s, 2, s_s, NULL);
> table1.Next;
> end;

это не поможет. Тут только порка поможет...

Anatoly Podgoretsky (2007-11-06 22:00:00) [4]
> Новичок (06.11.2007 21:53:11) [11]

Ну набей INSERT INTO вместо INSERT INT0
И попроси компилятор сказать ошибку по английски, тогда поймешь, что ты натворил.

Новичок (2007-11-06 21:53:00) [5]
INSERT INTO - после него ошибка. Компилятор не знает такого слова .

procedure TForm1.Button1Click(Sender: TObject);
var
s:string[100];

begin while not table1.eof do begin s:=table1.fieldbyname('Name').AsString; INSERT INTO "STR_LIST" ("STR_FULL_NAME", "STR_CODE", "STR_SHORT_NAME", "STR_COUNT") VALUES (f_s, 2, s_s, NULL); table1.Next; end; end;

Dedechado (2007-11-06 21:24:00) [6]
> Это не работает !
Прямо так и говорит? Или все-таки ошибку дает?

DrPass (2007-11-06 21:02:00) [7]

> Переменная f_s передает полное имя (FULL) из парадокса
> Переменная s_s передает короткое имя (SHORT) из парадокса

А одинарные кавычки, конечно, написать забыл, ага?

Новичок (2007-11-06 20:09:00) [8]

> Amoeba © (06.11.07 19:48) [6]
> Утилита IBDataPump (бесплатно):
> http://www.clevercomponents.com/products/datapump/ibdatapump.
> asp

Спасибо за внимание

Новичок (2007-11-06 19:49:00) [9]

> что такое твое f_s и s_s.

Переменная f_s передает полное имя (FULL) из парадокса
Переменная s_s передает короткое имя (SHORT) из парадокса

Amoeba (2007-11-06 19:48:00) [10]
Утилита IBDataPump (бесплатно):
http://www.clevercomponents.com/products/datapump/ibdatapump.asp

DrPass (2007-11-06 19:06:00) [11]

> Мастера, неужели нет возможности переписать данные

Почему же? Можно и
> INSERT INTO "STR_LIST" ("STR_FULL_NAME", "STR_CODE", "STR_SHORT_NAME",
> "STR_COUNT") VALUES (f_s, 2, s_s, NULL);

А будет работать или нет - это зависит от того, что такое твое f_s и s_s. И все остальное

Новичок (2007-11-06 18:46:00) [12]
Мастера, неужели нет возможности переписать данные кроме программы DATAPUMP ?

Новичок (2007-11-06 18:33:00) [13]
нет, наверно не так спросил.
Как программно ?

Desdechado (2007-11-06 18:32:00) [14]
DataPump из поставки Delphi

Новичок (2007-11-06 18:31:00) [15]
подскажите как правильно делать !

INSERT INTO "STR_LIST" ("STR_FULL_NAME", "STR_CODE", "STR_SHORT_NAME", "STR_COUNT") VALUES (f_s, 2, s_s, NULL);

Это не работает !

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »