Динамический SQL запрос

← →
Tigros © (2009-06-23 22:14) [0]

Как правильно сделать запрос на добавление записи нескольких полей из 2-3 баз Paradox?
Такой вариант не прокатывает:

Query3.Close;
Query3.SQL.Clear;
Query3.SQL.Add("Insert Into Fisik");
Query3.SQL.Add("(F_Kod_Der,F_Kod_Ulica,F_Fam,F_Name, F_Otch,F_Dom,F_Kv,F_Tip)");
Query3.SQL.Add("Values("+IntToStr(KDer)+","+IntToStr(KUlic)+","+Edit1.Text+","+Edit2.Text+","+Edit3.Text+","+Edit6.Text+","+Edit4.Text+","+Tips+")");
Query3.ExecSql;

Подскажите где ошибка?

← →
Сергей М. © (2009-06-23 22:28) [1]

Ошибка в "непрокатывании такого варианта".

← →
turbouser © (2009-06-23 22:28) [2]

> Tigros © (23.06.09 22:14)

...+QuotedStr(Edit1.Text)+... и т.д. с Editxxx

← →
turbouser © (2009-06-23 22:31) [3]

строки должны заключаться в апострофы.
а вообще - надо использовать параметрические запрсы

ps
в данном случае динамически составлять запрос вообще не вижу смысла...

← →
Loginov Dmitry © (2009-06-23 22:58) [4]

> Как правильно сделать запрос на добавление записи нескольких
> полей из 2-3 баз Paradox?
> Такой вариант не прокатывает:

А причем здесь Paradox (аж в 2-3 базах)?

← →
Anatoly Podgoretsky © (2009-06-23 23:01) [5]

> Tigros (23.06.2009 22:14:00) [0]

Ошибка в неиспользование параметров.

← →
Tigros © (2009-06-24 12:16) [6]

Понятно. Тогда подскажите небольшой пример параметрического запроса для n-го количества полей. пжа-л-л-ста!!!

← →
Anatoly Podgoretsky © (2009-06-24 12:38) [7]

> Tigros (24.06.2009 12:16:06) [6]

Точно также как и для одного параметра.

← →
Tigros © (2009-06-24 13:52) [8]

Бальшой спасибо Turbouser вопрос решился с помощью QuotedStr. Поплыл я дале...

← →
Sergey13 © (2009-06-24 13:56) [9]

> [8] Tigros © (24.06.09 13:52)
> вопрос решился с помощью QuotedStr. Поплыл я дале...

Ну поплавай до работы с датами. 8-)

← →
Anatoly Podgoretsky © (2009-06-24 15:05) [10]

> Tigros (24.06.2009 13:52:08) [8]

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

← →
uno-84 (2009-06-24 15:22) [11]

возможно надо приблизительно так:
Query3.Close; Query3.SQL.Clear; Query3.SQL.Add("Insert Into Fisik " + "(F_Kod_Der, F_Kod_Ulica, F_Fam, F_Name, F_Otch, " + "F_Dom, F_Kv, F_Tip) " + "Values" + "(:F_Kod_Der, :F_Kod_Ulica, :F_Fam, :F_Name, "+ ":F_Otch, :F_Dom, :F_Kv, :F_Tip )"); ParamByName("F_Kod_Der").AsInteger := KDer; ParamByName("F_Kod_Ulica").AsInteger := KUlic; ParamByName("F_Fam").AsString := Edit1.Text; ParamByName("F_Name").AsInteger := Edit2.Text; ParamByName("F_Otch").AsInteger := Edit3.Text; ................................................................... .................................................................. Query3.ExecSql

← →
uno-84 (2009-06-24 15:23) [12]

вернее
ParamByName("F_Name").AsString := Edit2.Text; ParamByName("F_Otch").AsString := Edit3.Text;

> Query3.SQL.Clear;
> Query3.SQL.Add("Insert Into Fisik " +
>

> вернее
>

Query3.SQL.Text :=

← →
uno-84 (2009-06-24 16:51) [14]

Можно и так, суть не меняется

Всем спасибо за подробный ответ. После примеров все стало ясно. Еще один вопрос с Update так-же поступить через параметры или нет?

Во всех случаев параметры

uno-84 ! покажи на примере как это делать. Я что-то не так слепил. у меня он ругается на несоответствиет типов: "Type mismatch in expression"??? плз.

Пример приведен, а что толку в новом, если у тебя другой текст с несоответствием типов и никто гадать не будет, где несоответствие.

Динамический SQL запрос Найти похожие ветки