Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.10.19;
Скачать: CL | DM;

Вниз

SQL   Найти похожие ветки 

 
YoungerDelphist   (2008-09-10 21:41) [0]

Необходимо организовать добавление записей в 2 таблицы БД.
Как сделать это в SQL-запросе.

. . .
TableTest.Append;
TableTest.FieldByName("TestName").AsString := "Test";
TableTest.Post;

ID := TableTest.FieldByName("TestID").AsInteger; // Автоинкрементное

TableTest2.Append;
TableTest2.FieldByName("Test2Code").AsInteger := ID;
TableTest2.Post;
. . .


 
Sergey Masloff   (2008-09-10 21:48) [1]

Вариантов масса. В вашей постановке ответ дать невозможно (например непонятно что за СУБД - может она поддерживает анонимные блоки а может редактируемые представления - минимум два способа решить вашу задачу)


 
YoungerDelphist   (2008-09-10 21:52) [2]

DBISAM


 
YoungerDelphist   (2008-09-10 21:56) [3]

Пробывал сделать вложеный запрос типа INSERT но не получилось так как не силен в SQL


 
Правильный$Вася   (2008-09-11 10:59) [4]


> Как сделать это в SQL-запросе. . . .TableTest.Append;

вот в упор не вижу тут SQL
2 последовательных INSERT через TQuery в рамках одной транзакции (TDatabase.StartTransaction)
в чем затык-то?


 
YoungerDelphist   (2008-09-11 11:06) [5]


> в чем затык-то?

Как получить ID Добавленной записи (после первого Insert). Ведь после выполнения Insert не происходит автоматичесого перемещния на добавленную запись.


 
Сергей М. ©   (2008-09-11 12:26) [6]


> YoungerDelphist   (11.09.08 11:06) [5]


СУБД какая ?


 
YoungerDelphist   (2008-09-11 12:33) [7]

DBISAM


 
Сергей М. ©   (2008-09-11 13:07) [8]

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=35973


 
Правильный$Вася   (2008-09-11 13:27) [9]


> Как получить ID Добавленной записи (после первого Insert).

как вариант, знать его заранее, до первого Insert

> Ведь после выполнения Insert не происходит автоматичесого
> перемещния на добавленную запись.

в sql нет понятия "перемещение на запись"



Страницы: 1 вся ветка

Текущий архив: 2008.10.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.017 c
15-1219832359
Tricky
2008-08-27 14:19
2008.10.19
Починить или купить новое?


15-1219732367
oldman
2008-08-26 10:32
2008.10.19
Степень свободы. Задачка.


2-1221139990
dmitry_12_08_73
2008-09-11 17:33
2008.10.19
Перехват в приложении комбинации Alt+Tab


2-1221159246
programmer90
2008-09-11 22:54
2008.10.19
Переменные среды в Delphi


2-1221045757
Нов_и_чок
2008-09-10 15:22
2008.10.19
Системные иконки Shell32.dll