Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Добавление данных в несколько таблиц / 4 сообщений из 4, страница 1 из 1
25.01.2014, 09:24:58
    #38537564
BIS-10-2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление данных в несколько таблиц
Прошу помочь))
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
for (i = 1; i < 26; i++)
 {
  IBDataSet2->Active=false;
  IBDataSet2->SelectSQL->Text="Insert into ocenka(id_object)values('"+Edit6->Text+"')";
  IBDataSet2->Active=true;
  Edit8->Text=IntToStr(i);
  IBDataSet2->Active=false;
  IBDataSet2->SelectSQL->Text="Insert into ocenka(id_compare)values('"+Edit8->Text+"')";
  IBDataSet2->Active=true;
 }


Получается как 1.png
А надо как в 2.png
...
Рейтинг: 0 / 0
25.01.2014, 09:27:01
    #38537565
BIS-10-2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление данных в несколько таблиц
в верхней картинке как получается, а в нижней как надо бы
...
Рейтинг: 0 / 0
25.01.2014, 09:50:57
    #38537570
Ivan_Pisarevsky
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление данных в несколько таблиц
ужасный код. Ты хоть какую-нибудь книжку читал?

набросал схематично, отладить это уже как домашнее задание.

IBSQL2->SQL->TEXT = "Insert into ocenka(id_object, id_compare)values(?,?)";
IBSQL2->PREPARE;
for (i = 1; i < 26; i++)
{
IBSQL2->PARAMS[0]=Edit6->Text ;
IBSQL2->PARAMS[1]=i ;
IBSQL2->EXEC ;
}
...
Рейтинг: 0 / 0
25.01.2014, 10:19:57
    #38537576
BIS-10-2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Добавление данных в несколько таблиц
Ivan_Pisarevsky, спасибо тебе.
...
Рейтинг: 0 / 0
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / Добавление данных в несколько таблиц / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]