Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

SQL-запрос программно [D5, Paradox]


rh ©   (2003-08-25 08:56:00) 

Необходимо программно выполнить следующий запрос

insert into SMSERV (IDSMSERV, CODE, IDDEM_GR) values (58, "qwerty",4689)
пишу так

with Query1 do
begin
SQL.Clear;
SQL.Add ("insert into SMSERV ");
SQL.Add ("(IDSMSERV, CODE, IDDEM_GR) ");
SQL.Add ("values (");
SQL.Add (id_number);
SQL.Add (",");
SQL.Add (""");
SQL.Add (str_cell);
SQL.Add (""");
SQL.Add (",");
SQL.Add (iddem_gr);
end;
Query1.ExecSQL;


На строке SQL.Add ("""); - ошибка - понимаю что так неправильно записывать, но надо же как-то вставить апостроф.
Как это сделать? Подскажите плиз...


Соловьев   (2003-08-26 10:07:00) [1]

А можно через параметры - быстрее будет, или на крайний случай Format


Dens   (2003-08-25 20:48:00) [2]

А можно заменить апостроф конструкцией #39 - код апострофа:

"insert into SMSERV (IDSMSERV, CODE, IDDEM_GR) values ("+IntToStr(id_number)+","+#39+str_cell+#39+","+IntToStr(iddem_gr)+")" ;


MsGuns   (2003-08-25 15:17:00) [3]

QuotedStr и никаких очедробительных сентенций ;)))


rh   (2003-08-25 11:41:00) [4]

2 Danilka большое спасибо!!! все получилось


Danilka   (2003-08-25 09:56:00) [5]

ышшо один вариант, который также добавит кавычки:
sql.text := "insert into SMSERV (IDSMSERV, CODE, IDDEM_GR) values ("+IntToStr(id_number)+", "#39+str_cell+#39","+IntToStr(iddem_gr)+")";


Danilka   (2003-08-25 09:53:00) [6]

или вот-так:
sql.text := "insert into SMSERV (IDSMSERV, CODE, IDDEM_GR) values ("+IntToStr(id_number)+", """+str_cell+""","+IntToStr(iddem_gr)+")";

:))


Danilka   (2003-08-25 09:51:00) [7]

или еще проще:
sql.text := "insert into SMSERV (IDSMSERV, CODE, IDDEM_GR) values (58, ""qwerty"",4689)";


stud   (2003-08-25 09:07:00) [8]

пардон
попробуй так:
SQL.Add ("insert into SMSERV ");
SQL.Add ("(IDSMSERV, CODE, IDDEM_GR) ");
SQL.Add ("values (");
SQL.Add (id_number,""");
SQL.Add (str_cell,""");
SQL.Add (iddem_gr)");


stud   (2003-08-25 09:01:00) [9]

SQL.Add (""");
SQL.Add (",");


Наверх

Титульная страница Поиск, карта сайта Написать письмо